Mit dieser kleinen Routine kann ein beliebiger Text dreifarbig gestreift ausgegeben werden. Dazu weist man 't$' den Text und den Variablen p1, p2 und p3 die PEN-Nummern für die Farben der Streifen zu (p1 gibt die Farbe der 3 oberen Pixelzeilen an, p2 die der 2 mittleren und p3 die der 3 unteren). Man positioniert den Cursor mit 'LOCATE' an der Stelle, wo der Text erscheinen soll, und ruft die Streifen-Script-Routine mit 'GOSUB 10000' auf. Wird das Unterprogramm in eigenen Programmen verwendet, müssen unbedingt die Zeilen 30 und 40 vorhanden sein und vor dem ersten Aufruf der Routine einmalig abgearbeitet werden! Die Zeilen 50 bis 130 dienen lediglich zur Demonstration. Auf einem CPC 464 läuft das Unterprogramm entweder nur mit einem Emulator, oder wenn folgende zwei Zeilen geändert werden: 10050 PEN p1:PRINT CHR$(22)CHR$(0)CHR$(253) CHR$(8);
10060 PEN p2:PRINT CHR$(22)CHR$(1)CHR$(254) CHR$(8);Martin Schmid/jf , CPCAI | ★ AMSTRAD CPC ★ DOWNLOAD ★ |
|
CPCrulez[Content Management System] v8.7-desktop
Page créée en 699 millisecondes et consultée 812 foisL'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. |
|
|
