I tried to code a tuto to show a "simple" code to display several text pages…
But, at the 9th page, the screen is BLACK on EO !
What's wrong doctor ?
(Text instructions from Super Star Trek (Kamurta))
Things in advance for help...
Basic code: (32k patch removed > use a 16k RAM pack)
Code: Select all
0 REM [HEX:\
21,00,C0,22,04,40,2B,36,\
3E,2B,F9,11,76,06,D5,2B,\
2B,22,02,40,CF,FF ]
# REM FROM THE BOOK
# *BASIC COMPUTER GAMES*
0 REM [HEX:\
00,00,00,00,00,2B,37,34,\
32,00,39,2D,2A,00,27,34,\
34,30,00,00,00,00,00,00,\
00,00,00,00,00,00,00,00,\
97,A7,A6,B8,AE,A8,80,A8,\
B4,B2,B5,BA,B9,AA,B7,80,\
AC,A6,B2,AA,B8,97,00,00,\
00,00,00,00,00,00,00,00,\
00,00,00,00,27,3E,00,29,\
26,3B,2E,29,00,2D,00,26,\
2D,31,00,00,00,00,00,00,\
00,00,00,3F,3D,24,1D,00,\
3B,2A,37,38,2E,34,33,0E,\
00,30,2A,31,31,3E,00,26,\
1B,00,32,3A,37,39,26 ]
# REM
0 REM [HEX:\
76,83,83,83,83,83,83,83,\
83,83,83,83,83,83,83,83,\
83,83,83,83,83,83,83,83,\
83,83,83,83,83,83,83,83,\
83,76,80,80,80,85,02,05,\
07,83,81,04,81,87,06,05,\
80,85,86,83,82,87,05,07,\
83,84,02,05,07,83,81,80,\
80,80,76,80,80,80,85,85,\
04,80,83,84,05,80,87,85,\
05,80,85,85,80,80,85,05,\
05,80,85,85,04,80,83,84,\
80,80,80,76,80,80,80,81,\
81,82,82,83,80,82,80,81,\
82,80,83,80,82,83,80,81,\
82,80,83,80,81,82,82,83,\
80,80,80,80,76,76,76,76,\
76,35,37,2A,38,38,00,39,\
2D,2A,00,33,2A,3C,31,2E,\
33,2A,00,39,34,00,39,3A,\
37,33,00,39,2D,2A,\
76,35,26,2C,2A,38,1B,\
00,39,34,00,2C,34,00,39,\
34,00,26,00,38,35,2A,28,\
2E,2B,2E,28,00,35,26,2C,\
2A,1A,76,35,37,2A,38,38,\
00,39,2D,2A,00,35,26,2C,\
2A,00,33,3A,32,27,2A,37,\
00,37,2A,36,3A,2E,37,2A,\
29,1B,76,76,39,2D,2A,\
37,2A,00,26,37,2A,00,25,\
00,35,26,2C,2A,38,00,39,\
34,00,39,2D,2A,38,2A,76,2E,33,\
38,39,37,3A,28,39,2E,34,\
33,38,1B,76,76,\
26,39,00,26,33,3E,00,39,\
2E,32,2A,1A,00,35,37,2A,\
38,38,00,0B,2F,0B,00,39,\
34,00,31,34,26,29,\
76,39,2D,2A,00,2C,26,32,\
2A,1B,76,76,76,76,76,76,76,\
97,97,97,97,97,97,97,80,\
B8,BA,B5,AA,B7,80,B8,B9,\
A6,B7,80,B9,B7,AA,B0,80,\
97,97,97,97,97,97,97,97,\
76,80,80,80,80,80,80,80,\
80,80,80,AE,B3,B8,B9,B7,\
BA,A8,B9,AE,B4,B3,B8,80,\
80,80,80,80,80,80,80,80,\
80,76,76,76,1D,1B,3C,2D,\
2A,33,00,3E,34,3A,00,38,\
2A,2A,00,A8,B4,B2,B2,A6,\
B3,A9,92,00,35,37,2E,33,\
39,2A,29,1A,76,00,00,2A,\
33,39,2A,37,00,34,33,2A,\
00,34,2B,00,39,2D,2A,00,\
31,2A,2C,26,31,76,00,00,\
28,34,32,32,26,33,29,38,\
00,10,33,26,3B,1A,38,37,\
38,1A,31,37,38,1A,35,2D,\
26,1A,39,34,37,1A,76,00,\
00,38,2D,2A,1A,29,26,32,\
1A,28,34,32,1A,00,34,37,\
00,3D,3D,3D,11,1B,76,\
76,1E,1B,2E,2B,00,3E,34,\
3A,00,38,2D,34,3A,31,29,\
00,39,3E,35,2A,00,2E,33,\
00,26,33,00,2E,31,31,2A,\
16,76,00,00,2C,26,31,00,\
28,34,32,32,26,33,29,1A,\
00,3E,34,3A,0B,31,31,00,\
2C,2A,39,00,26,76,00,00,38,2D,34,\
37,39,00,31,2E,38,39,00,\
34,2B,00,39,2D,2A,00,31,\
2A,2C,26,31,76,00,00,28,34,\
32,32,26,33,29,38,00,35,\
37,2E,33,39,2A,29,00,34,\
3A,39,1B,76,76,1F,1B,\
38,34,32,2A,00,28,34,32,\
32,26,33,29,38,00,37,2A,\
36,3A,2E,37,2A,00,3E,34,\
3A,00,39,34,76,00,\
00,2A,33,39,2A,37,00,29,\
26,39,26,00,10,2B,34,37,\
00,2A,3D,26,32,35,31,2A,\
1A,00,39,2D,2A,76,\
00,00,0B,33,26,3B,0B,00,\
28,34,32,32,26,33,29,00,\
28,34,32,2A,38,00,27,26,\
28,30,00,3C,2E,39,2D,\
76,00,00,0B,28,34,3A,37,\
38,2A,00,10,1D,16,25,11,\
0F,0B,1B,11,00,00,2E,2B,\
00,3E,34,3A,76,00,00,39,3E,35,2A,\
00,2E,33,00,2E,31,31,2A,\
2C,26,31,00,29,26,39,26,\
00,10,31,2E,30,2A,76,00,00,33,2A,2C,\
26,39,2E,3B,2A,00,33,3A,\
32,27,2A,37,38,11,1A,00,\
39,2D,26,33,76,00,00,28,34,\
32,32,26,33,29,00,3C,2E,\
31,31,00,27,2A,00,26,27,\
34,37,39,2A,29,1B,76,76,76,76,\
80,80,80,80,80,80,80,80,\
80,80,80,80,80,B5,A6,AC,\
AA,80,9D,80,80,80,80,80,\
80,80,80,80,80,80,80,80,\
76,80,80,80,80,80,80,80,\
80,80,80,AE,B3,B8,B9,B7,\
BA,A8,B9,AE,B4,B3,B8,80,\
80,80,80,80,80,80,80,80,\
80,76,76,00,00,39,2D,2A,\
00,2C,26,31,26,3D,3E,00,\
2E,38,00,29,2E,3B,2E,29,\
2A,29,00,2E,33,39,34,00,\
26,33,76,24,00,3D,00,\
24,00,36,3A,26,29,37,26,\
33,39,00,2C,37,2E,29,1A,\
00,26,33,29,00,2A,26,28,\
2D,76,36,3A,26,\
29,37,26,33,39,00,2E,38,\
00,2B,3A,37,39,2D,2A,37,\
00,29,2E,3B,2E,29,2A,29,\
00,2E,33,39,34,76,26,33,\
00,24,00,3D,00,24,00,38,\
2A,28,39,34,37,00,2C,37,\
2E,29,1B,76,76,\
00,00,3E,34,3A,00,3C,2E,\
31,31,00,27,2A,00,26,38,\
38,2E,2C,33,2A,29,00,26,\
00,38,39,26,37,39,16,00,\
76,2E,33,2C,00,35,34,2E,\
33,39,00,38,34,32,2A,3C,\
2D,2A,37,2A,00,2E,33,00,\
39,2D,2A,00,2C,26,31,16,\
76,26,3D,3E,00,39,34,\
00,27,2A,2C,2E,33,00,26,\
00,39,34,3A,37,00,34,2B,\
00,29,3A,39,3E,00,26,38,\
76,28,34,32,26,33,\
29,2A,37,00,34,2B,00,39,\
2D,2A,00,38,39,26,37,38,\
2D,2E,35,76,2A,33,39,2A,\
37,35,37,2E,38,2A,1B,00,\
3E,34,3A,37,00,32,2E,38,\
38,2E,34,33,0E,00,39,34,\
76,38,2A,2A,\
30,00,26,33,29,00,29,2A,\
38,39,37,34,3E,00,39,2D,\
2A,00,2B,31,2A,2A,39,00,\
34,2B,76,30,31,\
2E,33,2C,34,33,00,3C,26,\
37,3C,2D,2E,35,38,00,3C,\
2D,2E,28,2D,00,26,37,2A,\
76,32,\
2A,33,26,28,2E,33,2C,00,\
39,2D,2A,00,3A,33,2E,39,\
2A,29,00,2B,2A,29,2A,37,\
26,39,2E,34,33,76,\
34,2B,00,00,35,31,26,33,\
2A,39,38,1B,\
76,76,00,00,3E,34,3A,00,\
2D,26,3B,2A,00,39,2D,2A,\
00,2B,34,31,31,34,3C,2E,\
33,2C,00,28,34,32,16,\
76,32,26,33,29,38,\
00,26,3B,26,2E,31,26,27,\
31,2A,00,39,34,00,3E,34,\
3A,00,26,38,76,28,26,35,39,\
26,2E,33,00,34,2B,00,39,\
2D,2A,00,38,39,26,37,38,\
2D,2E,35,76,2A,33,39,\
2A,37,35,37,2E,38,2A,0E,\
76,76,76,\
80,80,80,80,80,80,80,80,\
80,80,80,80,80,B5,A6,AC,\
AA,80,9E,80,80,80,80,80,\
80,80,80,80,80,80,80,80,\
76,00,00,00,00,00,00,00,\
00,00,00,00,00,00,00,00,\
76,80,80,80,80,80,80,80,\
80,80,80,AE,B3,B8,B9,B7,\
BA,A8,B9,AE,B4,B3,B8,80,\
80,80,80,80,80,80,80,80,\
80,76,76,B3,A6,BB,00,14,\
00,3C,26,37,35,00,2A,33,\
2C,2E,33,2A,00,28,34,33,\
39,37,34,31,76,76,00,00,00,\
28,34,3A,37,38,2A,00,2E,\
38,00,2E,33,00,26,00,28,\
2E,37,28,3A,31,26,37,00,\
A0,80,9F,80,9E,76,00,00,\
00,33,3A,32,2A,37,2E,28,\
26,31,00,00,3B,2A,28,39,\
34,37,00,00,26,37,16,00,\
00,80,9B,8E,9B,80,76,00,\
00,00,37,26,33,2C,2A,32,\
2A,33,39,00,26,38,00,38,\
2D,34,3C,33,1B,00,00,00,\
00,00,A1,96,97,96,9D,76,\
00,00,00,2E,33,39,2A,2C,\
2A,37,00,26,33,29,00,37,\
2A,26,31,00,3B,26,31,3A,\
2A,38,00,80,9B,8E,9B,80,\
76,00,00,00,32,26,3E,00,\
27,2A,00,3A,38,2A,29,1B,\
00,00,10,39,2D,3A,38,00,\
00,00,00,00,A2,80,A3,80,\
A4,76,00,00,00,28,34,3A,\
37,38,2A,00,1D,1B,21,00,\
2E,38,00,2D,26,31,2B,16,\
3C,26,3E,76,00,00,00,27,2A,\
39,3C,2A,2A,33,00,1D,00,\
26,33,29,00,1E,1B,11,76,76,00,00,00,\
3B,26,31,3A,2A,38,00,32,\
26,3E,00,26,35,35,37,34,\
26,28,2D,00,25,1B,1C,1A,\
76,00,00,\
00,3C,2D,2E,28,2D,00,2E,\
39,38,2A,31,2B,00,2E,38,\
00,2A,36,3A,2E,3B,26,31,\
2A,33,39,76,00,\
00,00,39,34,00,1D,1B,1C,\
76,\
76,00,00,00,34,33,2A,00,\
3C,26,37,35,00,2B,26,28,\
39,34,37,00,2E,38,00,39,\
2D,2A,00,38,2E,3F,2A,\
76,00,00,00,34,2B,00,\
34,33,2A,00,36,3A,26,29,\
37,26,33,39,1B,00,00,39,\
2D,2A,37,2A,2B,34,37,2A,\
1A,76,00,00,00,39,34,\
00,2C,2A,39,00,2B,37,34,\
32,00,36,3A,26,29,37,26,\
33,39,00,22,1A,21,00,39,\
34,76,00,00,00,21,\
1A,21,1A,00,3E,34,3A,00,\
3C,34,3A,31,29,00,3A,38,\
2A,00,28,34,3A,37,38,2A,\
00,1F,1A,76,00,00,00,\
3C,26,37,35,00,2B,26,28,\
39,34,37,00,1D,1B,76,76,76,\
80,80,80,80,80,80,80,80,\
80,80,80,80,80,B5,A6,AC,\
AA,80,9F,80,80,80,80,80,\
80,80,80,80,80,80,80,80,\
76,00,00,00,00,00,00,00,\
00,00,00,00,00,00,00,00,\
76,80,80,80,80,80,80,80,\
80,80,80,AE,B3,B8,B9,B7,\
BA,A8,B9,AE,B4,B3,B8,80,\
80,80,80,80,80,80,80,80,\
80,76,76,B8,B7,B8,00,14,\
00,38,2D,34,37,39,00,37,\
26,33,2C,2A,00,38,2A,33,\
38,34,37,00,38,28,26,33,\
76,76,00,00,00,\
38,2D,34,3C,38,00,3E,34,\
3A,00,26,00,38,28,26,33,\
00,34,2B,00,3E,34,3A,37,\
76,00,00,\
00,35,37,2A,38,2A,33,39,\
00,36,3A,26,29,37,26,33,\
39,1B,76,76,\
00,00,00,38,3E,32,27,34,\
31,34,2C,3E,00,34,33,00,\
3E,34,3A,37,00,38,2A,33,\
38,34,37,\
76,00,00,00,38,28,37,2A,\
2A,33,00,2E,38,00,26,38,\
00,2B,34,31,31,34,3C,38,\
0E,76,76,00,00,00,00,00,\
00,AA,00,14,00,2A,33,39,\
2A,37,35,37,2E,38,2A,00,\
35,34,38,2E,39,2E,34,33,\
76,00,00,00,00,\
00,00,B0,00,14,00,30,31,\
2E,33,2C,34,33,00,27,26,\
39,39,31,2A,00,28,37,3A,\
2E,38,2A,37,76,00,00,00,\
00,00,00,A7,00,14,00,2B,\
2A,29,2A,37,26,39,2E,34,\
33,00,38,39,26,37,27,26,\
38,2A,76,00,00,\
00,00,00,00,00,00,00,00,\
10,37,2A,2B,3A,2A,31,18,\
37,2A,35,26,2E,37,18,37,\
2A,16,26,37,32,76,00,\
00,00,00,00,00,00,00,00,\
00,00,2D,2A,37,2A,00,11,\
76,\
00,00,00,00,00,00,17,00,\
14,00,38,39,26,37,\
76,76,00,00,00,26,00,28,\
34,33,29,2A,33,38,2A,29,\
00,0B,38,39,26,39,3A,38,\
00,37,2A,35,34,37,39,0B,\
76,00,00,00,3C,2E,\
31,31,00,26,31,38,34,00,\
27,2A,00,35,37,2A,38,2A,\
33,39,2A,29,1B,76,76,76,76,76,\
80,80,80,80,80,80,80,80,\
80,80,80,80,80,B5,A6,AC,\
AA,80,A0,80,80,80,80,80,\
80,80,80,80,80,80,80,80,\
76,80,80,80,80,80,80,80,\
80,80,80,AE,B3,B8,B9,B7,\
BA,A8,B9,AE,B4,B3,B8,80,\
80,80,80,80,80,80,80,80,\
80,76,76,B1,B7,B8,00,14,\
00,31,34,33,2C,00,37,26,\
33,2C,2A,00,38,2A,33,38,\
34,37,00,38,28,26,33,\
76,76,00,00,00,\
38,2D,34,3C,38,00,28,34,\
33,29,2E,39,2E,34,33,38,\
00,2E,33,00,38,35,26,28,\
2A,00,2B,34,37,76,00,00,\
00,34,33,2A,00,36,3A,26,\
29,37,26,33,39,00,34,33,\
00,2A,26,28,2D,00,38,2E,\
29,2A,00,34,2B,76,00,\
00,00,39,2D,2A,00,2A,33,\
39,2A,37,35,37,2E,38,2A,\
00,10,3C,2D,2E,28,2D,00,\
2E,38,00,2E,33,76,\
00,00,00,39,2D,2A,00,32,\
2E,29,29,31,2A,00,34,2B,\
00,39,2D,2A,00,38,28,26,\
33,11,1B,\
76,76,00,00,00,39,2D,2A,\
00,38,28,26,33,00,2E,38,\
00,28,34,29,2A,29,00,2E,\
33,00,39,2D,2A,00,2B,34,\
37,32,76,00,00,00,0B,2D,\
39,3A,0B,1A,00,3C,2D,2A,\
37,2A,00,39,2D,2A,00,3A,\
33,2E,39,38,00,29,2E,2C,\
2E,39,76,00,00,00,2E,\
38,00,39,2D,2A,00,33,3A,\
32,27,2A,37,00,34,2B,00,\
38,39,26,37,38,1A,00,00,\
39,2D,2A,76,00,00,00,\
39,2A,33,38,00,29,2E,2C,\
2E,39,00,2E,38,00,39,2D,\
2A,00,33,3A,32,27,2A,37,\
00,00,34,2B,76,00,00,\
00,38,39,26,37,27,26,38,\
2A,38,1A,00,26,33,29,00,\
39,2D,2A,00,2D,3A,33,29,\
37,2A,29,38,76,00,\
00,00,29,2E,2C,2E,39,00,\
2E,38,00,39,2D,2A,00,33,\
3A,32,27,2A,37,00,34,2B,\
76,\
00,00,00,30,31,2E,33,2C,\
34,33,38,1B,\
76,76,00,00,00,2A,3D,26,\
32,35,31,2A,0E,00,1E,1C,\
23,00,14,00,1E,00,30,31,\
2E,33,2C,34,33,38,1A,\
76,00,00,00,33,34,\
00,38,39,26,37,27,26,38,\
2A,38,1A,00,23,00,38,39,\
26,37,38,1B,76,76,76,76,76,\
80,80,80,80,80,80,80,80,\
80,80,80,80,80,B5,A6,AC,\
AA,80,A1,80,80,80,80,80,\
80,80,80,80,80,80,80,80,\
76,80,80,80,80,80,80,80,\
80,80,80,AE,B3,B8,B9,B7,\
BA,A8,B9,AE,B4,B3,B8,80,\
80,80,80,80,80,80,80,80,\
80,76,76,B5,AD,A6,00,14,\
00,35,2D,26,38,2A,37,00,\
28,34,33,39,37,34,31,76,00,00,00,26,\
31,31,34,3C,38,00,3E,34,\
3A,00,39,34,00,29,2A,38,\
39,37,34,3E,00,39,2D,2A,\
76,00,00,00,\
30,31,2E,33,2C,34,33,00,\
27,26,39,39,31,2A,00,28,\
37,3A,2E,38,2A,37,38,00,\
27,3E,76,00,00,\
00,3F,26,35,35,2E,33,2C,\
00,39,2D,2A,32,00,3C,2E,\
39,2D,00,38,3A,2E,39,26,\
27,31,3E,76,00,\
00,00,31,26,37,2C,2A,00,\
3A,33,2E,39,38,00,34,2B,\
00,2A,33,2A,37,2C,3E,00,\
39,34,76,\
00,00,00,29,2A,35,31,2A,\
39,2A,00,39,2D,2A,2E,37,\
00,38,2D,2E,2A,31,29,00,\
35,34,3C,2A,37,1B,\
76,00,00,00,10,37,2A,32,\
2A,27,2A,37,1A,00,30,31,\
2E,33,2C,34,33,38,00,2D,\
26,3B,2A,76,00,00,00,00,35,2D,\
26,38,2A,37,38,00,39,34,\
34,00,11,76,76,B9,B4,B7,00,\
14,00,35,2D,34,39,34,33,\
00,39,34,37,35,2A,29,34,\
00,28,34,33,39,37,34,31,\
76,00,00,00,\
39,34,37,35,2A,29,34,00,\
28,34,3A,37,38,2A,00,2E,\
38,00,39,2D,2A,00,38,26,\
32,2A,00,26,38,76,00,00,\
00,3A,38,2A,29,00,2E,33,\
00,3C,26,37,35,00,2A,33,\
2C,2E,33,2A,00,28,34,33,\
39,37,34,31,1B,76,00,\
00,00,2E,2B,00,3E,34,3A,\
00,2D,2E,39,00,39,2D,2A,\
00,30,31,2E,33,2C,34,33,\
00,3B,2A,38,38,2A,31,76,\
00,00,00,2D,2A,00,2E,38,\
00,29,2A,38,39,37,34,3E,\
2A,29,00,26,33,29,00,28,\
26,33,33,34,39,\
76,00,00,00,2B,2E,37,2A,\
00,27,26,28,30,00,26,39,\
00,3E,34,3A,1B,00,00,2E,\
2B,00,3E,34,3A,76,00,00,00,32,2E,38,\
38,1A,00,3E,34,3A,00,26,\
37,2A,00,38,3A,27,2F,2A,\
28,39,00,39,34,00,2D,2E,\
38,76,00,00,00,35,2D,\
26,38,2A,37,00,2B,2E,37,\
2A,1B,00,2E,33,00,2A,2E,\
39,2D,2A,37,00,28,26,38,\
2A,1A,76,00,00,00,3E,\
34,3A,00,26,37,2A,00,26,\
31,38,34,00,38,3A,27,2F,\
2A,28,39,00,39,34,00,39,\
2D,2A,76,00,00,00,\
35,2D,26,38,2A,37,00,2B,\
2E,37,2A,00,34,2B,00,26,\
31,31,00,34,39,2D,2A,37,\
76,00,00,\
00,30,31,2E,33,2C,34,33,\
38,00,2E,33,00,39,2D,2A,\
00,36,3A,26,29,37,26,33,\
39,1B,76,76,\
80,80,80,80,80,80,80,80,\
80,80,80,80,80,B5,A6,AC,\
AA,80,A2,80,80,80,80,80,\
80,80,80,80,80,80,80,80,\
76,80,80,80,80,80,80,80,\
80,80,80,AE,B3,B8,B9,B7,\
BA,A8,B9,AE,B4,B3,B8,80,\
80,80,80,80,80,80,80,80,\
80,76,76,00,00,00,39,2D,\
2A,00,31,2E,27,37,26,37,\
3E,16,28,34,32,35,3A,39,\
2A,37,00,10,0B,28,34,32,\
0B,76,00,00,00,28,\
34,32,32,26,33,29,11,00,\
2D,26,38,00,26,33,00,34,\
35,39,2E,34,33,00,39,34,\
76,00,00,00,\
28,34,32,35,3A,39,2A,00,\
39,34,37,35,2A,29,34,00,\
39,37,26,2F,2A,28,39,34,\
37,3E,76,00,00,\
00,2B,34,37,00,3E,34,3A,\
00,10,34,35,39,2E,34,33,\
00,1E,11,76,76,\
B8,AD,AA,00,14,00,38,2D,\
2E,2A,31,29,00,28,34,33,\
39,37,34,31,\
76,00,00,00,29,2A,2B,2E,\
33,2A,38,00,39,2D,2A,00,\
33,3A,32,27,2A,37,00,34,\
2B,00,2A,33,2A,37,2C,3E,\
76,00,00,00,3A,33,2E,\
39,38,00,39,34,00,27,2A,\
00,26,38,38,2E,2C,33,2A,\
29,00,39,34,00,39,2D,2A,\
76,00,00,00,38,2D,\
2E,2A,31,29,38,1B,00,00,\
2A,33,2A,37,2C,3E,00,2E,\
38,00,39,26,30,2A,33,76,00,00,00,2B,\
37,34,32,00,39,34,39,26,\
31,00,38,2D,2E,35,0B,38,\
00,2A,33,2A,37,2C,3E,1B,\
76,00,00,00,\
33,34,39,2A,00,39,2D,26,\
33,00,39,2D,2A,00,38,39,\
26,39,3A,38,00,29,2E,38,\
35,31,26,3E,76,00,00,\
00,39,34,39,26,31,00,2A,\
33,2A,37,2C,3E,00,2E,33,\
28,31,3A,29,2A,38,00,38,\
2D,2E,2A,31,29,76,00,\
00,00,2A,33,2A,37,2C,3E,\
1B,76,\
76,A9,A6,B2,00,14,00,29,\
26,32,32,26,2C,2A,00,28,\
34,33,39,37,34,31,00,37,\
2A,35,34,37,39,76,00,00,00,2C,2E,3B,\
2A,38,00,39,2D,2A,00,38,\
39,26,39,2A,00,34,2B,00,\
37,2A,35,26,2E,37,00,34,\
2B,76,00,00,00,26,31,\
31,00,29,2A,3B,2E,28,2A,\
38,1B,00,00,3C,2D,2A,37,\
2A,00,26,00,33,2A,2C,26,\
16,76,00,00,00,39,\
2E,3B,2A,00,0B,38,39,26,\
39,2A,00,34,2B,00,37,2A,\
35,26,2E,37,0B,00,38,2D,\
34,3C,38,76,00,00,00,\
39,2D,26,39,00,39,2D,2A,\
00,29,2A,3B,2E,28,2A,00,\
2E,38,00,39,2A,32,35,34,\
37,26,37,16,76,00,00,\
00,2E,31,3E,00,29,26,32,\
26,2C,2A,29,1B,76,76,\
80,80,80,80,80,80,80,80,\
80,80,80,80,80,B5,A6,AC,\
AA,80,A3,80,80,80,80,80,\
80,80,80,80,80,80,80,80,\
76,80,80,80,80,80,80,80,\
80,80,80,AE,B3,B8,B9,B7,\
BA,A8,B9,AE,B4,B3,B8,80,\
80,80,80,80,80,80,80,80,\
80,76,76,A8,B4,B2,00,14,\
00,31,2E,27,37,26,37,3E,\
16,28,34,32,35,3A,39,2A,\
37,76,76,00,00,00,\
39,2D,2A,00,31,2E,27,37,\
26,37,3E,16,28,34,32,35,\
3A,39,2A,37,00,28,34,33,\
39,26,2E,33,38,76,00,00,\
00,38,2E,3D,00,34,35,39,\
2E,34,33,38,0E,76,76,\
00,00,00,1C,14,28,3A,32,\
3A,31,26,39,2E,3B,2A,00,\
2C,26,31,26,28,39,2E,28,\
00,37,2A,28,34,37,29,00,\
76,00,00,00,00,00,39,2D,\
2E,38,00,34,35,39,2E,34,\
33,00,38,2D,34,3C,2A,38,\
00,28,34,32,35,3A,39,2A,\
37,76,00,00,00,00,00,32,\
2A,32,34,37,3E,00,34,2B,\
00,39,2D,2A,00,37,2A,38,\
3A,31,39,38,00,34,2B,76,00,00,00,00,00,\
26,31,31,00,35,37,2A,3B,\
2E,34,3A,38,00,38,2D,34,\
37,39,00,26,33,29,76,00,00,00,00,\
00,31,34,33,2C,00,37,26,\
33,2C,2A,00,38,2A,33,38,\
34,37,00,38,28,26,33,38,\
76,00,00,00,\
1D,14,38,39,26,39,3A,38,\
00,37,2A,35,34,37,39,76,00,00,\
00,00,00,39,2D,2E,38,00,\
34,35,39,2E,34,33,00,38,\
2D,34,3C,38,00,39,2D,2A,\
00,33,3A,32,16,76,00,\
00,00,00,00,27,2A,37,00,\
34,2B,00,30,31,2E,33,2C,\
34,33,38,1A,00,38,39,26,\
37,29,26,39,2A,38,76,\
00,00,00,00,00,26,33,29,\
00,38,39,26,37,27,26,38,\
2A,38,00,37,2A,32,26,2E,\
33,2E,33,2C,00,2E,33,\
76,00,00,00,00,00,39,2D,\
2A,00,2C,26,32,2A,1B,76,00,00,00,1E,14,35,\
2D,34,39,34,33,00,39,34,\
37,35,2A,29,34,00,29,26,\
39,26,76,00,00,00,00,00,\
3C,2D,2E,28,2D,00,2C,2E,\
3B,2A,38,00,29,2E,37,2A,\
28,39,2E,34,33,38,00,26,\
33,29,76,00,00,00,00,\
00,29,2E,38,39,26,33,28,\
2A,00,00,2B,37,34,32,00,\
00,39,2D,2A,76,00,00,00,\
00,00,2A,33,39,2A,37,35,\
37,2E,38,2A,00,39,34,00,\
26,31,31,00,30,31,2E,33,\
2C,34,33,38,76,00,00,\
00,00,00,2E,33,00,3E,34,\
3A,37,00,36,3A,26,29,37,\
26,33,39,76,76,\
80,80,80,80,80,80,80,80,\
80,80,80,80,80,B5,A6,AC,\
AA,80,A4,80,80,80,80,80,\
80,80,80,80,80,80,80,80,\
76,80,80,80,80,80,80,80,\
80,80,80,AE,B3,B8,B9,B7,\
BA,A8,B9,AE,B4,B3,B8,80,\
80,80,80,80,80,80,80,80,\
80,76,76,00,00,00,1F,14,\
38,39,26,37,27,26,38,2A,\
00,33,26,3B,00,29,26,39,\
26,76,00,00,00,00,\
00,39,2D,2E,38,00,34,35,\
39,2E,34,33,00,2C,2E,3B,\
2A,38,00,29,2E,37,2A,28,\
39,2E,34,33,76,00,00,00,\
00,00,26,33,29,00,29,2E,\
38,39,26,33,28,2A,00,39,\
34,00,26,33,3E,00,38,39,\
26,37,16,76,00,00,\
00,00,00,27,26,38,2A,00,\
3C,2E,39,2D,2E,33,00,3E,\
34,3A,37,00,36,3A,26,29,\
37,26,33,39,76,00,\
00,00,20,14,29,2E,37,2A,\
28,39,2E,34,33,18,29,2E,\
38,39,00,28,26,31,28,3A,\
31,26,39,34,37,76,\
00,00,00,00,00,39,2D,2E,\
38,00,34,35,39,2E,34,33,\
00,26,31,31,34,3C,38,00,\
3E,34,3A,00,39,34,\
76,00,00,00,00,00,2A,33,\
39,2A,37,00,28,34,34,37,\
29,2E,33,26,39,2A,38,00,\
2B,34,37,76,00,00,00,00,00,29,\
2E,37,2A,28,39,2E,34,33,\
18,29,2E,38,39,26,33,28,\
2A,00,28,26,31,28,3A,31,\
26,16,76,00,00,00,00,00,\
39,2E,34,33,38,76,00,00,00,21,\
14,2C,26,31,26,28,39,2E,\
28,00,18,37,2A,2C,2E,34,\
33,00,33,26,32,2A,18,00,\
32,26,35,76,00,00,00,\
00,00,39,2D,2E,38,00,34,\
35,39,2E,34,33,00,35,37,\
2E,33,39,38,00,39,2D,2A,\
76,00,00,\
00,00,00,33,26,32,2A,38,\
00,34,2B,00,39,2D,2A,00,\
38,2E,3D,39,2A,2A,33,00,\
32,26,2F,34,37,76,00,\
00,00,00,00,2C,26,31,26,\
28,39,2E,28,00,37,2A,2C,\
2E,34,33,38,00,37,2A,2B,\
2A,37,37,2A,29,76,\
00,00,00,00,00,39,34,00,\
2E,33,00,39,2D,2A,00,2C,\
26,32,2A,1B,76,76,76,76,00,00,00,00,\
00,00,00,3C,2D,2A,33,00,\
3E,34,3A,0B,37,2A,00,37,\
2A,26,29,3E,1A,76,76,00,00,\
00,35,37,2A,38,38,00,0B,\
2F,0B,00,39,34,00,31,34,\
26,29,00,39,2D,2A,00,2C,\
26,32,2A,76,76,\
80,80,80,80,80,80,80,80,\
80,80,80,80,80,B5,A6,AC,\
AA,80,A5,80,80,80,80,80,\
80,80,80,80,80,80,80,80,\
76,76,76]
10 LET D$="16667170211752418071186091903219514201352070621267"
20 REM RAND USR 16514
30 LET E=PEEK 16396+256*PEEK 16397
40 POKE 16418,0
50 GOSUB 2000
100 FOR A=1 TO 10*5 STEP 5
110 LET F=VAL D$(A TO A+4)
120 GOSUB 5000
130 LET A$=INKEY$
140 IF A$="J" THEN GOTO 500
150 IF CODE A$=118 THEN NEXT A
160 IF A$>="1" AND A$<="9" THEN LET A= (VAL A$-1)*5+1
170 IF A$="" THEN GOTO 130
180 NEXT A
200 GOTO 100
500 LET F=E
510 GOSUB 5000
520 FOR Z=1 TO 250
530 NEXT Z
550 LOAD "SST"
1020 RETURN
2000 FOR Z=0 TO 1000
2010 IF INKEY$="" THEN NEXT Z
2020 RETURN
5000 POKE 16397,INT (F/256)
5010 POKE 16396,F-(INT (F/256)*256)
5020 RETURN
9000 SAVE "SSTI"
9999 GOTO 10