Buod

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.

Paglilisensiya

Ako, na may karapatang-ari ng akdang ito, ang naglalathala nito alinsunod sa ilalim ng sumusunod na mga lisensya:

Ang talaksang ito ay ginawang makukuha sa ilalim ng Dedikasyon ng Pandaigdigang Saklaw ng Madla CC0 1.0 ng Creative Commons.

Ang taong nag-ugnay ng isang akda sa kasulatang ito ay inilaan ang akda sa Commons sa saklaw ng madla na isinusukong pangbuong-mundo ang lahat ng kanyang mga karapatan sa akda sa ilalim ng batas sa karapatang-ari, kasama ang lahat ng kaugnay at karatig na mga karapatan, hanggang sa naaabot ng batas. Maaari mong kopyahin, baguhin, ipamahagi at isagawa ang akda, kahit na para sa mga layunin pangkalakal, lahat-lahat na hindi nangangailangan ng pahintulot. http://creativecommons.org/publicdomain/zero/1.0/deed.enCC0Creative Commons Zero, Public Domain Dedicationfalsefalse