Fichye:Locomotive BASIC color bars.gif
Dimansyon previzyalizasyon sa a : 800 × 557 piksèl. Lòt rezolisyon yo: 320 × 223 piksèl | 640 × 446 piksèl | 841 × 586 piksèl.
Fichye orijinal (841 × 586 piksèl, gwosè fichye a : 58 kio, tip MIME li ye : image/gif, en boucle, 128 trames, 11 s)
Rezime
| Deskripsyon |
English: An Amstrad CPC emulated in MAME running a short Locomotive BASIC demo program which displays color bars similar to SMPTE color bars or EBU colour bars. |
| Dat | |
| Sous | Travay pèsonèl |
| Kreyatè | Morn |
Locomotive BASIC program
10 mode 0
20 ink 1,26:ink 2,24:ink 3,20:ink 4,18
30 ink 5,8:ink 6,6:ink 7,2:ink 8,0
40 for i=1 to 8
50 paper i
60 print space$(40);
70 next
Program notes
- Key words are printed in uppercase when the program is output with "list". But entering code is usually done in lowercase.
- line 10: screen mode 0 is used (16 colours; 20x25 characters)
- lines 20/30: set up colour palette; note that multiple instructions can be combined on a line
- lines 40 to 70: a "for" loop over i
- line 50: set the paper (background) colour to i
- line 60: print 40 spaces (= 2 lines); space$ is a built-in function that returns a string
- When the program ends, the "Ready" prompt is white-on-black because the current foreground (pen) colour, which is 1, had been set to white ("ink 1,26"). The background colour is 8 after the loop and "ink 8,0" had set that to black previously. See File:Amstrad CPC ink numbers.png for a chart of Amstrad ink numbers.
Kondisyon itlizasyon
Moi, en tant que détenteur des droits d’auteur sur cette œuvre, je la publie sous la licence suivante :
 
|
Ce fichier est disponible selon les termes de la licence Creative Commons CC0 Don universel au domaine public. |
| La personne qui a associé une œuvre avec cet acte l’a placée dans le domaine public en renonçant mondialement à tous ses droits sur cette œuvre en vertu des lois relatives au droit d’auteur, ainsi qu’à tous les droits juridiques connexes et voisins qu’elle possédait sur l’œuvre, sans autre limite que celles imposées par la loi. Vous pouvez copier, modifier, distribuer et utiliser cette œuvre, y compris à des fins commerciales, sans qu’il soit nécessaire d’en demander la permission.
|
Istorik fichye a
Klike sou yon dat/yon lè pou wè fichye a jan li te ye nan moman sa a.
| Dat ak lè | Minyati | Grandè yo | Itilizatè | Komantè | |
|---|---|---|---|---|---|
| Kounye a | 24 desanm 2023 à 20:15 | | 841 × 586 (58 kio) | Morn | Uploaded own work with UploadWizard |
Itilizasyon fichye sa a
Pa gen okenn paj ki itilize dosye sa a.
Itilizasyon global fichye a
Wiki sa a yo sèvi ak fichye sa a:
- Itilizasyon sou ar.wikipedia.org
- Itilizasyon sou en.wikipedia.org
