File DONALD.BA (BASIC source file)

Directory of image this file is from
This file as a plain text file
*3B03R7E* ****B*3P?R3GGR+MCM3V;O2 3C3ASU+ICA7G	E+ECR3USN2 WB3RSN2 OS3HGM3RWG3N?DR7F.JB53P	R7N3T3P	R7N3T3P	R7N3T3P	RN7T.JV92 WL3TF "=65.JB160KP7ISN2 GT3BF(*)J;3DSD3DSD* B * B 3O?O+OB 2 : +NCN2 ;N+NB 2 F 3AGA* B 2 3L+LB * B 2 R 3DSD+DKD.MFJ61B03R;I7TR +AB/A
)2"SD3DSD+DCD* B 3O?O3O?O* B 3N;N2 : +NCN2 F 3AGA+ACA2 2 +LCL* B * B 3DSD3DSDD6".JJ160KP7ISN2 GT3BF(*)J;3DSD2 R +DCD2 ?O+OB 3O?O2 : 3N;N2 ;N+NB 3AGA2 F +ACA2 3L+LB * B 2 R +DCD2 SDD6".JN160KP7ISN2 GT3BF(*)J;3DSD2 R +DCD2 ?O+OB 3O?O2 : 3N;N2 ;N+NB 3AGA2 F 
ACA2 3L+LB * B 2 R +DCD2 SDD6".JR160KP7ISN2 GT3BF(*)J;3DSD2 R +DCD2 ?O+OB 3O?O2 : 3N;N3N;N+NB 3AGA3AGA+ACA2 3L+LB * B 2 R +DCD2 SDD6".JV160KP7ISN2 GT3BF(*)J;3DSD2 R +DCD2 ?O+OB 3O?O2 : 3N;N3N;N+NB 3AGA3AGA+ACA2 3L+LB * B 2 R +DCD2 SDD6".JZ160KP7ISN2 GT3BF
*)J;3DSD2 R +DCD2 ?O+OB 3O?O2 : +NCN3N;N+NB 3AGA2 F +ACA2 3L+LB * B 2 R +DCD2 SDD6".J^160KP7ISN2 GT3BF(*)J;3DSD3DSD+DB 2 > 3O?O+OCO2 : +NCN3N;N+NB 3AGA2 F +ACA2 3L3L3L3L3L2 R 3DSD3DSD""*M.1B83P	R+NCT3TKA*(	A2;R"3DSD+DCD* B 2 > 3O?O* B 2 ;N+NB 3N;N2 F +ACA
 GA+AB 3L3L3L3L+LCL2 SD3DSDD6".J&160B 3R;I7TC\3R;IT*M.2B07LSE. 7Z"361.JF260KP7ISN2 GT7B*(*)J;3DSD3DSD* B 6 WU+UB 7UWU* B 2 OC+CCC* B 3K/K2 . +KKK.MJJ62B03R;I7TR +AB/Z.)2"SD3DSD+DCD6 V +UCU6 WU+UB 2 OC3COC+CB 2 /K3K. +KKK.MJJ63B03R;I7TR +AB/Z.)2"SD+DB 3DSD
 V +UCU6 WU+UB 3COC2 N +CCC2 /K3K/KK6".JR260KP7ISN2 GT7B*(*)J;3DSD2 R +DCD6 WU+UB 7UWU2 N +CCC* B * B 3K/K+KKK.MJJ65B03R;I7TR +AB/Z.)2"SD+DB 3DSD6 V +UCU6 WU+UB 3COC* B * B 2 /K+KKK.MJJ66B03R;I7TR +AB/Z.)2"SD+DB 3DSD6 V +UCU6 WU+UB 3COC* B * B 2 /K3K/K""*
.2B73P	R+NCT3TKA*(	Z2;R"+DCD2 SD+DB 7UWU6 V +UCU2 OC+CB 3COC2 . 3K/K+KKK.MJJ68B03R;I7TR +AB/Z.)2"SD3DSD+DCD* B 7UWU7UWU* B 2 OC3COC+CB 2 /K3K. +KKK.MJJ69B03R;I7TR +AB/Z.)2"SD3DSD+DB * B 6 WU+UCU* B 2 N 3COC* B 2 /K+KB 3K/K""*M.3B06 KP7ISN7\KP7ISN7\KP7ISN.
VJ*0B53P	R+NCT3TKA.(J5*)J;*+.+"+6".JF560KP7ISN*"B * B * B * B * . *+.+* B * B * B * B * B * B * B * B * B * B *+.+*+.+*+.+*+.+*+J+.MVJ61B53R;I+TB"* B * B * .+*+.+*+.+*+.+*+.+*+B+* B * B * B * B * B * . *+.+*+.+*+.+*+.+*+.+*+.+*+.+""*M.5B23P	R+NKT* B * . *
.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+B * B * .+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+J+.MVJ62B53R;I+TB"* B *+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+N*.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+"+6".JN560KP7ISN*"B * .+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*N*+.+*+.+*
.+*+.+*+.+*+.+*+.+*+.+"+6".JN565KP7ISN*"B * .+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*N*.*+.+*+.+*+.+*+.+*+.+*+.+"+6".JR560KP7ISN*"B *+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+J+.MVJ64B53R;I+TB"* .+*+.+*
.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+""*M.5B53P	R+NKT* . *+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+J+.MVJ65B53R;I+TB"* .+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*
.+*+.+*+.+*+.+*+.+*+.+*+.+""*M.5B63P	R+NKT* B *+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+"+6".JZ565KP7ISN*"B *.*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+"+6".J^560KP7ISN*"B *N* .+*+.+*+.+*+.+*
.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+.+*+J+.MVJ67B53R;I+TB"*N*B * . *+.+*+.+*+.+*+:.*.:.*.:.*.:.*.:.*.:.*...*+.+*+.+*+.+*+.+""*M.5B83P	R+NKT* N*N* B * B * B * :.*.:.*.B.* : *.:.*.:.*.:.*.:.*.:.* : *.:.*.:.".6".J"565KP7ISN*"N*N*B * B * B * :.*.:
*.B * B * B *.:.*.:.*.:.*.B.* B * : *.:.*.J..MVJ69B03R;I+TN"*N*B* B * B * : *.:.*.B * B *B* : *.:.*.:.*.B.* B * B * :.*.:.".6".J&565KP7ISN*"N*N*B * B * B *.:.*.B.* B * N*B* : *.:.*.:.* B * N*B * :.*.:.""*M.6B03P	R+NKT*N*N*B * B * : *.:.*.B * N *N*B* :.*.:
*.B * N *N*B *.:.*.J..MZJ60B53R;I+TN"*B*N* B * B * :.*.:.* B *N*N*B*.:.*.:.* B *N*N*: *.:.".6".JF660KP7ISN*"N*B *B* B * B *.:.*.B.* N *N*N*: *.:.*.B.* N *N*N* :.*.:.""*M.6V13P	R+NKT*N* B *B * B * :.*.:.* B * N*N*N* :.*.:.*.B * N*N*B*.:.*.J..MZJ62B03R;I+TN
*B * B * B * B *.:.*.B.* B *N*N*B*.:.*.:.* B *N*N*: *.:.".6".JJ665KP7ISN*"N* B * B * B * : *.:.*.B * N *N*N*: *.:.*.B.* N *N*N* :.*.:.""*M.6B33P	R+NKT*B * B * B * B * :.*.:.* B * N*N*N* :.*.:.*.B * N*N*B*.:.*.J..MZJ63B53R;I+TB"* B * B * B * B *.:.*.B.* B 
N*N*B*.:.*.:.* B *N*N*: *.:.".6".JR660KP7ISN*"B * B * B * B * : *.:.*.B * N *N*N*: *.:.*.B.* N *N*N* :.*.:.""*M.6V43P	R+NKT* B * F *!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!J!.MZJ65B03R;I+TB"* F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!
!F!*!N!*!F!*!F!*F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!"!6".JV665KP7ISN."6=*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*=J=.MZJ66B03R;I+TF".!6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=.=6=*=N=*N*N.6.=6=.=6=*=F
""*M.6V63P	R+NKT* F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!N*N*F*!F!*!F!*!F!""*M.6B73P	R+NKT* B *!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*!N*N*F*!F!*!F!"!6".J^665KP7ISN*"B * B * B *!F!*!F!*!F!*!F!*!F!*!F!*!F!*!F!*
F!*!F!*!F!*!F!*!F!*!F!*N*F*!F!""*M.6B83P	R+NCT3TKA.(&2*)J;*.:.*.:.*.:.*.B.* B * B * B * N*N""*M.6V83P	R+NCT3TKA.(B3*)J;*.:.*.:.*.:.* B * B * B * B * N"6".J&660KP7ISN2 GT/BN(.1.)*":.*.:.*.B.* B * B * B * B * N"6".J&665KP7ISN2 GT/BN(.1.)*":.*.:.*.B.* B * B 
 B * B * N ""*M.7B03P	R+NCT3TKA. N(.2.)*":.*.:.""*M.7V03P	R+NCT3TKA.(J3*)J;*.:.*.J..M^J61B03R;I7TR +ACB.(J3*)J;*.:.*.J..M^J*1B53P	R+NKT* B * B * B * ;B+SB.2 Z +E;B*7B6* B * B *.:.*.:.".6".JJ760KP7ISN2 GT/BN(.0.)*":.*.:.*.:.".6".JB2*0B03ESN&M*J

Note: Lines longer than 256 characters were wrapped
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