1

[nosmile]comment on faits pour chercher un element dans tous les dossier de la calc j'ai un prog mais il est en kernel !
je voudrais donc savoir l'equivalent de :
	move.w	#doorsos::FolderListHandle,d0
	doorsos::DEREF d0,a6
IP IP OURA ! ;)

2

Le mieux est de tout reprogrammer avec les fonctions de vat.h, en particulier SymFindFirst et SymFindNext.

Ceci dit, l'équivalent exact de ton code est:
 movem.l d1-d2/a0-a1/a5,-(a7) ;vérifie si tu dois vraiment garder ces registres intacts
 move.l $c8,a5 ;si tu ne l'as pas déjà dans un registre
 pea.l sym_main(pc)
 move.l 4*SymFindHome(a5),a0
 jsr (a0)
 move.l d0,(a7)
 move.l 4*HeapDeref(a5),a0
 jsr (a0)
 addq.l #4,a7
 move.l a0,a6
 movem.l (a7)+,d1-d2/a0-a1/a5
 

avec:
 dc.b 0,'main'
sym_main: dc.b 0

[edit]Edité par Kevin Kofler le 17-08-2001 à 23:40:14[/edit]
avatar
Mes news pour calculatrices TI: Ti-Gen
Mes projets PC pour calculatrices TI: TIGCC, CalcForge (CalcForgeLP, Emu-TIGCC)
Mes chans IRC: #tigcc et #inspired sur irc.freequest.net (UTF-8)

Liberté, Égalité, Fraternité

3

nan ca marche pas ton prog!

et t'es sur que a la fin a6 pointe sur la table des dossiers ?
IP IP OURA ! ;)

4

Je crois que c'est plutot un :
clr.W d0
swap d0
move.w d0,-(a7)