1 ' ** PUDDLE ** By Andy Macphee COMPUTING WITH THE AMSTRAD Sept 1987 2 ' 3 MODE 1:INK 0,0:INK 1,26:PAPER 0:CLS:INK 1,24:PEN 1:PRINT "** PUDDLE ** By Andy Macphee":PRINT:PRINT "from:- COMPUTING WITH THE AMSTRAD":PRINT " Sept 1987":PRINT "Program type:- GRAPHIC DEMO":PRINT:PRINT"Imagine you are in a dark dungeon" 5 PRINT:PRINT"ANY KEY TO START" 6 CALL &BB18 10 SYMBOL 255,16,56,56,124,124,124,56,16 20 MODE 0:BORDER 0:INK 0,0:r=10:p=1:FOR a%=1 TO 14:INK a%,1:NEXT 30 FOR b%=0 TO 38:MOVE 320+r*COS(k%),170+(r/6)*SIN(k%) 40 DEG:FOR k%=1 TO 360 STEP 6:DRAW 320+r*COS(k%),170+(r/6)*SIN(k%),p:NEXT 50 r=r+10:IF p<>14 THEN p=p+1 ELSE p=1 60 NEXT:PRINT CHR$(22)CHR$(1) 70 FOR a%=1 TO 14:PEN a%:LOCATE 11,a%:PRINT CHR$(255):NEXT 80 FOR a%=1 TO 14:INK a%,0:NEXT 90 FOR a%=1 TO 14:INK a%,14:CALL &BD19:FOR d=0 TO 100:NEXT:CALL &BD19:INK a%,0:NEXT:SOUND 1,0,1,12:GOTO 90
Inscription : 20 Août 2007, 18:21 Message(s) : 4998
l'interet de celui la , c'est qu'il mets winape dans les choux
Code :
10 'Mark Wood 1989. Broken T.V.Screen Clear for 2min 20 MODE 0:INK 0,0:PAPER 0:BORDER 0 30 FOR t=0 TO 15:INK t,0:NEXT t 40 FOR i=&C000 TO &C000+&3FFF:POKE i,RND*255:NEXT i 50 SPEED INK 1,1 60 FOR y=0 TO 15:INK y,RND*27,RND*27:NEXT y 70 OUT &BD00,INT(RND*255) 80 BORDER INT(RND*27),INT(RND*27) 90 OUT &BC00,INT(RND*255) 100 GOTO 70
Du coup j'ai voulu l'essayer sur PC-CPC et c'est là que j'ai remarqué qu'on ne peut pas "coller" du texte comme Winape (CTRL+F11). Ou alors j'ai raté une option... (ce qui est fort possible )
Le plus simple pour "copier" des listings sur émulateur, c'est de passer par ManageDsk. Le CPC verra un fichier ASCII qui sera lisible.
Autre truc rigolo trouvé dans Winape, on ne peut pas virer le lecteur de disquettes. Un 464 sans ROM 7 fait toujours un CAT sur la disquette (pas pratique pour tester la sauvegarde sur cassette... ).
Avec pc-cpc, moi j'utilise la fonction 'Lecture/écriture PC', qui permet de 'monter' un répertoire du pc comme une disquette cpc, et ensuite de lire tout le contenu de ce répertoire avec le cpc émulé.
Inscription : 05 Avr 2012, 08:02 Message(s) : 110 Localisation : Sur terre, mais souvent dans les nuages !
Demoniak a écrit :
Avec pc-cpc, moi j'utilise la fonction 'Lecture/écriture PC', qui permet de 'monter' un répertoire du pc comme une disquette cpc, et ensuite de lire tout le contenu de ce répertoire avec le cpc émulé.
Salut Démoniak,
Ou de sortir le version avec ma modif pour le collé directe dans pc-cpc
Utilisateur(s) parcourant ce forum : Aucun utilisateur inscrit et 10 invité(s)
Vous ne pouvez pas publier de nouveaux sujets dans ce forum Vous ne pouvez pas répondre aux sujets dans ce forum Vous ne pouvez pas éditer vos messages dans ce forum Vous ne pouvez pas supprimer vos messages dans ce forum Vous ne pouvez pas insérer de pièces jointes dans ce forum