File DONALD.BA (BASIC source file)

Directory of image this file is from
This file as a plain text file

    KKKKK"
270PRINT TAB(Z);"DDD  DDD  UUU  UUU  CCC  CCC  KKKKKK"
280PRINT TAB(Z);"DDDDDDD    UUUUUU    CCCCCC   KKK KKK"
290PRINT TAB(Z);"DDDDDD      UUUU      CCCC    KKK  KKK"
300 PRINT\PRINT\PRINT
505 PRINT TAB(52);"++++"
510PRINT"             ++++                              ++++++++++++++"
515PRINT"        ++++++++++++++++                  ++++++++++++++++++++++"
520PRINT"     ++++++++++++++++++++++++++      ++++++++++++++++++++++++++++"
525PRINT"    +++++++++++++++++++++++++++++++###+++++++++++++++++++++++++++"
530PRINT"   +++++++++++++++++++++++++++++++++++###+++++++++++++++++++++++++"
535PRINT"   ++++++++++++++++++++++++++++++++++++++#####++++++++++++++++++++"
540PRINT"  +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++"
545PRINT"  +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++"
550PRINT"  +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++"
555PRINT"  ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++"
560PRINT"   ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++"
565PRINT"  ##++++++++++++++++++++++++++++++++++++++++++++++++++++++++"
570PRINT"  ### ++++++++++++++++++++++++++++++++++++++++++++++++++++"
575PRINT" ####    +++++++++++...................+++++++++++++"
580PRINT" #####          .......   ................  ........"
585PRINT"######         ......        ...........      ......"
590PRINT"######         .....     ##   .........        ......"
595PRINT"######        .....     ####   .......    ###   ....."
600PRINT"#######       .....    ######  ......    #####  ....."
605PRINT"### ###       .....   ######## ......   ####### ....."
610PRINT"###  ##       .....   ######## ......   ####### ....."
615PRINT"###   #      .....    ######## ......   ####### ....."
620PRINT"##           .....    ######## ......   ####### ....."
625PRINT"##           .....    ######## ......   ####### ....."
630PRINT"#            .....    ######## ......   ####### ....."
635PRINT"             .....    ######## ......   ####### ....."
640PRINT"             .....    ######## ......   ####### ....."
645PRINT"     !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!"
650PRINT"  !!!!!!!!!!!!!!!!!!!!!!!!!!!!#!!!!!!#!!!!!!!!!!!!!!!!!!!!!!!!!!!"
655PRINT"==!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!=="
660PRINT"!!==============================================#########========!!"
665PRINT" !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!#######!!!!!!!!!!"
670PRINT"   !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!#######!!!!!!!!"
675PRINT"        !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!#####!!!!"
680PRINT TAB(29);"...........           #####"
685PRINT TAB(30);".........             ###"
690PRINT TAB(31);".......              ###"
695PRINT TAB(31);".......               #"
700PRINT TAB (32);"....."
705PRINT TAB(32);"....."
710PRINT TAB (32);"....."
715 PRINT"          B.S.   FEB.76       ......."
720PRINT TAB(30);"........."
2000 END
10 REM  PROGRAM AUTHOR - MARK MANASSE, HANOVER,N.H. 03755
20 REM  TRANSLATED TO OS8 BASIC BY KAY R. FISHER ...DEC
30 PRINT "CAN-AM...OS8 VERSION."
40 PRINT\PRINT"DO YOU WISH INSTRUCTIONS (YES OR NO)";
45 DIM Q$(3,13)\Q$(1)="WILDMAN WILLY"\Q$(2)="HOTSHOT HARRY"
46 DIM E(4),L(4),A$(22)
47 Q$(3)="SLOW-POKE SAM"
50 INPUT A$
60 IF A$="NO" GOTO700
70 IF A$="YES" GOTO85
80 PRINT"PLEASE RESPOND 'YES OR NO'"\GOTO 40
85 PRINT"THE INSTRUCTIONS ARE LONGER THAN THE SCREEN CAN HANDLE."
86 PRINT"BE SURE THAT THE AUTO-PRINT IS TURNED ON BEFORE CONTINUING."
87 PRINT"TO CONTINUE, TYPE <CR>.";\INPUT Q9
100 PRINT"DESCRIPTION -- THE PROGRAM ALLOWS YOU TO RACE AROUND A HIGHLY"
110 PRINT"PERILOUS COURSE, RISKING BOTH LIFE AND MACHINE, IN AN"
120 PRINT"EFFORT TO RACE THE COMPUTER'S VERY OWN"
130 PRINT Q$(1);", ";Q$(2);", AND ";Q$(3);"."
135 PRINT"CAR#1          CAR#2              CAR#3"
140 PRINT\PRINT"INSTRUCTIONS--"
150 PRINT"YOU ARE ABOUT TO RACE ON ONE OF THE FASTEST COURSES"
160 PRINT"IN THE WORLD. A ROAD COURSE. A LONG ONE. 5.3 MILES. SPEEDS"
170 PRINT"UP TO 200 MPH."
180 PRINT\PRINT"WHEN THE COMPUTER TYPES A QUESTION OF THE FORM



Feel free to contact me, David Gesswein djg@pdp8online.com with any questions, comments on the web site, or if you have related equipment, documentation, software etc. you are willing to part with.  I am interested in anything PDP-8 related, computers, peripherals used with them, DEC or third party, or documentation. 

PDP-8 Home Page   PDP-8 Site Map   PDP-8 Site Search