trouver adresses programme binaire sur DSK

[smague]

Pour retrouver les trois adresses debut ,fin et execution d un fichierbinaire enregistré sur une disquette par une instruction

SAVEM :10 CLS20 INPUT 'Nom du fichier avec suffixe"; N$30 OPEN "I",1,N$:CLOSE30 OPEN "D",1,N$,1:FIELD #1 ,1 AS A$40

GET#1,2:H$=A$:GET#1:L$=A$50 GOSUB 280 :LG=Y60 GET#1,4:H$=A$:GET#1:L$=A$70 GOSUB 180 :AD=Y80 GET#1,LG+9:H$=A$:GET#1:L$=A$90 GOSUB 280 :EX=Y:PRINT100

X=AD :GOSUB 150:PRINT"Adr début = " W$110 X=AD+LG-1 :GOSUB 150:PRINT"Adr fin = " W$120 X=EX :GOSUB 150:PRINT"Adr execution = " W$130 CLOSE

:END140 REM s/prog 1150 W$=HEX$(X)160 IF LEN (W$) < 4 THEN W$="0"+ W$: GOTO 160170 RETURN175 REM s/ prog 2180

Y=256*ASC(H$)+ASC(L$):RETURN__________________________________________________________

[Stéphane Vanlierde]

90 GOSUB 280 :EX=Y:PRINT

Euh, elle est où la ligne 280 ?Ou j'ai loupé quelquechose ?

[jp]

à première vue, il s'agit en fait de la

ligne 180...jp

[smague]

bonjour,oui le

sous programme est en ligne 180 et non, pas 280 donc ecrire gosub 180 et non pas gosub 280

[jp]

Marrant, je viens de tomber sur l'article où était publié ce programme.Il figure (sans l'erreur sur la ligne 280) dans le Teo n°3, il est signé R. CAILLAT. jp

[Guyot Daniel]

Marrant, je viens de tomber sur l'article où était publié ce programme.Il figure (sans l'erreur sur la ligne 280) dans le Teo n°3, il est signé R. CAILLAT. jp

Je n'ai plus de nouvelles de Robert Caillat, C'est un ancien de Thomson, animateur du premier Club THOMSON, auteur de programmes LM, comme le moniteur dessassemleur, M], pour MO et TO. Ses programmes sont disponibles sur les DSK du Club Thomson, Serveur87 doit avoir une copie.