Page 2 of 7

Re: A 15.999K Adventure game: The Valley of adventure.

Posted: Fri Aug 31, 2018 12:02 am
by Lardo Boffin
Randomly I got a copy of this poster with some other stuff a while back.

FE3F6C4D-819D-4C8A-A56B-66CD65A88763.jpeg

I am fairly sure the picture on the back had no bearing on my decision to keep this. :D

00293B70-9223-4B64-B2D1-3B2A8B27D48E.jpeg

I could have sworn that it also came with the page with the fixes but I cannot find that at the moment.

Re: A 15.999K Adventure game: The Valley of adventure.

Posted: Mon Sep 03, 2018 4:21 pm
by Lardo Boffin
Just remembered what I did with the page of corrections. There was a very nice Omega watch ad on the back which I donated to a friend who collects such things. :oops:

[TYPE-ins] Poster Program issue 2: TestMatch.

Posted: Tue Dec 13, 2022 4:37 am
by XavSnap
[TYPE-ins] Poster Program issue 2: TestMatch.

PosterPrograms02-1.jpg

OCR had to be checked.

Re: A 15.999K Adventure game: The Valley of adventure.

Posted: Wed Dec 14, 2022 7:20 am
by XavSnap
Hi,

Something's wrong...
Issue 1: bugged.
Issue 2: bugged ?

Is there any issue #3 ?
:mrgreen:
[EDIT] Oops!
sinclair-zx81-poster-programs-posters_360_83de30e903c070f82c1b9d2c61407c10.jpg
http://www.zx81stuff.org.uk/zx81/book/PosterPrograms3

Code: Select all

2 REM [HEX:\
14,63,ED,63,28,64,\
47,64,8C,63,BA,63,\
00,63,04,63,BD,62,\
D7,62,74,63,04,05,\
06,07,03,08,02,09,\
01,0B,0A,0B,03,01,\
06,00,00,FD,64,03,\
0F,02,09,30,21,08,\
00,06,0A,00,9E,00,\
00,00,01,00,00,00,\
00,CD,BB,02,2C,20,\
FA,CD,BB,02,44,4D,\
51,14,28,F7,CD,BD,\
07,7E,C9,06,0B,11,\
82,40,1A,6F,13,1A,\
67,36,34,13,10,F6,\
C9,2A,32,40,54,5D,\
29,29,12,29,29,29,\
19,22,32,40,7C,90,\
30,FD,80,3C,C9,06,\
20,2A,A9,40,36,00,\
23,10,FB,C9,06,00,\
18,02,06,01,2A,10,\
40,0E,06,09,ED,5B,\
A9,40,4E,23,06,00,\
FE,01,20,03,ED,B0,\
C9,09,23,23,23,23,\
3D,18,ED,21,C9,48,\
3E,01,CD,10,41,21,\
00,00,2B,7C,B5,20,\
FB,C9,2A,0C,40,23,\
36,07,06,1E,23,36,\
03,10,FB,23,36,84,\
06,15,23,23,36,05,\
11,1F,00,19,36,85,\
10,F4,23,23,36,82,\
06,1E,23,36,83,10,\
FB,23,36,81,23,23,\
22,A9,40,2A,0C,40,\
01,70,01,09,36,85,\
01,16,00,09,36,05,\
23,AF,ED,42,36,3D,\
2B,2B,09,36,3D,23,\
23,C9,00,00,00,00,\
CD,36,41,36,17,E5,\
CD,BF,40,E1,FE,38,\
CA,66,42,FE,35,28,\
59,F5,7E,FE,34,28,\
02,36,00,F1,FE,21,\
20,0D,2B,7E,FE,34,\
28,71,FE,00,28,3E,\
23,18,3B,FE,22,20,\
12,01,21,00,09,7E,\
FE,34,28,5D,FE,00,\
28,2A,AF,ED,42,18,\
25,FE,23,20,12,01,\
21,00,AF,ED,42,7E,\
FE,34,28,45,FE,00,\
28,12,09,18,0F,FE,\
24,20,0B,23,7F,FE,\
34,28,34,FE,00,28,\
01,2B,36,17,18,99,\
36,34,3A,A8,40,FE,\
00,28,07,3D,32,A8,\
40,F1,18,07,3A,A7,\
40,3C,32,A7,40,01,\
82,40,FE,01,20,08,\
7D,02,03,7C,02,C3,\
46,42,03,03,3D,18,\
EF,36,17,3E,01,F5,\
01,82,40,0A,5F,03,\
0A,57,EB,AF,ED,52,\
20,0B,EB,3A,A8,40,\
3C,32,A8,40,C3,8F,\
41,EB,F1,3C,F5,03,\
18,E3,3A,A7,40,FE,\
0B,C2,8F,41,3D,32,\
A7,40,36,17,E5,3E,\
01,21,EA,48,CD,10,\
41,CD,2F,41,CD,F9,\
40,C3,90,41,3A,A7,\
40,FE,0A,C2,8F,41,\
3A,98,40,FE,00,C2,\
E4,42,06,0B,21,98,\
40,C5,E5,06,0B,CD,\
E3,40,47,21,B0,40,\
23,10,FD,57,7E,FE,\
00,20,EE,3E,01,77,\
E1,C1,72,23,10,E3,\
06,0B,21,B0,40,36,\
00,23,10,FB,11,A3,\
40,06,04,D5,21,08,\
49,C5,3E,01,CD,10,\
41,E5,CD,BF,40,A7,\
FE,28,38,1F,CD,27,\
41,CD,F9,40,21,08,\
49,3E,01,CD,10,41,\
E1,C1,78,FE,04,20,\
04,C5,E5,18,DF,2B,\
2B,2B,2B,18,D2,E1,\
C1,D1,D6,1C,12,13,\
\
D5,10,C8,D1,2A,0C,\
40,01,D6,02,3E,17,\
ED,B1,20,03,2B,36,\
00,CD,18,47,21,2E,\
49,06,03,C5,3E,01,\
CD,10,41,E5,CD,2F,\
41,E1,C1,10,F2,CD,\
BF,40,F5,CD,F9,40,\
F1,FE,32,20,06,2A,\
96,40,C3,54,42,FE,\
27,CA,A2,42,FE,38,\
CA,7B,47,FE,35,20,\
CD,3A,AB,40,47,FE,\
03,20,03,AF,18,01,\
3C,32,AB,40,78,21,\
A3,40,FE,00,28,04,\
23,3D,18,F8,7E,CD,\
9E,43,F5,CD,04,41,\
EB,23,36,39,23,36,\
34,13,1A,47,13,13,\
1A,23,E5,CD,BE,43,\
32,B3,40,3A,B1,40,\
FE,00,20,0B,2A,98,\
40,22,AD,40,3C,3C,\
32,B1,40,3A,B2,40,\
FE,00,20,05,3A,AD,\
40,18,03,3A,AE,40,\
2A,10,40,01,06,00,\
09,D1,13,F5,CD,14,\
41,7E,23,23,23,47,\
7E,CD,BE,43,32,B4,\
40,C3,F0,43,F5,01,\
82,40,3D,FE,00,28,\
04,02,03,18,F7,ED,\
5B,96,40,0A,6F,03,\
0A,67,22,96,40,7A,\
02,7B,0B,02,F1,C9,\
A7,B8,38,0D,C5,F5,\
06,03,CD,E3,40,FE,\
01,F1,C1,20,01,78,\
C9,E5,D5,C5,3E,9B,\
32,30,40,CD,62,0B,\
21,00,07,CD,32,41,\
3E,A0,32,30,40,C1,\
C5,CD,B2,0B,C1,D1,\
E1,C9,3A,B2,40,FE,\
00,28,05,01,32,16,\
18,03,01,0B,16,11,\
02,13,CD,D1,43,0C,\
15,20,F9,05,16,13,\
1D,20,F3,D1,F1,F5,\
D5,C5,CD,04,41,21,\
86,49,3E,01,CD,14,\
41,2A,10,40,01,06,\
02,09,3A,B3,40,F5,\
CD,14,41,F1,47,CD,\
E3,40,FE,01,CA,CA,\
44,F5,47,CD,E3,40,\
47,F1,80,F5,06,0A,\
CD,E3,40,57,D5,06,\
0A,CD,E3,40,D1,5F,\
D5,06,02,CD,E3,40,\
FE,01,20,07,3E,05,\
32,C0,44,18,05,3E,\
04,32,C0,44,3A,B2,\
40,FE,00,28,07,3E,\
0C,32,B9,44,18,05,\
3E,0D,32,B9,44,D1,\
E1,C1,6A,E5,D5,C5,\
79,A7,1F,57,78,A7,\
1F,5F,3E,15,93,6F,\
26,00,06,05,29,10,\
FD,82,4F,06,00,09,\
ED,4B,0C,40,09,23,\
01,21,00,09,7E,FE,\
83,CA,DF,45,A7,ED,\
42,7E,FE,00,28,07,\
FE,34,23,68,C3,DF,\
45,C1,CD,D1,43,0C,\
D1,15,20,BE,E1,55,\
05,1D,20,B7,25,20,\
B4,C3,E7,45,2A,0C,\
40,3A,B2,40,FE,00,\
28,05,01,4E,01,18,\
03,01,66,01,09,C1,\
E5,21,B3,40,7E,23,\
A7,BE,38,03,06,04,\
18,02,06,09,CD,E3,\
40,A7,FE,03,DA,5F,\
45,2A,0C,40,3A,B2,\
40,FE,01,28,05,01,\
87,01,18,03,01,6D,\
01,09,06,03,7E,FE,\
34,20,02,18,0B,23,\
10,F6,E1,C3,E7,45,\
C1,C1,C1,E5,CD,CE,\
46,C5,CD,F9,40,C1,\
79,CD,04,41,D5,23,\
23,7E,47,23,7E,CD,\
BE,43,47,3A,B4,40,\
A7,B8,38,04,06,09,\
18,02,06,04,CD,E3,\
40,D1,F5,21,8F,49,\
3E,01,CD,14,41,F1,\
A7,FE,03,30,04,C6,\
02,18,06,C2,E6,45,\
C3,59,46,D1,F5,21,\
A0,49,13,01,06,04,\
1A,FE,00,20,04,ED,\
A0,10,F7,D5,CD,2F,\
41,E1,06,04,2B,7E,\
FE,34,28,04,36,00,\
10,F6,CD,F9,40,06,\
03,CD,E3,40,FE,01,\
20,0B,3E,01,21,A4,\
49,CD,10,41,C3,59,\
46,3E,01,21,AC,49,\
CD,10,41,F1,2A,10,\
40,01,94,02,09,CD,\
14,41,3A,B1,40,FE,\
0B,20,04,C1,C1,00,\
C9,3C,32,B1,40,21,\
97,40,47,23,10,FD,\
7E,47,3A,B2,40,FE,\
00,78,20,09,32,AD,\
40,AF,32,AF,40,18,\
07,32,AE,40,AF,32,\
B0,40,C3,5A,46,C1,\
C1,C1,3E,04,18,03,\
C1,3E,01,F5,21,B8,\
40,7E,FE,00,28,06,\
AF,77,2B,77,2B,77,\
3A,B2,40,FE,00,20,\
05,21,AF,40,18,03,\
21,B0,40,ED,5B,B6,\
40,F1,FE,01,28,09,\
06,04,E5,D5,CD,E3,\
40,D1,E1,47,34,13,\
10,FC,ED,53,B6,40,\
47,F1,F5,D5,C5,F5,\
CD,2F,41,CD,F9,40,\
F1,CD,08,41,21,B1,\
49,3E,01,CD,14,41,\
F1,C6,1C,12,D1,CB,\
47,28,17,2A,AD,40,\
7D,6C,67,22,AD,40,\
2A,AF,40,7D,6C,67,\
22,AF,40,18,03,C1,\
C1,C1,C1,F1,F5,CD,\
9E,43,CD,11,4A,3A,\
B9,40,3C,FE,06,28,\
07,32,B9,40,F1,C3,\
45,43,AF,32,B9,40,\
3A,AC,40,3C,32,AC,\
40,3A,B2,40,FE,00,\
28,03,3D,18,01,3C,\
32,B2,40,3E,01,21,\
B8,49,CD,10,41,3A,\
BA,40,FE,00,C2,02,\
4C,06,64,CD,E3,40,\
6F,26,01,ED,4B,B6,\
40,A7,ED,42,30,05,\
F1,01,01,00,C9,CD,\
2F,41,CD,F9,40,F1,\
CD,E8,46,3A,B2,40,\
FE,00,20,04,3E,0C,\
18,02,3E,0D,32,05,\
44,C3,F6,42,01,01,\
0B,11,82,40,C5,1A,\
4F,13,1A,47,A7,ED,\
42,28,07,09,C1,0C,\
13,10,EF,C9,C1,C9,\
2A,0C,40,01,6C,01,\
09,06,20,7E,FE,34,\
28,05,23,10,F8,18,\
1D,CD,CE,46,3A,B2,\
40,2A,0C,40,FE,00,\
28,05,01,6F,01,18,\
03,01,87,01,09,36,\
34,7C,12,1B,7D,12,\
2A,0C,40,3A,B2,40,\
FE,00,20,05,01,6F,\
01,18,03,01,87,01,\
09,36,17,22,96,40,\
C9,78,B1,20,03,36,\
9C,C9,CD,5E,47,FE,\
A6,28,07,77,0B,78,\
B1,20,F3,C9,2B,CD,\
5E,47,FE,A6,28,03,\
77,18,08,36,9C,2B,\
CD,5E,47,77,23,23,\
3E,9C,18,E1,7E,FE,\
80,20,02,C6,1C,3C,\
C9,01,D5,02,2A,0C,\
40,23,7E,FE,78,28,\
02,36,00,0B,78,B1,\
20,F3,C9,21,74,47,\
36,80,CD,67,47,01,\
0D,01,CD,F5,08,11,\
C2,49,01,05,00,CD,\
6B,0B,01,01,05,CD,\
F5,08,11,C7,49,D5,\
\
01,07,00,C5,CD,6B,\
0B,01,15,05,CD,F5,\
08,C1,D1,CD,6B,0B,\
01,0E,06,CD,F5,08,\
11,CE,49,01,03,00,\
C5,CD,6B,0B,01,0E,\
0A,CD,F5,08,11,D1,\
49,C1,CD,6B,0B,01,\
02,0D,CD,F5,08,11,\
D4,49,01,05,00,CD,\
6B,0B,01,15,0D,CD,\
F5,08,11,D9,49,01,\
06,00,CD,6B,0B,01,\
06,10,CD,F5,08,01,\
04,00,3A,BA,40,FE,\
01,28,05,11,DF,49,\
18,03,11,E3,49,CD,\
6B,0B,11,E7,49,01,\
0D,00,CD,6B,0B,2A,\
0C,40,01,74,00,09,\
E5,ED,48,B6,40,CD,\
31,47,E1,01,3C,00,\
09,E5,3A,AE,40,4F,\
CD,31,47,E1,01,14,\
00,09,E5,3A,AD,40,\
4F,CD,31,47,E1,01,\
2A,00,09,E5,3A,B0,\
40,4F,CD,31,47,E1,\
01,14,00,09,E5,3A,\
AF,40,4F,CD,31,47,\
E1,01,16,00,09,E5,\
3A,B1,40,D6,02,4F,\
CD,31,47,E1,01,A0,\
00,09,E5,3A,AC,40,\
4F,CD,31,47,E1,01,\
13,00,09,E5,3A,AB,\
40,3C,4F,CD,31,47,\
E1,01,58,00,09,E5,\
ED,4B,0E,4A,CD,31,\
47,E1,01,08,00,09,\
3A,10,4A,4F,CD,31,\
47,CD,F9,40,21,F4,\
49,3E,01,CD,10,41,\
CD,BF,40,FE,2A,20,\
04,01,00,00,C9,FE,\
28,20,F1,21,74,47,\
36,00,CD,67,47,CD,\
38,41,CD,D3,40,CD,\
E8,46,3A,BA,40,FE,\
00,CA,F6,42,C3,06,\
4C,20,2E,33,3B,26,\
31,2E,29,00,2A,33,\
39,37,3E,0E,35,31,\
2A,26,38,2A,00,37,\
2A,16,2A,33,39,2A,\
37,00,00,00,1D,26,\
31,31,00,38,2A,39,\
0E,37,2A,35,34,38,\
2E,39,2E,34,33,00,\
34,37,00,35,37,2A,\
38,38,00,38,19,1D,\
38,39,00,27,34,3C,\
31,2A,37,00,10,2A,\
33,39,2A,37,00,1D,\
00,39,34,00,27,11,\
03,1E,33,29,03,1F,\
37,29,03,20,39,2D,\
1B,28,2D,34,34,38,\
2A,00,39,34,00,32,\
34,3B,2A,00,2B,2E,\
2A,31,29,2A,37,38,\
00,10,32,11,1C,28,\
2D,26,33,2C,2A,00,\
39,2D,2A,00,27,34,\
3C,31,2E,33,2C,00,\
34,37,29,2A,37,00,\
10,27,11,1E,38,2A,\
2A,00,38,28,34,37,\
2A,27,34,26,37,29,\
00,10,38,11,1A,34,\
37,00,35,31,26,3E,\
00,10,35,11,08,00,\
27,34,3C,31,38,00,\
26,10,00,2B,2E,2A,\
31,29,38,00,39,2D,\
2A,00,27,26,31,31,\
3C,3F,26,39,07,33,\
34,39,00,34,3A,39,\
04,34,3A,32,CE,0E,\
00,37,3A,33,38,00,\
09,33,2A,3D,39,00,\
34,3B,2A,37,B9,B4,\
B9,A6,B1,A7,A6,B9,\
B8,B2,A6,B3,AB,B4,\
B7,BC,B0,B8,B4,BB,\
AA,B7,B8,A7,B4,BC,\
B1,AA,B7,AD,B4,B2,\
AA,A6,BC,A6,BE,80,\
B9,AA,A6,B2,80,80,\
80,80,80,AB,B4,B7,\
19,35,37,2A,38,38,\
\
00,10,28,11,34,33,\
39,2E,33,3A,2A,00,\
34,37,00,10,2A,11,\
33,29,83,00,0A,CD,\
2F,41,CD,F9,40,C9,\
2A,B6,40,22,0E,4A,\
3A,B1,40,3D,32,10,\
4A,21,A7,40,06,16,\
36,00,23,10,FB,3E,\
01,32,BA,40,32,B2,\
40,32,05,41,AF,32,\
09,41,CD,28,4B,CD,\
38,41,CD,D2,4A,11,\
3B,4B,21,98,40,06,\
0B,C5,E5,EB,3E,01,\
CD,10,41,E5,CD,BF,\
40,A7,FE,28,38,03,\
C3,BF,4B,FE,1C,28,\
F9,21,3C,40,D6,1C,\
F5,47,23,10,FD,7E,\
FE,00,28,03,F1,18,\
E7,3C,77,F1,D1,E1,\
77,23,C1,10,CC,06,\
04,CD,E3,40,FE,01,\
20,03,CD,D2,4A,06,\
0A,CD,E3,40,FE,01,\
20,03,CD,28,4B,00,\
CD,E8,46,3A,B2,40,\
FE,00,20,04,3E,0C,\
18,02,3E,0D,32,05,\
44,CD,2F,41,CD,F9,\
40,21,7B,4B,3E,01,\
CD,10,41,CD,BF,40,\
FE,35,CA,06,4C,FE,\
38,CA,7B,47,FE,29,\
20,EF,CD,B2,4B,C9,\
2A,0C,40,06,17,23,\
7E,FE,76,20,04,10,\
F8,18,08,FE,34,20,\
F2,36,00,18,EE,06,\
0B,21,9C,4B,C5,4E,\
23,46,23,E5,2A,0C,\
40,09,E5,06,02,CD,\
E3,40,F5,06,02,CD,\
E3,40,F1,FE,01,01,\
28,04,83,5F,18,04,\
47,7B,90,5F,E1,C1,\
C5,E5,21,80,40,23,\
23,10,FC,73,23,72,\
E1,C1,10,CA,CD,E9,\
4B,C9,06,04,21,A3,\
40,C5,E5,06,0B,CD,\
E3,40,E1,77,23,C1,\
10,F3,C9,1B,00,1D,\
38,39,00,27,26,39,\
38,32,26,33,00,10,\
2A,33,39,2A,37,00,\
1D,00,39,34,00,27,\
11,04,00,1E,33,29,\
04,00,1F,37,29,04,\
00,20,39,2D,02,00,\
21,02,00,22,02,00,\
23,02,00,24,02,00,\
25,02,1D,1C,02,1D,\
1D,20,35,37,2A,38,\
38,10,38,11,28,34,\
37,2A,38,1A,10,35,\
11,31,26,3E,00,34,\
37,10,29,11,2A,28,\
31,26,37,2A,87,01,\
D0,00,B6,00,FD,00,\
F9,01,B3,01,6F,01,\
40,02,24,02,E6,01,\
10,01,3E,01,32,09,\
41,AF,32,05,41,01,\
01,00,C9,CD,27,41,\
CD,F9,40,21,3B,4B,\
3E,01,CD,10,41,E1,\
D1,F1,F5,D5,E5,FE,\
0B,28,0F,A7,FE,08,\
38,02,2B,2B,2B,2B,\
2B,3E,01,CD,10,41,\
C3,58,4A,2A,0C,40,\
01,6F,01,09,22,8A,\
40,01,18,00,09,22,\
96,40,CD,D3,40,AF,\
32,87,43,C9,F1,C3,\
83,4A,CD,F9,40,C3,\
\
29,43,2A,B6,40,22,\
\
0E,4A,3A,B1,40,3D,\
32,10,4A,21,82,40,\
06,3C,36,00,23,10,\
FB,3E,01,32,09,41,\
32,87,43,AF,32,05,\
41,3E,0C,32,05,44,\
C9,1B,1B,1B,1B,1B,\
00,00,00,00,00,00,00,00,\
00,00,00,00,00,00,00,00,\
00,00,00,00,00,00,00,00,\
00,00,00,00,00,00 ]
3 REM 
100 CLEAR
200 PRINT AT 0,10;"test«match"
400 DIM E$(250)
410 DIM D$(250)
415 DIM M$(200)
420 DIM C$(32)
430 LET T$=""
440 LET F=0
450 LET R$="@CF(X+@40*6)"
460 LET M$(1 TO )="\
¿ SLOW BALL1234\
¼ YORKER12341\
½ BOUNCER1234\
¿ FAST BALL1234\
½ GOOGLIE1234\
¾ LEG SPIN1234\
¿ FAST BALL1234\
¾N INSWING1234\
¿N CHINAMPN1234\
£N OFF BREAK 1234\
»BOULED1234\
»L.B.W.1234\
»CAUGHT1234\
¼RUN OUT1234"
470 GOTO 900
500 LET X=1
510 LET T=VAL R$
520 LET O$=("AUSTRALIA" AND T<3)+("PAKISTAN" AND T=3)+("INDIA" AND T=4)+("W.INDIES" AND T>4)
530 LET F$="ENGLAND"
540 RETURN
600 LET I$=INKEY$
610 IF I$="" THEN GOTO 600
620 RETURN
900 PRINT AT 5,0;"\
DO YOU WANT TO CHOOSE THE TWO   \
TEAMS THAT WILL PLAY ? (Y OR N)"
910 GOSUB 600
920 CLS
930 IF I$="N" THEN GOTO 990
935 IF I$<>"Y" THEN GOTO 900
940 PRINT ,,"YOUR TEAM IS ?"
945 INPUT F$
950 PRINT F$
955 PRINT ,,"PLAYING AGAINST ?"
960 INPUT O$
970 GOTO 1000
990 GOSUB 500 
1000 CLS 
1010 PRINT F$;" ÀVÀ ";O$ 
1020 PRINT AT 3,0;"NAME ";F$;" PLAYERS" 
1030 FOR I=1 TO 11 
1040 PRINT AT 4,0;"PLAYER NO.";I;"  NAME ?" 
1050 INPUT N$ 
1060 PRINT AT 4,13;N$;"  " 
1070 LET N$=CHR$ (LEN N$)+N$ 
1080 IF F=1 THEN GOTO 1180 
1090 PRINT ,,"SELECTED FOR: 1.BATTING" 
1100 PRINT TAB 14;"2.BOWLING" 
1110 PRINT TAB 14;"3.FIELDING" 
1120 PRINT TAB 14;"4.ALL ROUNDER"
1130 PRINT ,,,,TAB 6;" INPUT NUMBER 1 TO 4"
1140 GOSUB 600
1150 IF CODE I$>26 AND CODE I$<33 THEN GOTO 1175
1160 PRINT AT 10,0;"PLEASE RE-ENTER number«˜«to«›"
1170 GOTO 1140
1175 LET N=VAL I$
1180 FOR J=1 TO 4
1190 IF F=1 THEN LET N=INT (1+RND*4)
1200 LET X=1+4*(J=N)
1205 LET Y=VAL R$
1210 LET N$=N$+CHR$ Y
1220 NEXT J 
1230 LET T$=T$+N$
1240 FOR J=3 TO 11
1250 PRINT AT J,0;C$
1260 NEXT J
1270 NEXT I
1280 IF F=1 THEN GOTO 1450
1290 LET E$(1 TO )=T$
1300 PRINT AT 3,4;"DO YOU WANT TO NAME THE"
1310 PRINT TAB 4;O$;" PLAYERS ? (Y OR N)"
1320 GOSUB 600 
1330 IF I$="N" THEN GOTO 1400
1340 IF I$<>"Y" THEN GOTO 1320
1345 PRINT AT 3,0;C$;AT 4,0;C$
1350 PRINT AT 3,0;O$;" TEAM"
1360 LET F=1
1370 LET T$="" 
1380 GOTO 1030
1400 LET I$="ABCOBACOCADODIGAEFN\
AFICAGOLAHOTIINGOJOPPKANO"
1405 LET F=1
1410 LET T$=""
1420 PRINT AT 18,0;"SELECTING ";O$;("ÀS" AND O$(1)<>"W")+" TEAM"
1430 FOR I=1 TO 44 STEP 4
1440 LET N$="¹"+I$(I TO I+3)
1445 GOTO 1180 
1450 LET D$(1 TO )=T$
1460 LET T$=""
1470 LET N$=""
1500 CLS
1510 PRINT TAB 6;"CALL HEADS OR TAILS"
1520 PRINT TAB 9;"(PRESS H OR T)"
1530 GOSUB 600
1540 IF I$="H" OR I$="T" THEN GOTO 1560
1550 GOTO 1530
1560 PRINT TAB 14;I$
1570 PRINT AT 8,14;"®"
1580 PRINT TAB 13;"» ±"
1590 PRINT TAB 12;"°   º"
1600 PRINT TAB 13;"± »"
1610 PRINT TAB 14;"¸"
1615 LET N=INT (1+RND*2)
1620 FOR I=1 TO 20
1630 PRINT AT 10,14:"H"
1635 LET C=RND*RND
1640 PRINT AT 10,14;"T"
1650 NEXT I
1655 PRINT AT 10,14;("H" AND N=1)+("T" AND N=2)
1660 LET C=0
1663 LET TA=0
1664 LET TH=0
1667 LET L=0
1668 LET M=0
1670 IF (I$="H" AND N=1) OR (I$="T" AND N=2) THEN LET C=1
1680 PRINT AT 14,10;"YOU "+("WON" AND C=1)+("LOSE" AND C=0)
1690 IF C=0 THEN GOTO 1770
1700 PRINT ,,TAB 6;"CHOOSE TO BAT OR FIELD"
1710 PRINT TAB 10; "PRESS B OR F"
1720 GOSUB 600
1730 IF I$="B" THEN GOTO 3000
1740 IF I$="F" THEN GOTO 2000
1750 GOTO 1720
1770 LET R=RND 
1780 PRINT ,,TAB 10;"WE "+("BAT" AND R>=.5)+("FIELD" AND R<.5)
1785 FOR I=1 TO 20
1787 NEXT I
1790 IF R<.5 THEN GOTO 3000 
2000 CLS 
2010 PRINT AT 0,6;F$;" ÀVÀ ";O$
2020 PRINT ,,"\
  MOVE THE * BY THE ARROW KEYS  \
PRESS ÀPÀ TO PLACE A FIELDER"
2030 PRINT "\
(FIELDERS ARE O,BATS MEN X AND  \
THE BOWLER IS *)"
2040 PRINT ,,"\
  ONCE 10 MEN ARE POSITIONED    \
(11TH MAN TAKES BOWLING POS.)   \
 PRESS ÀSÀ AND THEN ENTER YOUR BOWLING ORDER."

2050 PRINT ,,"\
  AFTER EACH OVER YOU CAN CHANGE\
THE POSITIONS OR BOWLING ORDER"

2055 PRINT ,,"\
  TO REPOSITION,MOVE THE * OVER \
THE MAN (O) THEN MOVE THE * TO  \
THE NEW PLACE."
2060 PRINT AT 21,0;"PRESS newline"
2070 INPUT I$
2075 CLS
2076 PRINT ,,"\
IF YOU POSITION LESS THAN 10 MEN\
(DUE TO PRESSING P TWICE IN THE \
SAME POSITION),THEN AFTER YOU   \
ENTER 4 BOWLERS,PRESS S AND THEN\
PPES5 E. PRESS BREAK AND TYPE   \
  GOTO 2000,NEWLINE."
2077 PRINT AT 21,0;"PRESS newline"
2078 INPUT I$
2079 CLS  
2080 IF TH=0 THEN POKE 16561,1
2085 IF TH=0 THEN POKE 16566,0
2086 IF TH=0 THEN POKE 16567,0
2090 IF M=1 THEN POKE 16561,PEEK 16561-1
2100 LET X=USR 19468
2110 LET L=USR 16778
2120 LET TA=1
2130 IF L=0 THEN GOTO 5000
2140 LET AS=PEEK 16566+256*PEEK 16567
2150 LET AW=PEEK 16561-(L<>1)-(2 AND L=1)
2160 IF TH=1 THEN GOTO 4000
2170 CLS
2180 PRINT AT 5,0;O$;" SCORED ";AS;" FOR ";AW
2190 IF L=1 THEN PRINT AT 6,10;"(DECLARED)"
2200 PRINT AT 21,0;"PRESS newline"
2210 INPUT I$
3000 CLS
3010 PRINT TAB 6;F$;" ÀVÀ ";O$
3020 PRINT ,,"\
  ENTER YOUR BATTING ORDER WHEN \
ASKED AND THEN WATCH YOUR TEAM  \
PLAY"
3030 PRINT AT 21,0;"PRESS newline" 
3040 INPUT I$
3050 IF L=1 THEN POKE 16561,PEEK 16561-1
3055 IF TA=0 THEN POKE 16566,0
3056 IF TA=0 THEN POKE 16567,0
3060 IF TA=0 THEN POKE 16561,1
3065 CLS 
3070 LET M=USR 18968
3080 LET TH=1
3090 IF M=0 THEN GOTO 5000
3100 LET HS=PEEK 16566+256*PEEK 16567
3110 LET HW=PEEK 16561-(M<>1)-(2 AND M=1)
3120 IF TA=1 THEN GOTO 4000
3130 PRINT AT 5,0;F$;" SCORED ",HS;" FOR ";HW
3140 IF M=1 THEN PRINT AT 6,10;"(DECLARED)"
3150 PRINT AT 21,0;"PRESS newline"
3160 INPUT I$
3170 GOTO 2000
4000 CLS 
4010 PRINT F$ 
4020 PRINT AT 2,0,HS;" FOR ";HW
4030 PRINT AT 11,0;O$ 
4040 PRINT AT 13,0;AS;" FOR ";AW 
4050 PRINT AT 20,0;(O$ AND AS>HS);(F$ AND HS>AS);" WIN BY ";ABS (AS-HS);" RUNS"
4060 PRINT AT 5,16;"O";AT 6,15;"·¬¹";AT 7,16; "·º";AT 8,15;" ·¶ " 
4070 LET V=0
4080 FOR I=12 TO 16
4090 PRINT AT V,I;"."
4100 LET V=V+1
4110 PRINT AT V-1,I;" "
4120 NEXT I
4130 PRINT AT 5,16;" ";AT 6,15;" O ";AT 7,16;"°º";AT 8,15;"ª¬¼¹"
4140 PRINT AT 4,16;" ";AT 3,17;".";AT 3,17;" ";AT 2,18;".";AT 2,18;" "
4150 FOR I=6 TO 50
4160 NEXT I
4170 GOTO 4060
5010 FOR I=1 TO 20 
5020 PRINT AT I,8;"GAME ABANDONED"
5030 LET X=RND
5040 PRINT AT I,0;C$
5050 NEXT I
5060 GOTO 5010 
PRN0032.jpg
https://archive.org/details/zxspectrum- ... 2/mode/2up
https://archive.org/details/poster-prog ... rograms02/

[edit] BASIC OCR ERRORS FIXED/ASM NOT CHECKED.
Note: AT=TA and HT=TH. (to avoid compiler jam)

Re: A 15.999K Adventure game: The Valley of adventure.

Posted: Tue Dec 20, 2022 1:02 am
by David G
Paul Panks wrote: Tue Jul 01, 2008 11:00 pmI would like to hear more about this adventure. It sounds interesting. What type of game is it? Is it a text adventure? What is the general gameplay like?

Paul
It looks like hybrid graphics/text adventure:

SAMPLE DISPLAYS - The Valley of Adventure
SAMPLE DISPLAYS - The Valley of Adventure

Unfortunately I can't get it to work even after typing in Xavsnap's fixes. Line 560 fix shows a syntax error
XavSnap wrote: Tue Jul 01, 2008 4:53 pm 3045 if F<=R-K-H then goto 3051
3050 LET F=INT (((R-K-H)*RND)+ H1)

When RUN it prompts "CONTINUE Y/N". Press N to begin

550 LET XR= (...)+H1
560 Print at (...) ; "MONSTER FOOD" AND XR=0;"PEASANT" AND XR=0; (...)

Re: A 15.999K Adventure game: The Valley of adventure.

Posted: Tue Dec 20, 2022 10:57 pm
by David G
Ah, this text from the The Valley of Adventure poster explains it:
Enter the following [variables] .... Once you have the program itself in, you must NEVER start the game with RUN, use GOTO 10 all the time. RUN will clear out the variable space and you will lose these quantities, with the result that the game will not work.

Poster Program is a neat idea and The Valley of Adventure only cost £0.6. I guess that was 60 pence, and at the 1982 exchange rate would have been $1.05 USD. Very inexpensive for a program and you got a poster to hang on the wall!

I had never heard of a Poster Program before ... or at least never paid any attention to it. From the attached images I can see it was folded like a map with a cover panel.


A slightly clearer version of poster is here: ZX Computing Magazine Poster Programs #1

The poster contains
  • description of game
  • instructions for entering the program
  • screenshots
  • how to SAVE & start the game
  • how to play the game

It is a type-in program. The text on the poster says that entering the program is "a three part operation":
  • 1. enter the machine code
  • 2. at the command line, enter the variables
  • 3. type in the BASIC program proper

Re: A 15.999K Adventure game: The Valley of adventure.

Posted: Wed Dec 21, 2022 7:42 am
by David G
Valley.P file from the free.fr webpage has the "corrections" from "Poster problems?"s in ZX Computing Magazine February-March 1983 page 47 -- except this one:
In addition change line 3040 to read 3040 LET F = USR 16985
Also the P file does not incorprate Xavsnap's bug fixes.


Xav, is this your changes for improved Ratings display?
from
550 LET XR=INT (.067*(EX+TS/B)**(H/H1)+LN (EX/((TN+H)**(B/H1))))
to
550 LET XR=INT (.067*(EX+TS/B)**(H/H1)+LN (EX/((TN+H)**(B/H1))))+H1

and from
560 PRINT AT R-H,O;S$;AT R-H,K;"[inverse:YOUR RATING IS] ";XR
to
560 PRINT AT R-H,O;S$;"MONSTER FOOD" AND XR=0;"PEASANT" AND XR=0;AT R-H,K;"[inverse:YOUR RATING IS] ";XR

Game play: The Valley of adventure.

Posted: Wed Dec 21, 2022 10:56 am
by David G
After LOAD "valley", type GOTO 10
when prompted, enter a play name

The map is drawn randomly
O player
W woods
S swamps
T Black Tower (Zaexon's Tower)
. path (safe area)
+ Safe Castle

megu.png

Caution: You start in a Safe Castle (in the west border of the Valley). If you press '4' to go West, it distorts the map, doesn't draw your player character ('O') and eventually crashes (bug). So don't move beyond the Border!


Direction keys are based on 10-key pad. If you move only along the path, you won't be attacked
7 8 9
4 5 6
1 2 3

(If attacked, see the direction on the poster)

When you get to the Tower:
dimic.png
O player (randomly placed)
X exit
= staircase

Problem: This map is fixed by Z$, but many times the player is stuck in a room with no exit. And yes, Z$ matches the poster. Is this a bug? When you go up a level in the tower, it appears to be random layout, not fixed by Z$

Re: A 15.999K Adventure game: The Valley of adventure.

Posted: Thu Dec 22, 2022 6:56 am
by XavSnap
Hi David,

Many thanks for your work!
I have many releases of this game on my hard disk, and i start to change the wrong one...

I had to debug the last one... (2016)

Re: A 15.999K Adventure game: The Valley of adventure.

Posted: Thu Dec 22, 2022 7:03 am
by XavSnap
Xav, is this your changes for improved Ratings display?
:roll:
Don't know, it seem to work without with...