★ CODING ★ CLEFS POUR AMSTRAD 2 ★ Système disque par Daniel Martin et Philippe Jadoul ★

Clefs2 48 - Amsdos - Analye de l'En - Tete d'un FichierCoding Clefs Pour Amstrad 2

AMSDOS : ANALYSE DE L'EN-TETE D'UN FICHIER

Ce programme permet d'analyser l'en-tête d'un programme sur disque ou sur cassette et affiche son type (BASIC, BASIC PROTEGE, FICHIER SEQUENTIEL ou IMAGE BINAIRE), son adresse d'implantation, sa longueur et son point d'entrée éventuel (IMAGE BINAIRE).
Les informations fournies par ce programme doivent vous permettre une recopie aisée sur disque des programmes binaires contenus sur cassette.

Remarque : si la lecture se fait sur disque, un nom de fichier est indispensable. Sur cassette, le nom de fichier à lire est optionnel.

Programme Basic

10 REM LECTURE DU HEADER
20 REM SUR DISQUE OU CASSETTE
30 REM DANIEL MARTIN LIEGE 1985
40 REM
50 MEMORY S<8FFF
60 FOR i =&A000 TO &A011
70 READ a$
80 POKE i , VAL("&",+a$)
90 NEXT i
100 CLS
110 INPUT"source Cassette ou Disque (C/D) ";s$
120 s$=UPPER$(s$)
130 IF s$="C" THEN |TAPE.IN : F=1:G0T0 170
140 IF s$<>"D" THEN GOTO 100
150 F=0
160 |DISC
170 PRINT
180 n$=""
190 INPUT"nom du fichier a lire ";n$
200 IF N$="" AND F=0 THEN PRINT"SUR DISGUE UN NOM EST INDISPENSABLE”: GOTO 170
210 L=LEN(n$)
220 POKE &A200,L
230 FOR 1=1 TO L
240 POKE &A200+I, ASC(MID$(n$,i , 1) )
250 NEXT i
260 CALL &A000
270 PRINT:PRINT
280 HEADER=PEEK (&A220)+256*PEEK (&A221 )
290 PRINT"ADRESSE DU HEADER ";HEX$(HEADER,4)
300 PRINT
310 TYPE=PEEK(HEADER+18)
320 PRINT "TYPE :";type 330 PRINT
340 IF TYPE=0 THEN PRINT"PROGRAMME BASIC NORMAL"
350 IF TYPE=1 THEN PRINT"PROGRAMME BASIC PROTEGE"
360 IF TYPE=2 THEN PRINT"FICHIER BINAIRE"
370 IF TYPE=22 THEN PRINT"FICHIER SEQUENTIEL"
380 ADC=PEEK(HEADER+21)+256*PEEK(HEADER+22)
390 PRINT
400 PRINT "ADRESSE CHARGEMENT 2";HEX$(ADC,4)
410 LG=PEEK(HEADER+24)+256*PEEK(HEADER+25)
420 PRINT
430 PRINT "LONGEUR : ";HEX$(LG,4)
440 PRINT
450 PE=PEEK(HEADER+26)+256*PEEK(HEADER+27)
460 PRINT"POINT D'ENTREE 3 ";HEX$(PE,4)
470 DATA 21 ,00,A2,46,23,11, 00,90,CD,77,BC,22,20,A2, CD, 7A, BC, C9

★ ANNÉE: ???
★ AUTEUR(S): ???

Page précédente : Clefs2 47 - Rsx de Lecture et d'Ecriture Secteur
Je participe au site:

» Vous avez remarqué une erreur dans ce texte ?
» Aidez-nous à améliorer cette page : en nous contactant via le forum ou par email.

CPCrulez[Content Management System] v8.7-desktop
Page créée en 393 millisecondes et consultée 1276 fois

L'Amstrad CPC est une machine 8 bits à base d'un Z80 à 4MHz. Le premier de la gamme fut le CPC 464 en 1984, équipé d'un lecteur de cassettes intégré il se plaçait en concurrent  du Commodore C64 beaucoup plus compliqué à utiliser et plus cher. Ce fut un réel succès et sorti cette même années le CPC 664 équipé d'un lecteur de disquettes trois pouces intégré. Sa vie fut de courte durée puisqu'en 1985 il fut remplacé par le CPC 6128 qui était plus compact, plus soigné et surtout qui avait 128Ko de RAM au lieu de 64Ko.