Fișier:Locomotive BASIC color bars.gif
Mărimea acestei previzualizări: 800 × 557 pixeli. Alte rezoluții: 320 × 223 pixeli | 640 × 446 pixeli | 841 × 586 pixeli.
Mărește rezoluția imaginii (841 × 586 pixeli, mărime fișier: 58 KB, tip MIME: image/gif, în buclă, 128 imagini, 11 s)
|
Acest fișier se află la Wikimedia Commons. Consultați pagina sa descriptivă acolo. |
Descriere fișier
| Descriere |
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ă | |
| Sursă | Operă proprie |
| Autor | 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.
Licențiere
Eu, deținătorul drepturilor de autor ale acestei opere, prin prezenta îmi public lucrarea sub următoarea licență:
 
|
Acest fișier a fost eliberat sub licența Creative Commons CC0 1.0 Universal Public Domain Dedication. |
| Persoana care a asociat o operă cu acest document o oferă domeniului public, renunțând la toate drepturile asupra operei, în toată lumea, atât în ce privește drepturile de autor cât și orice alte drepturi juridice conexe pe care le avea asupra operei, în măsura permisă de lege. Puteți copia, modifica sau distribui opera, inclusiv în scopuri comerciale, fără a fi necesară permisiunea autorului.
|
Istoricul fișierului
Apăsați pe Data și ora pentru a vedea versiunea trimisă atunci.
| Data și ora | Miniatură | Dimensiuni | Utilizator | Comentariu | |
|---|---|---|---|---|---|
| actuală | 24 decembrie 2023 23:15 | | 841x586 (58 KB) | Morn | Uploaded own work with UploadWizard |
Utilizarea fișierului
Nicio pagină nu se leagă la această imagine.
Utilizarea globală a fișierului
Următoarele alte proiecte wiki folosesc acest fișier:
- Utilizare la ar.wikipedia.org
- Utilizare la en.wikipedia.org
