In this case 15 is the PEN number, while 0 is the colour black, and 26 is the alternate colour bright
white.
Finally, it is possible to make the BORDER flash between two colours by adding an extra colour
number to the BORDER command. Type in:
border 6,9
[ENTER]
You will now see that the BORDER is flashing between bright red and green.
Now reset the computer [CTRL] [SHIFT] [ESC]
DEMONSTRATION PROGRAM
For further demonstration of the colours available, type in the following program, then run it.
We have included some sound in the program. This will be explained in a later section.
1 0 m o d e 0 : i n k 0 , 2 : i n k 1 , 2 4 : p a p e r 0 [ E N T E R ]
2 0 p e n 1 : f o r b = 0 t o 2 6 : b o r d e r b [ E N T E R ]
3 0 l o c a t e 3 , 1 2 : p r i n t ” B O R D E R C O L O U R ” ; B [ E N T E R ]
40 sound 4,(40-b) [ENTER]
5 0 f o r t = 1 t o 6 0 0 : n e x t t : n e x t b : c l s [ E N T E R ]
6 0 f o r p = 0 t o 1 5 : p a p e r p : p e n 5 : pr i n t “ p a p e r ” ;
p:print[ENTER]
7 0 f o r n = 0 t o 1 5 : p e n n : p r i n t “ p e n ” ; n [ E N T E R ]
8 0 s o u n d 1 , ( n * 2 0 + p ) [ E N T E R ]
9 0 f o r t = 1 t o 1 0 0 : n e x t t : n e x t n [ E N T E R ]
1 0 0 f o r t = 1 t o 1 0 0 0 : n e x t t : c l s : n e x t p [ E N T E R ]
1 1 0 c l s : p a p e r 0 : p e n 1 : l o c a t e 7 , 1 2 : p r i n t
“ T H E E N D ” : for t=1 to 2000: next t[ENTER]
1 2 0 m o d e 1 : b o r d e r 1 : i n k O , 1 : i n k 1 , 2 4 : p a p e r 0
pen 1 [ENTER]
run [ENTER]
Содержание CPC464
Страница 1: ......
Страница 32: ...or you can type 3e1 1e1 ENTER 300 2 3000x1000 Type 3e3 1e3 ENTER 3000000 3 3000x0 001 Type 3e3 1e 3 ENTER 3 ...
Страница 102: ...PRINT 10 AND 12 Results in 8 PRINT 10 AND 1000 Results in 8 again ...
Страница 118: ...TO DO DRAW THIS PAGE ...
Страница 219: ...actual value may be made to vary during the execution of a program ...
Страница 240: ...Text and WINDOW planner Mode 2 80 Columns ...
Страница 241: ......
Страница 245: ...Sound envelope Music planner sheet ...