1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
10 REM PC-BASIC test
20 REM LOCATE syntax and allowed ranges
30 OPEN "OUTPUT.TXT" FOR OUTPUT AS 1
40 ON ERROR GOTO 10000
50 LOCATE
60 LOCATE 1
62 LOCATE 1,
64 LOCATE 1,2
66 LOCATE 1,2,
68 LOCATE 1,2,3
70 LOCATE 1,2,3,
72 LOCATE 1,2,3,4
74 LOCATE 1,2,3,4,5
76 LOCATE 1,2,3,4,5,
78 LOCATE 1,2,3,4,5,6
80 LOCATE ,2
82 LOCATE ,2,
84 LOCATE ,2,3
86 LOCATE ,2,3,
88 LOCATE ,2,3,4
90 LOCATE ,2,3,4,5
92 LOCATE ,2,3,4,5,
94 LOCATE ,2,3,4,5,6
100 LOCATE ,
102 LOCATE ,,
104 LOCATE ,,3
106 LOCATE ,,3,
108 LOCATE ,,3,4
110 LOCATE ,,3,4,5
112 LOCATE ,,3,4,5,
114 LOCATE ,,3,4,5,6
120 LOCATE ,,,
122 LOCATE ,,,4
124 LOCATE ,,,4,5
126 LOCATE ,,,4,5,
128 LOCATE ,,,4,5,6
130 LOCATE ,,,,5
132 LOCATE ,,,,5,
134 LOCATE ,,,,5,6
140 LOCATE ,,,,,6
150 LOCATE ,,,,,
900 LOCATE 24, 10
910 KEY OFF: LOCATE 25, 10
920 KEY ON: LOCATE 25,10
930 LOCATE 10, 80
940 LOCATE 10, 81
950 LOCATE 0, 0
960 LOCATE -1, -1
970 LOCATE 1, 1, -1
980 LOCATE 1, 1, 32768
990 LOCATE 1, 1, 256
1000 LOCATE 1, 1, 32
1100 LOCATE 32768
1110 LOCATE 65536
1120 LOCATE -1
1200 LOCATE 32768, 10
1210 LOCATE 65536, 10
1220 LOCATE -1, 10
1230 LOCATE 10, -1
1240 LOCATE 10, 32768
1250 LOCATE 10, 65536
10000 PRINT#1, ERR, ERL
10010 RESUME NEXT
|
