Forum Oric
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Derniers sujets
» Bla Bla général du Jury
Calcul en langage machine [RESOLU] EmptyJeu 21 Mar 2024 - 8:51 par Dom50

» carte mère Oric (re)tracée
Calcul en langage machine [RESOLU] EmptyMar 5 Mar 2024 - 18:54 par kenneth

» Meurtre à Grande Vitesse
Calcul en langage machine [RESOLU] EmptyDim 25 Fév 2024 - 5:09 par Iurius

» ORIC-1 sur LE BON COIN
Calcul en langage machine [RESOLU] EmptyVen 23 Fév 2024 - 23:01 par Mcar

» ORIC ATMOS sur LE BON COIN
Calcul en langage machine [RESOLU] EmptyDim 4 Fév 2024 - 12:06 par kiwilevrai

» Problème d'affichage des couleurs avec un Oric Atmos
Calcul en langage machine [RESOLU] EmptySam 27 Jan 2024 - 1:26 par pierbail

» Bienvenue dans le Forum des Oriciens
Calcul en langage machine [RESOLU] EmptyMar 9 Jan 2024 - 12:33 par Dom50

» Rencontre avec Laurant Weill, co-fondateur de Loriciel, et mon garçon de 12 ans
Calcul en langage machine [RESOLU] EmptyVen 29 Déc 2023 - 14:13 par Arcade-des-Monts

» Bonnes fêtes
Calcul en langage machine [RESOLU] EmptyMar 26 Déc 2023 - 10:21 par Dom50

» Murders in Venice / Meutres à Venise
Calcul en langage machine [RESOLU] EmptySam 18 Nov 2023 - 22:44 par retroric

» Un clavier PS/2 pour tester un ORIC
Calcul en langage machine [RESOLU] EmptyDim 27 Aoû 2023 - 9:49 par Voyageur

» Disquette 3" Sedoric
Calcul en langage machine [RESOLU] EmptyMar 1 Aoû 2023 - 14:22 par AtomeX

» faire un 6502 avec des phototransistor
Calcul en langage machine [RESOLU] EmptyDim 16 Juil 2023 - 17:26 par Voyageur

» Oricutron linux et DSK
Calcul en langage machine [RESOLU] EmptyJeu 29 Juin 2023 - 18:34 par Voyageur

» No Problem !
Calcul en langage machine [RESOLU] EmptyDim 25 Juin 2023 - 17:53 par Voyageur

Qui est en ligne ?
Il y a en tout 2 utilisateurs en ligne :: 0 Enregistré, 0 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 241 membres enregistrés
L'utilisateur enregistré le plus récent est ben_frog

Nos membres ont posté un total de 8921 messages dans 811 sujets
Sites Sympas

> Culture Club


-20%
Le deal à ne pas rater :
(Adhérents Fnac) Enceinte Bluetooth Marshall Stanmore II Noir
199.99 € 249.99 €
Voir le deal

Calcul en langage machine [RESOLU]

+3
didierv
Dom50
Sheld67
7 participants

Aller en bas

Calcul en langage machine [RESOLU] Empty Calcul en langage machine [RESOLU]

Message par Sheld67 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
Sheld67
Sheld67

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

Revenir en haut Aller en bas

Calcul en langage machine [RESOLU] Empty Re: Calcul en langage machine [RESOLU]

Message par Dom50 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
Dom50
Dom50

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

Revenir en haut Aller en bas

Calcul en langage machine [RESOLU] Empty Re: Calcul en langage machine [RESOLU]

Message par didierv 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 )
didierv
didierv

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

http://www.dmacoco.fr

Revenir en haut Aller en bas

Calcul en langage machine [RESOLU] Empty Re: Calcul en langage machine [RESOLU]

Message par retroric 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
retroric
retroric

Messages : 595
Date d'inscription : 09/08/2014
Age : 53
Localisation : Paris

https://github.com/retroric

Revenir en haut Aller en bas

Calcul en langage machine [RESOLU] Empty Re: Calcul en langage machine [RESOLU]

Message par kenneth Lun 6 Avr 2015 - 18:52

Bienvenue Laurent Wink
kenneth
kenneth
Modérateur

Messages : 878
Date d'inscription : 13/01/2013
Age : 56
Localisation : 63

Revenir en haut Aller en bas

Calcul en langage machine [RESOLU] Empty Re: Calcul en langage machine [RESOLU]

Message par retroric 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!!
retroric
retroric

Messages : 595
Date d'inscription : 09/08/2014
Age : 53
Localisation : Paris

https://github.com/retroric

Revenir en haut Aller en bas

Calcul en langage machine [RESOLU] Empty Re: Calcul en langage machine [RESOLU]

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

Bienvenu Laurent
Dr X7FFF
Dr X7FFF

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

Revenir en haut Aller en bas

Calcul en langage machine [RESOLU] Empty Calcul en langage machine [RESOLU]

Message par Sheld67 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 !
Sheld67
Sheld67

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

Revenir en haut Aller en bas

Calcul en langage machine [RESOLU] Empty r

Message par zeolib 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
zeolib
zeolib

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

Revenir en haut Aller en bas

Calcul en langage machine [RESOLU] Empty Re: Calcul en langage machine [RESOLU]

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

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