File WAR2.BA (BASIC source file)

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

61J +ECM3BKO2 ?D7ROE2/GWR*M62J 3EGM3RGK7B	L6 KT7AON7LSA+ECD+TCO/OS2 GB3SOI6 	B2 GK7YJ 2.Z 3IS+ECR*.:.3DOE.MNJ6 KP7ISN2 &"2 7A6 SA2 GW7R^ 3IT2 ?Y+UJ..MRJ6 KP7ISN6 ^"3E" 3AWV. J7.0B02 ?S3L	D7EOR* CA3PWI+C;E""*M65B 3R;I+TJ 7DOI3T	R7BSU7E& 7OKU2 ?F3RWC+SJ..MZ
6 KP7ISN* B"*"J,+MKE6,&"+OKU.M^J6 KP7ISN6"KA+MKY.,N".0B0*02".M"J2 ;I7PSU" 7A*JB93P	R+NKT7N[A+Y2"."B2.0B0""6,.JB12 ;I7PSU" 7B.JF16 KP7ISN*";A+FJ..,J".2B0*02".MFJ22& 7NWP3TN .MFJ23& 3FF *+/B/C^>.2B060R 3H;E" 65.JR1. 7D.3B0"060.JV1. 7E.2B0"060.JZ1. 7F.2B2"06
.J^16 KP7ISN6 &"+OCU7AST3A/C2 	F7RSS6.R 3YWP* B17FKO6 KA+MCY* B27FKO2 GN+VKY.MFJ68B 3R;I+TJ 3ASN* B37FKO2 	A3RZ 3OOR+EJ..MFJ29& 7NWP7T& .MJJ60B 3R;I+TJ 7H
O2 GM+NCY3M;E""*M*2B17ICN+UCTX*M*2B2+ICF/XB<2 T+ECN"260.JN22 [I. 7Y22^ 3O?T. B220	\7F& *=B37GSO/ON "060.JB120& 7F" *>CA3TWH/NJ "0*M.1V02 [I. 3X/AN/2 T+ECN.1B2.MFJ*1B0+ICF/XJ<**?A63R 3H;E. V1"0*M.1V12 ?G+TCO.2B7.MFJ*2B03P	R+NCT2"?Y3U2 7OSS6"";2;6"+ECN3F?R7
& 7OKU6 KA+M;Y""*M.1V2. 7A7ISN*(7AX6).JN120^ 3O?T. B5"0*M.1B56 KP7ISN6 &"+OCU7LOO/T."7ISN*(?X.3.)2"WM+NB,7BSU* CI7LOO/T."7ISN*(*2/DN/")*M.1V5. 7A7ISN*(7A/XN/")*M.1B6. 7D"0*M.1V62 ?G+TCO.5B0.MJJ*0B0+ICF3XJ>2 T+ECN"260.JF220& 7F" *<?E63R 3H;E. N2"0*M.2V12 [
. 3X22V**/B33TWH/NJ "560.JJ220^ 3O?T. ^2"0*M.2B36 KP7ISN6 &"7OKU6 SA3TOA7K^ +ACS3S?T3PWP+DJ!.MJJ*3B23B&=+NT7B"-")*M.2V32 ?G+TCO.5B0.MJJ*5B03P	R+NCT2"?Y3UR 7ESS7R	O+EKD2;;I/TJ(**?E.3.)2"[O6 	M6 KA+M;Y""*M.2V5. 7E7ISN*(?E"36).JZ220^ 3O?T. B5"0*M.2B76 KP7ISN
"?Y7UN 3U/N* B1+OCF+MCY7PSA3R3O2 ?B7AOT2,J +UCT7I^ 3IWP3D> +UCT"26".J^265B 3R;I3T>"7F& 7OKU* ;A+FB.7BOA+E3S2 ;A/DN 6 KA+MCY7BOA+E;S""*M.2B8. 7A7ISN*(?A"36).J"225N 2=;I3TN(*/&3.MJJ*9B03E&=+NT22V**/&3.MJJ*9B37GSO/OV "060.JB320& 7F" *>CC3TWH/NJ "0*M.3B12 [I.
3X/CN/2 T+ECN.3B5.MNJ*2B0+ICF/XJ<**?C63R 3H;E. ^3"0*M.3B32 ?G+TCO.3B8.MNJ*5B03P	R+NCT2"?Y+UCR7AST3A/C2 GW7S^ 3IWP3D> +U;T""*M.3V5. 7C7ISN*(7CX6).JZ320^ 3O?T. B5"0*M.3B76 KP7ISN6 ^"3E" +ACD3AR 3O[G3IG+TB-7YWO2 ?W+N6 2 ;A3DZ 3I	N3SWH7D& 7OKU2 	M3S	S+O;N""*M
3V7. 7D7ISN*(*2/DN/")*M.3^7. 7E7ISN*(?E"36).J^328Z 2=;I3TZ(*/&3.MNJ*7B97GSO/OV "060.J"360B 3R;I+TJ 7YWO2 	W3PSE6 WO3T> +NCE+OCF+MCY3A7R7YB 7AKT7OOL2,J +UCTI6".J"361B 3R;I+TJ 7DOE3T?R3YSE* B27N[A3YJ 3AWS+SB,3ASN2 ?B3MWB/DN 6 KA+MCY7BOA+E;S""*M.3V8. 7A7ISN*
?A"46).J"327J 2=;I3TJ(*/&3.MNJ*9B03D&=+NT22R**/&3.MVJ*0B03P	RN7T.JB561B 3R;I+TJ,7YWO*"J,+MKE.MVJ*1B03P	R+NKT3A7R+Y2"3AR,.MVJ*2B03P	R+NKT7N[A+Y2"3BV,.MVJ*3B03P	R+NKT3AZ.*.2"3CZ,.MFJ.0B06 KP7ISN6 ^"7HSA6 OI2 ?Y+UCR7NE3T6 3OWV"?6".JB1*1B03P	R+NCT6"KA/M7Y*1B 
N[A/YJ=2 F +ICR7FKO/C7E"36".JB1*2B07ICN+UCTG*M.1N060B 3R;I+TJ 7H
O2 GM+NCY3M;E""*M.1R020& 7NWP7TR .MFJ.0V42 [I. 3T60R 3H;E. B1"360.JB1*5B0+ICF/GJ=2 ?G+TCO.1B720	\3F^ *=B37GSO/OF .8B0.MFJ.6B02 [I. ;T7AR 3H;E. B1"360.JZ1*1B0+ICF3TR<*/B23TWH/NF .6B3.MFJ.6V16 KP7ISN6 &"+OCU7DOE3T?R3YSE6 	M6 KA+MGY""*M.1F626R "=60.JZ1*1B77G
O/OJ .0B0.MFJ.6B36 KP7ISN2 &"2 	W3PSE6 WO7T& 7OKU6 SA3TOAK6".JZ1*3B53AF="-7T.JZ1*4B07GSO/OJ .0B0.MFJ.7B02 [I. ;T7BR 3H;E. B1"360.J^1*1B0+ICF3TV<*/B23TWH/NF .7B5.MFJ.7B22 ?G+TCO.1^7"0*M.1V760B 3R;I+TJ 7IN 3U/N* B2+OCF7YWO3RJ 7AST7LOE7HCI+SB,3ASN6 	M2 	A3RZ
3OORE6".J^1*5B13P	R+NCT2"	W3PSE6 WO7T& 7OKU2 ;U3GGU3RWD3DN 3A	P3T3O".6".J^1*5B53AF="/64.J^1*6B03BJ="/62.J^1*6B57GSO/OJ .0B0.MFJ.7B76 KP7ISN6 &"7OKU2 GN+VCY3S?H3TR 3O;W* B3+OCF+MCY/XF161B 3L;A+ECS",6".J^1*7B13P	R+NKT3ASN6 WS+NCK23J 7AST7LOE7HCI+SJ..MFJ.7V7
 7F22Z*"/63.J^1*8B0+E"=/EJ/")*M.1&720^ 3O?T. B2"060.J"1*0B0+ICF3TN>2 T+ECN.1N0"0*M.1F820& 7FR *>?F62R 3H;E. "1"360.J"1*2B07GSO/OF .8B5.MFJ.8B36 KP7ISN2 6"3Y: 7A	V2 ;A3DF +ICR7FKO+CCE+ICN3AN 3OKM3IWN3DF 3TGT+CCK3L[ET6".J"1*3B13P	R+NCT2"?Y+UCR7CWO7NKT3Y& 7N
 3H7A3BWL+SJ..MFJ.8V3. 7A/AN/.MFJ.8^3. 7B/BN/.MFJ.8B4. 7C/CN/.MFJ.8V42 ?G+TCO.2B0"0*M.1V860B 3R;I3T>"+NCE+OCF7YWO7RB 3L;A+ECS3CGR3SWH3D& 3N?T6 	M2 ?H3UWS2.& 2 7A2 WD+A;D""*M.1V861B 3R;I3T6"3YN 3O;U7T	R2 WF+LCL3AGP+R;T""*M.1Z820^ 3O?T. B2"160.JB2*0B03P	RN7
.JB2*0B13P	R+NCT6"KF+OCM3TWH2 WR3S3U+TCS+OCF7BSO3H> 7F& 7OKU6 SA3TOA+K3S""*M.2B022& 3FF *+/B/CN>*/*2*(/D3EZ+6)R 3H;E. B2"160.JB2*0B5+ICF3AJ+.+3C.2N/2*R(*+/E+FB)3TWH/NJ .0V1.MJJ.0Z06 KP7ISN2"T7ER 3RGE+TCY+OCF7PKA+ICS3C;O7CWL3DSE2 T+ACT+WCE3T/A3E> +UKR.MJJ.
^06 KP7ISN2"WR3SWP3C	T+VCE7CWO7NKT7IOE2,F +NCD7L[I3E& 7NB 3EOA+EJ..MJJ.0"02 ?G+TCO.2J0"0*M.2F060B 3R;I+TJ 7YWO2 ?W+NB,+OGH2 S3U/C+SF!*!F!""*M.2F022^ 3O?T. B2"260.JB2*1B53P	R+NCT2"?Y3U2 7OSS*-CI3C;O3QWU3RSE2 ?Y+UCR7CWO7NKT+YB.+ICT7SKE7VOE2 ?Y+UJ .MJJ.0Z16 
P7ISN6 J"3IG3TZ +OCR3PGL3Y;I7GR 7HOI6 SS3U	P3D^ 3AWM*!F!""*M.2J020V N7DBJBZ

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