(édité)
Code : Tout sélectionner
100 !Dump Cartridge
105 ROMBASE=16384:ROMSIZE=32768
110 INPUT"Name: ";NAME$
120 NAME$="101." & NAME$ & ".DMP"
130 OPEN#1,NAME$,DISPLAY,OUTPUT
140 FOR ADDR=0 TO ROMSIZE-1 STEP 32
150 CALL HEX(ADDR,4,H$)
155 PAUSE 0:DISPLAY H$
160 L$=H$ & ": "
170 FOR I=ROMBASE+ADDR TO ROMBASE+ADDR+31
180 CALL PEEK(I,V)
190 CALL HEX(V,2,H$)
200 L$=L$ & H$
210 NEXT I
220 PRINT#1,L$
230 NEXT ADDR
240 CLOSE#1
250 END
1000 !Hex output
1010 SUB HEX(VALUE,LENGTH,H$)
1020 V=VALUE:H$=""
1030 FOR L=1 TO LENGTH
1040 D=V
1050 V=INT(V/16)
1055 D=D-V*16
1060 IF D<10 THEN H$=CHR$(D+48) & H$ ELSE H$=CHR$(D+55) & H$
1070 NEXT L
1080 SUBEND
Ça marche lentement mais ça marche !
Ma liste des cartouches :
- TI-74 MATHEMATICS
- TI-74 STATISTICS
- TI-74 FINANCE
- TI-74 LEARN PASCAL
- TI-95 MATHEMATICS
- TI-95 STATISTICS
- TI-74 Deutsche Bank db Leben 01/95 (64K)
- TI-74 Hamburg Mannheimer Leben u. Rente HO OAB SAF OVG HMI DANV KD (FLASH 256K)
J'ai modifié le compartiment des cartouches pour accepter celles de TI-95 dans le TI-74. Parce-que j'ai déjà trouvé les images des deux ROMs que je possède ce n'étais pas nécessaire mais peut-être utile une autre fois.