PiDP-8/I Software

Changes To Demos in BASIC
Log In
Next Previous

Changes to "Demos in BASIC" between 2020-10-27 17:42:16 and 2020-10-27 17:49:06

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

1
2
3
4
5
6
7
8
9
10
11
12
13

14

15
16

17
18
19
20
21
22
23
24














-

-


-
+








These demos in BASIC can be found in the OS/8 RK05 system packs in the `RKB0:` partition.

Many of them were ported to OS/8 BASIC by DEC employee Kay R. Fisher.  Most were published in the DEC publication, *101 BASIC Computer Games*. That book describes itself as follows:

>It is the first collection of games all in BASIC. It is also the only collection that contains both a complete listing and a sample run of each game along with a descriptive write-up.

The first printing was in 1973.  A quite readable preserved version of the 1975 edition can be [found online][book]. If a demo is from this book, it is designated `-101-` instead of `-----` below.  If the demo is from the book, there will be a page or two of useful lore, and a sample run is provided.

[book]: http://bitsavers.trailing-edge.com/pdf/dec/_Books/101_BASIC_Computer_Games_Mar75.pdf

| File name | Src | Description
| ---------- | --- | ------------
| `BINGO .BA` | `-101-` | Computer generates bingo card for you and itself and randomly calls out numbers at random. |
| ---------- | --- | ----------------------------------------------------------------------------
| `BLKJAC.BA` | `-101-` | Play the card game of 21 against the computer.
| ---------- | --- | ------------
| `BLKJAK.BA` | `-101-` | Version of Blackjack written for PDP-8 Edusystem 30 BASIC by Tom Kloos, Oregon MuseUm of Science and Industry.
| `BUNNY .BA` | `-101-` | Prints the Playboy rabbit as typewriter art.
| `CALNDR.BA` | `-101-` | Perpetual calendar program, by Geoffrey Chase, OSB, Portsmouth Abbey School.  You must modify line 160 to name the day of the week for January 1 of your year.  (0 for Sunday, -1 for Monday, etc.).  You also need to modify lines 360 and 620 for leap years: Change the number 365 on line 360 to 366, and change the third element of the array in line 620 from 28 to 29.
| `CALNDR.BA` | `-101-` | Perpetual calendar program, by Geoffrey Chase, OSB, Portsmouth Abbey School.  [Usage Notes](#calndr)
| `CHECKR.BA` | `-101-` | Written by Alan J. Segal. Play checkers against the computer.
| `CRAPS .BA` |  `-----`  | The dice game of craps.  Surprisingly it's not the version from *101 BASIC Computer Games*.
| `DICE  .BA` | `-101-` | Simulates rolling of dice, and prints the distribution of values returned.
| `FOOTBL.BA` | `-101-` | The first of two football simulations found in *101 BASIC Computer Games*.
| `FOTBAL.BA` | `-101-` | The second of two football simulations found in *101 BASIC Computer Games*. Written by Raymond W. Miseyka, Butler Sr. High School, Butler, PA.
| `GOLF  .BA` | `-----` | A not so great golf simulation.  The one in *101 BASIC Computer Games* looks a lot better.
| `HELLO .BA` | `-101-` | Simple conversation program where Petey P. Eight gives advice.
︙
40
41
42
43
44
45
46





47
48
49
50
51
52
53
54
55
56
57

38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60








+
+
+
+
+












| `TICTAC.BA` | `-----` | Play tic-tac-toe with the computer.  Simple version.  Thought lost.  Recovered from [Dave Gesswein's Archive][dgw-tictac].
| `WAR   .BA` | `-101-` | Play the game of war against the computer.  Was thought lost.  Recovered from [Dave Gesswein's Archive](). However, that port to OS/8 BASIC contained a bug and could never run.  Line 230 defines the array for the cards. In OS/8 BASIC the maximum string size needed to be specified, as well as the number of strings.  230 DIM A$(52,3),L(54) will not accomodate the 10-value card.  The 3 needed to be a 4.  Program fixed and run-tested.
| `WAR2  .BA` | `-101-` | Written by Bob Dores, Milton, MA. A battle with 72,000 soldiers you deploy to Army, Navy, and Air Force against the computer.
| `WEKDAY.BA` | `-101-` | Input a birth date and learn fun facts like how many years have been spent sleeping in the elapsed time.  Written by Tom Kloos, Oregon Museum of Science and 'Industry.
| `WUMPUS.BA` | `-----` | Hunt the wumpus.
| `YAHTZE.BA` | `-101-` | Dice game of Yahtze.  Author unknown.  Quite an elaborate and comprehensive implementation.  

## Usage Notes

### <a id="calndr"></a>`CALNDR.BA`
You must modify line 160 to name the day of the week for January 1 of your year.  (0 for Sunday, -1 for Monday, etc.).  You also need to modify lines 360 and 620 for leap years:
Change the number 365 on line 360 to 366, and change the third element of the array in line 620 from 28 to 29.

## License

Copyright © 2017 by Bill Cattey. This document is licensed under the terms of [the SIMH license][sl].
[cpm-src]: https://amaus.org/static/S100/MESSAGE%20BOARDS/CPM%20Users%20Group/cpmug020/POKER.BAS
[dgw-rocket]: http://www.pdp8online.com/pdp8cgi/os8_html/ROCKET.BA?act=file;fn=images/os8/diag-games-kermit.rk05;to=ascii;blk=561,9,1;plain=1
[dgw-rockt1]: http://www.pdp8online.com/pdp8cgi/os8_html/ROCKT1.BA?act=file;fn=images/os8/diag-games-kermit.rk05;to=ascii;blk=570,8,1;plain=1
[dgw-roulet]: http://www.pdp8online.com/pdp8cgi/os8_html/ROULET.BA?act=file;fn=images/os8/diag-games-kermit.rk05;to=ascii;blk=578,17,1;plain=1
[dgw-tictac]: http://www.pdp8online.com/pdp8cgi/os8_html/TICTAC.BA?act=file;fn=images/os8/diag-games-kermit.rk05;to=ascii;blk=595,7,1;plain=1
[trailing-edge]: http://pdp-11.trailing-edge.com/rsts11/rsts-11-013/ROCKET.BAS
[sl]:   https://tangentsoft.com/pidp8i/doc/trunk/SIMH-LICENSE.md