Derniers sujets
» CEO-MAG 337
Jeu 19 Juil 2018 - 21:35 par Symoon

» Manuel Compilateur Graphique (ERE)
Mer 18 Juil 2018 - 23:28 par assinie

» FOOT - Mondial 2018 en Russie
Lun 16 Juil 2018 - 7:02 par maximus

» Discussions High-Tech
Ven 13 Juil 2018 - 16:35 par maximus

» Twilighte card : Suivi des commandes
Jeu 12 Juil 2018 - 20:36 par Jede

» Nouveau RPG des Studios du CEO
Mar 3 Juil 2018 - 21:10 par maximus

» Changement des conditions de Forumactif: perte de notre adresse
Lun 2 Juil 2018 - 23:27 par laurentd75

» Adresse e-mail en oric.org
Lun 2 Juil 2018 - 22:47 par Hialmar

» [sujet Public] - le Ceo-Mag
Sam 30 Juin 2018 - 18:50 par maximus

» Schémas Oric et Microdisc
Sam 30 Juin 2018 - 17:55 par Voyageur

» Recherche image disque pour Jasmin
Jeu 28 Juin 2018 - 19:22 par assinie

» Envol des prix sur eBay...
Mer 27 Juin 2018 - 21:53 par Voyageur

» The Ring of Darkness
Mer 27 Juin 2018 - 8:56 par Oric1-Atmos

» CEO-MAG 336
Sam 16 Juin 2018 - 20:19 par Voyageur

» La Visu de l'Ete ...
Mer 13 Juin 2018 - 0:51 par kenneth

Qui est en ligne ?
Il y a en tout 3 utilisateurs en ligne :: 0 Enregistré, 1 Invisible et 2 Invités

Aucun

Le record du nombre d'utilisateurs en ligne est de 29 le Mer 25 Fév 2015 - 14:01
Connexion

Récupérer mon mot de passe

Statistiques
Nous avons 147 membres enregistrés
L'utilisateur enregistré le plus récent est Nonoo78

Nos membres ont posté un total de 6913 messages dans 516 sujets
Portail ORIC




Calcul en langage machine [RESOLU]

Aller en bas

Calcul en langage machine [RESOLU]

Message  Sheld67 le Dim 15 Mar 2015 - 21:59

Salut la Communauté,

Pour les besoins d'un nouveau jeu en langage machine, je cherche le moyen de réaliser la division de deux entiers.

J'ai vainement tenté la programmation suivante:
lda #200
jsr $DF24 ; A --> ACC1
jsr $DEE8 ; ACC1 --> ACC2
lda 01 ; contient 1, 2, 4  ou 8 (selon le niveau choisi pour le jeu)
jsr $DF24
jsr $DDE7 ; ACC2/ACC1 --> ACC1
jsr $D922 ; ACC1 --> YA
sty 03 ; contient la valeur 'n' qui sert lors de la boucle d'attente principale du jeu (plus le niveau de jeu est élevé, plus la valeur 'n' est faible et plus le jeu est rapide).

Ce programme me retourne un ?ILLEGAL QUANTITY ERROR et refuse de placer le moindre résultat en 03.

Où ai-je fauté ?


Dernière édition par Sheld67 le Sam 30 Mai 2015 - 11:22, édité 1 fois
avatar
Sheld67

Messages : 48
Date d'inscription : 06/04/2014

Revenir en haut Aller en bas

Re: Calcul en langage machine [RESOLU]

Message  Dom50 le Lun 16 Mar 2015 - 8:24

bonjour,

Tu utilises un système sous Sedoric ?
Si c'est le cas, il faut faire attention de bien apeller les routines en ROM et non les routines Sedoric en RAM overlay.

Sinon, pour diviser un nombre inférieur à 255 par 2, 4 ou 8. Il y a plus simple et plus rapide.
Il suffit de décaler les bits vers la droite autant de fois que la puissance de 2 par laquelle on souhaite diviser Very Happy

LDA 02 (si 02 contient tempo maxi)
LSR
STA 03      divise par 2

LDA 02
LSR
LSR          divise par 4
STA 03

LDA 02
LSR
LSR
LSR         divise par 8
STA 03
avatar
Dom50

Messages : 715
Date d'inscription : 06/12/2012
Localisation : Normandie

Revenir en haut Aller en bas

Re: Calcul en langage machine [RESOLU]

Message  didierv le Lun 16 Mar 2015 - 13:45

Bonjour,

Et voici l'adresse de bonnes routines générales 6502 : www.6502.org
et plus spécifiquement une routine dédiée à la division http://6502.org/source/integers/ummodfix/ummodfix.htm

Une autre solution, si tu as besoin d'être plus rapide et que tes nombres ne sont pas trop grands est d'avoir des tables en memoire (mais il faut aussi ne pas avoir trop besoin de place Very Happy )
avatar
didierv

Messages : 576
Date d'inscription : 19/01/2014
Age : 55
Localisation : Nord de la France

http://www.dmacoco.fr

Revenir en haut Aller en bas

Re: Calcul en langage machine [RESOLU]

Message  laurentd75 le Lun 6 Avr 2015 - 17:05

Sheld67 a écrit:Salut la Communauté,

Pour les besoins d'un nouveau jeu en langage machine, je cherche le moyen de réaliser la division de deux entiers.
.../...
Ce programme me retourne un ?ILLEGAL QUANTITY ERROR et refuse de placer le moindre résultat en 03.

Où ai-je fauté ?
Bonjour,
Je ne comprends pas trop pourquoi tu fais des appels à des routines complexes de la ROM qui sont prévues pour traiter des nombres flottants pour ton besoin qui est simplement de diviser 2 entiers ?

Quoi qu'il ne soit, d'après la routine de la ROM en D922 (sur Oric Atmos), l'erreur que tu obtiens est due soit à un problème de signe négatif, soit à un problème d'exposant... Encore une fois, les routines de la ROM pour l'arithmétique des nombres flottants sont complexes, et d'ailleurs pas forcément très clairement expliquées dans "L'Oric à Nu", que tu as utilisé je pense comme référence pour trouver les adresses des routines que tu appelles... Il y a notamment des différences entre traitements/routines sur nombres signés et nombres non signés...

Bref, à ta place je suivrais le conseil de Didier et j'essaierais de réutiliser des routines standard 6502 de division d'entiers...

Bonne chance en tous cas, c'est vrai que le 6502 c'était pas facile, personnellement ça m'a fait drôle aussi d'y revenir, je me rappelais plus qu'effectivement il n'y avait même pas d'instruction de multiplication ou de division !

Laurent
avatar
laurentd75

Messages : 207
Date d'inscription : 09/08/2014
Age : 47
Localisation : Paris

Revenir en haut Aller en bas

Re: Calcul en langage machine [RESOLU]

Message  kenneth le Lun 6 Avr 2015 - 18:52

Bienvenue Laurent Wink
avatar
kenneth
Modérateur

Messages : 470
Date d'inscription : 13/01/2013
Age : 51
Localisation : 972

Revenir en haut Aller en bas

Re: Calcul en langage machine [RESOLU]

Message  laurentd75 le Lun 6 Avr 2015 - 18:59

Bonjour Kenneth,

Ah oui, j'ai du oublié de me présenter, désolé... Peut-être y-a-t-il un forum dédié pour les présentations que je n'ai pas vu ?

Quoi qu'il en soit... Je suis donc Laurent, tout nouvel inscrit au CEO, pas tout jeune puisqu'ayant eu un Oric Atmos en étant ado... Et toujours possesseur d'un Atmos et d'un Oric-1 qui sont au grenier et que j'aimerais bien ressortir si j'avais davantage de place dans mon 2 pièces parisien...

J'en profite pour remercier l'ensemble de la communauté Oric, les créateurs et administrateurs de oric.org, le CEO, defence-force.org.... C'est vraiment un plaisir de revivre ces années Oric grâce à vous!!
avatar
laurentd75

Messages : 207
Date d'inscription : 09/08/2014
Age : 47
Localisation : Paris

Revenir en haut Aller en bas

Re: Calcul en langage machine [RESOLU]

Message  Dr X7FFF le Sam 18 Avr 2015 - 0:39

Bienvenu Laurent
avatar
Dr X7FFF

Messages : 13
Date d'inscription : 15/11/2014

Revenir en haut Aller en bas

Calcul en langage machine [RESOLU]

Message  Sheld67 le Dim 26 Avr 2015 - 19:01

Merci à tous pour vos réponses.

Voici finalement le code utilisé pour les besoins du jeu "Black Mamba" :


LINIT_SPEED           lda #120 ; valeur de référence pour le niveau 1 du jeu (équivaut à 1,2 s d'attente)
                              ldy LEVEL ; le niveau du jeu est stocké en page zéro (entre 1 et 4)
LLOOP                    dey
                              beq LEND_INIT_SPEED ; si on a décrémenté jusqu'à avoir Y = 0 alors sortir
                              lsr a ; sinon diviser A par 2 (c'est là qu'est l'astuce...)
                              bne LLOOP ; reboucler
LEND_INIT_SPEED   sta GAME_SPEED ; sauver la nouvelle valeur de vitesse du jeu
                              rts


En d'autres termes, voici les temps d'attente correspondant à chaque niveau de jeu :
- Niveau 1 = 1,2 s
- Niveau 2 = 0,60 s
- Niveau 3 = 0,30 s
- Niveau 4 = 0,10 s (ça commence à être rapide)

Je considère le sujet comme résolu !
avatar
Sheld67

Messages : 48
Date d'inscription : 06/04/2014

Revenir en haut Aller en bas

r

Message  zeolib le Mer 9 Mai 2018 - 0:31

Bonjour,
Tout d'abord je m'excuse pour répondre à un sujet résolu il y a 3 ans.
Ensuite ma réponse n'est pas adapté au problème initial car elle utilise le calcul flottant pour une division entre 2 entiers.
Jutilise les routines fournit dans "Au coeur de l'oric atmos" page 57.

ACCU1 et ACCU2 sont situé en page zéro sur 5 octets chacuns
$D0--$D5    accu1
$D8--$DD   accu2  


Soit une division entre 2 entiers (16 bits). avec LL octet faible et HH octet fort.
dans  $00-01 : le dividande: LL,HH
dans  $02-03 : le diviseur:  ll,hh

Le quotient trouvé sera rangé dans $00-01

A4,00           LDY 00               ' Y <--LL
A5,01           LDA 01               ' A <--HH
20,99,D4      JSR D499           ' YA --> ACCU1              
20,E5,DE     JSR DEE5          ' ACCU1 --> ACCU2
A4,02           LDY 02               ' Y <-- ll
A5,03           LDA 03               ' A <-- hh
20,99,D4      JSR D499          ' YA --> ACCU1
20,E7,DD     JSR DDE7         '  ACCU2 / ACCU1  --> ACCU1
20,2C,D9     JSR D92C          ' ACCU1 ---> entier (HHLL) en $D3-D4   (Attention ici l'octet Fort se retrouve dans $D3 et dans $D4 l'octet faible)
A5,D4          LDA D4               ' A <-- $D4
85,00           STA 00                ' A  --> $00           (poids faible)
A5,D3          LDA D3               ' A <-- $D3
85,01           STA 01                ' A --> $01              (poids Fort)
60                RTS


Voila
avatar
zeolib

Messages : 4
Date d'inscription : 24/02/2018

Revenir en haut Aller en bas

Re: Calcul en langage machine [RESOLU]

Message  Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut


 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum