File:Locomotive BASIC color bars.gif
Dimenjiuns de chësta odüda danfora:800 x 557 pixel. Autra resoluzions: 320 x 223 pixel | 640 x 446 pixel | 841 x 586 pixel.
Documënt uriginel (841 × 586 pixels, dimenjiun dl file: 58 KB, MIME type: image/gif, ciclico, 128 frame, 11 s)
Ressumé
| Descriziun |
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. |
| Data | |
| Funtana | Opera personala |
| Autur | 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.
Lizënza
Io, detentore del copyright su quest'opera, dichiaro di pubblicarla con la seguente licenza:
 
|
Questo file è reso disponibile nei termini della licenza Creative Commons CC0 1.0 Universal. |
| La persona che ha associato un'opera con questo atto legale ha donato tale opera nel pubblico dominio rinunciando a tutti i diritti sull'opera in tutto il mondo, inclusi tutti i diritti connessi o altri diritti simili, per quanto permesso dalla legge. Puoi copiare, modificare, distribuire ed utilizzare l'opera, anche a fini commerciali, senza chiedere alcun permesso.
|
Storia dl documënt
Druca sun na data/ëura per udëi l documënt coche l fo te chël mumënt.
| Data/Ëura | Miniatura | Grandëza | utënt | Cumentar | |
|---|---|---|---|---|---|
| atuel | 22:15, 24 dez 2023 | | 841 × 586 (58 KB) | Morn | Uploaded own work with UploadWizard |
Coche l document ie stat adurvà
L ne da deguna plates che adroa chësc documënt.
Coche l documënt ie stat adurvà ntëur l mond
Ënghe chësta wikis adroa chësc documënt:
- Adurvà sun ar.wikipedia.org
- Adurvà sun en.wikipedia.org
