CODINGSOURCES ★ SCR2BMP (Basic source code) ★

100 'Convert one 640x200 screen to a .BMP file
110 '(c) 1997 CRTC/Systeme D
120 :
130 DEFINT a-z:MEMORY &3FFF
131 PRINT"Convert MODE 2 screen to .BMP format"
132 PRINT"$1997 CRTC/Systeme D"
133 PRINT"Almost PD from Robot Software":PRINT
140 LINE INPUT "Original filename: ",a$
150 LINE INPUT "Compressed with SQ23 (Y/N): ",c$
155 LINE INPUT "Save as .BMP to drive: ",d$:MODE 2
160 WHILE INSTR(a$,".")=0:a$=a$+".SCR":WEND
170 IF UPPER$(LEFT$(c$,1))="Y" THEN LOAD a$,&4000:CALL &4000 ELSE LOAD a$,&C000
180 OPENOUT d$+":"+LEFT$(a$,INSTR(a$,".")-1)+".BMP"
190 :
200 FOR n=0 TO 61:READ i$
210 PRINT#9,CHR$(VAL("&"+i$));:NEXT
220 DATA 42,4D,BE,3E,00,00,00,00,00,00,3E,00,00,00,28,00
230 DATA 00,00,80,02,00,00,C8,00,00,00,01,00,01,00,00,00
240 DATA 00,00,80,3E,00,00,12,0B,00,00,12,0B,00,00,02,00
250 DATA 00,00,02,00,00,00,FF,FF,FF,00,00,00,00,00,00,00
260 DATA 00,00
270 :
280 a=&FF80
290 FOR n=0 TO 199
300 FOR x=0 TO 79
310 PRINT#9,CHR$(PEEK(a+x));:NEXT:POKE a,PEEK(a)XOR 255
320 a=a-&800
330 IF a<&C000 THEN a=a+16304
340 NEXT
350 CLOSEOUT


http://cpcrulez.fr

★ LICENCE: COMMERCIALE
★ ANNÉE: 1997
★ AUTEUR: RICHARD FAIRHURST

CPCrulez[Content Management System] v8.75-desktop/c
Page créée en 930 millisecondes et consultée 597 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.