Me Revoilou!!! - Page 1

Salut, je suis revenu, c cool
G des probs et c moins cool
bon, ca doit être moi qui merde en fait
Vous vous souvenez, j'avais des probs pour faire la lecture du clavier avec les gris, ca merdait.
Kevin m'avait donné une solution, mais j'ai dut rater qqchose, car ca marche pas dans mon prog. En fait ca marche, les gray sont là mais j'ai beau appuyer sur toutes les touches ils les reconnaient pas. Voici ce que j'ai fait de + simple:

include "doorsos.h"
include "graphlib.h"
include "userlib.h"

xdef _main
xdef _ti89

_main:
movem.l d0-a6,-(a7)
move.l $64,old_int_1
move.l $74,old_int_5
lea.l dummy_int(pc),a0
move.l a0,$40064
move.l a0,$40074
jsr graphlib::clr_scr
jsr graphlib::gray4
move.w #1,graphlib::choosescreen

debut:
move.w #%1111111011111111,$600018
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
btst.b #6,$60001B
beq exit
move.w #%1111111110111111,$600018
nop
nop
nop
nop
nop
nop
nop
nop
nop
nop
btst.b #6,$60001B
beq puiss
bra debut
puiss:
exit:

jsr graphlib::gray2 ; ... repasse en noir et blanc
clr.w graphlib::choosescreen ; graphlib::choosescreen = 0, ce qui signifie
;que l'adresse de travail redevient #4C00 et ne
;sera plus donnée dans a1
move.l old_int_1(pc),$40064
move.l old_int_5(pc),$40074


movem.l (a7)+,d0-a6 ;restaure tous les registres
rts

old_int_1:
dc.l 0
old_int_5:
dc.l 0
dummy_int:
rte


end

Je ne pense pas qu'on puisse faire moins court

Sinon, une autre question dans la foulée
peut-on remplacer un:
cmp #x,dx
bxx ...
cmp #x,dx
bxy ...
par:
cmp #x,dx
bxx ...
dxy ...

>gugusg:

>En fait ca marche, les gray sont là mais j'ai beau appuyer sur toutes les touches ils les reconnaient pas.

Bizarre. Vérifie la routine de lecture. Mets déjà 12 nops plutôt que 10.

>peut-on remplacer un:
>cmp #x,dx
>bxx ...
>cmp #x,dx
>bxy ...
>par:
>cmp #x,dx
>bxx ...
>bxy ...

Oui.

arg, pas de nop, un dbra!

fais comme ca;p

mask0 equ %11111110
mask1 equ %11111101
mask2 equ %11111011
mask3 equ %11110111
mask4 equ %11101111
mask5 equ %11011111
mask6 equ %10111111


loop:
 move.w #maskO,d6
 bsr getkey
 btst.b #0,t
 beq UP
 ....
 bra loop




getkey:
 move.w d6,$600018
 moveq #50,d0
getkey_wait:
 dbra.s d0,getkey_wait
 move.b $60001b,d6
 rts

ca marche a tout les coups

erf je suis con, pour cette routine je vire les AI... mais la avec les gray ca risque de foire.. plusieur touche pour un code...

Extended> tu préfère un
boucle:
move.w #1,d0
nop
dbra boucle,d0
Sinon, je vais essayer d'en mettre une 20taine et voir ce qui se passe.

non:
moveq #50,d0
getkey_wait:
dbra.s d0,getkey_wait

ca suffit..
[edit]Edité par Nhdpp le 30-06-2001 à 15:24:46[/edit]

Oui, g mal fait mais cétait vite fait comme cela.
En mettant 50 nop ca marche tjrs pas.
En faisant:
move.w #20,d0
boucle1:
nop
dbra d0,boucle1 ca marche tjrs pas
En fait la caltos est pas plantée mais elle reconnait pas les touches. Ma routine est tout au début et je ne pense pas sincèrement qu'elle soit fausse

le mieux c de mettre du code à la place des nop/dbra ds le vent

essaie ma routine...on sait jamais si ca marche

Nhdpp-> dbra.s n'existe pas, parait-il

C'est ton masque qui n'est pas bon.
Les bits du clavier sont les bits 0-6 de $600019.

Par exemple: move.w #%1111111011111111,$600018 n'est pas bon (bit 8). Si c'est pour détecter [ESC], ça devrait être: move.b #%10111111,$600019, puis btst.b #0,$60001b
[edit]Edité par Kevin Kofler le 30-06-2001 à 20:16:48[/edit]

erf dbra.s n'existe pas..
je te fais confiance.. mais je le laisse car mon compilo l'accepte.. apres il en fait ce qu'il veut

c bizarre parce que g fait enter en m'inspirant de zguide, et pour esc, c l'exemple de zguide donc c bizarre que ce soit mauvais.

1. ZGuide, c'est pour TI-92.
2. ZGuide contient un certain nombre d'erreurs.

erf.....
fait comme moi c'est plus simple)

Si tu veus un bon tutorial va sur mon site!

Pour la matrice clavier correcte pour TI-89 et TI-92(+):
http://tigcc.ticalc.org/doc/kbd.html#_rowread

Sinon, il y a aussi la documentation hardware pour TI-89 ici: http://m101.ryd.student.liu.se/J89hw.txt
[edit]Edité par Kevin Kofler le 30-06-2001 à 18:14:43[/edit]

Merci Kevin ca marche maintenant au poil!!!
J'ai modifié la touche "enter" aussi et ca marche!!!
C chelou que le Zguide soit si buggé et si vieux.
Personne ne sait si une nouvelle version va sortir???

C nikel, mais un peu sensible
sinon, Kevin, pour esc, tu as mis:
move.b #%11011111,$600019
mais je pense que c'est:
move.b #%10111111,$600019
A confirmer et merci de ton aide précieuse

Oui, tu as raison. J'avais oublié de compter le bit 0.

Mais Kevin t'as oublié celui livré avec doorsosd "PortIO" je crois qui est quand même assez neuf!

Oui, il n'est pas aussi complet que J89hw.txt en général, mais pour le clavier, il contient également la matrice clavier des TI-92(+).
[edit]Edité par Kevin Kofler le 30-06-2001 à 22:45:57[/edit]

Sinon, je cherche tjrs une méthode simple pour afficher à l'écran une variable du style:
score:
dc.b 8

merci d'avance

Voilà comment fait DrMario (pour le principe):

 moveq #0,d0
 move.b score,d0

 move.l d0,-(a7)
 pea format(pc)
 pea buffer(pc)
 jsr doorsos::sprintf

 WriteStr x,y,color,buffer

 ...

format dc.b "%ul",0
buffer dcb.b 5,0

J'avais déjà eu une macro avec cette méthode mais elle n'a pas marché. Y'en a pas d'autre ???
Comment y fait FlashZ avec ses Scores ???

Bah des divisions surement... et cette méthode marche.

Y fait des divisions de quoi???

Ben oui!
la division par 10,j'ai pas l'algo sur moi!

mais si tu réfléchis tu trouvera

En gros il faut prendre le reste de la division avec divu.Et le transformé en son code ASCII.

Le principe en gros est là!

je t'enverrais la routine d'acc!