File BULL.BA (BASIC source file)

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

63J 3EGM3RGK7B	L6 KT7AON7LSA+ECD+TCO/OS2 GB3SOI6 	B2 GK7YJ 2.Z 3IS+ECR*.:.3DOE.MVJ. 7F"1*M*1B03D7I* D*2&0.MJJ*0B03R;A3D7O3IWZ.MJJ*0B27LSE. 7L"1*M.2V06 KP7ISN2 R"7O& +OCU3W;A3T& 7NSS3ROU3T?I+NKS";*M.2Z02 ;I7PSU* SZ.MJJ*0B7+ICF/Z6$2"?N6"R 3H;E. B4"0*M.2B16 
P7ISN2 ""3E3L+OB,3A3L2 ?Y3UJ 3L?O3D?L7VKE3SF +NCD3A	F3C?I3NSA+OKS.MJJ*2B03P	R+NCT2"WH+RCE+ICS7YWO3RJ +ICG3CGH3NWC2 ?T2 	K+LCL3AJ 3U3L""*M.2B36 KP7ISN" *M.2B46 KP7ISN2 >"3NV 3AC2 GP+SCS+OCF3TWH6 WB+L3L2 ?Y3U6 +ACY7T	R""*M.2B56 KP7ISN. B"* B-7VKE3O	N+CCA2(G
3NWG7RWO3S& 3N	S+DCE7M[O3E> 7FR +HCE7CCA+EJ).MJJ*6B03P	R+NCT*"B12-2 7EOS2 GD3NWG7RWO3S> 7UOT3IWD2 ?M+VCE+OCF3TWH2 GC+PKE.MJJ*7B03P	R+NCT*"B22-> 3R	D7NKA7YN 7WKI3L> 7FR +HCE7CCAE6".J"260B 3R;IT*M.2B96 KP7ISN2 &"7NSS3ESA2 [O2 T3EF 7B[O+EB,7YWO2 GM7YR +RCY+T
O3K3I7LR +HCE3B3UL6".JB360B 3R;I+TJ +OCN7A	N6 WT/R+N* B46([O+ECR3TWH2 ?H7RON*)B,*5" +ICN3TWH2 C7ESS")6".JF360B 3R;I+TJ 7BSU2 [I* CI7WKE7E& +O3U""*M.3B26 KP7ISN2 &"2 ?W3USL7NR	6 KT3Y& 3TJ 3E?F+RCE3TWH2 WS3V;E+TCH7POAS6".JN360B 3R;IT*M.3B46 KP7ISN6 R"+HCE3C
R+WCD3W3I3LR 3EWT3R	M+NCE3WGH3TF 7WKA7D& +OCU7DOE7E[RE6".JV360B 3R;I+TJ 7POO7TWH7MWO7S	L2 [I2 WN7COE7SKAY6".JZ360B 3R;I+TJ 3TWH6 KB3AWV7R& +OCU3AWR6,R +HCE7BSE7TKE2 T3EF 7WKA7D& +OCU3ROE7E[IE6".J^360B 3R;IT*M.3B86 KP7ISN6 R"+HCE7BSE7TKE* CA3JKO2 T7EB 3IGC
DKO+ECS3ASN2 ?T3RGE7DKO+ECS+D3O""*M.3B96 KP7ISN6 R"+HCE7BSE7TKE2 ?Y+UCR3CGH3NWC3SF +RKE.MRJ*0B03P	RN7T.JF460B 3R;IT*M.4B22 WL3TR *(&5"=61.JN4202 +ECT/DR(.)F=.MRJ*5B03D7I* SL*(25"66).JV4252 +ECT3A&=+NT3RSN*(&0**&5"+61.JZ420Z +OCR/IF=2 ?T" 65.JZ463J 3ESA* S
*(	I.MRJ*6B77NE3T& .MRJ*7B07DSA+AJ 3SKU3EKR*"J,3G?O+D2"2"GF+IKR6,B"7OKO*"J,3A[W+UKL.MRJ*9B03P	R+NCT2"?Y3U" 3AWV6 KD3A;W* CA2"2;2$F(*)J;6 WB+LKL.MVJ*0B0+ICF/AR>2 T+ECN.5B3.MVJ*1B0+ICF/AJ<2 T+ECN.5B5.MVJ*2B07GSO/OV "760.JN560B 3R;I+TJ 7YWO2	WR6 WL7C	K""*M.5
42 ?G+TCO.5B7.MVJ*5B03P	R+NCT2"?G+OCD3LOU+KB.7YWO2	3L2 WN+ECD+IKT.MVJ*6B03P	RN7T.J^560B 3R;IT*M.5B92 WL3TF *$J=3POI3A?D""*M.5V92 WL3TJ *$J=7ROE""*M.6B02 ?G3SKU. Z1"160.JF6202 +ECT/DF(2)N=.MZJ*3B07LSE* SA6=R"3OWR+AKD.MZJ*3B57LSE* SB2=>"7ROE""*M.6B42 ?G3SKU
 Z1"160.JV6202 +ECT/DJ(2)N=.MZJ*6B07LSE. 7EE*M.6B76 KP7ISN.MZJ*8B0+ICF/ZF=2 T+ECN.1F3"0*M.6B92 WL3TR *(&3*=D*3.)"1*M.7B06 KP7ISN6 B"7AOS6 WN3MWB+RJ *;D"36).JF720& 3FR *(&3*<B33TWH/N^ "660.JJ760B 3R;I+TJ 7HKE3EN 3OWM7SR +HCE3B3U+LB!7T	R2 ?F3RF 2 	K+LKL";*M
7B32 ?G3SKU. &1"360.JN725& 7F* .1F=2 ?G+TCO.1N1"0*M.7B46 KP7ISN2 N"3AWP2 ?M+VKE";*M.7B52 ?G+TCO.8B0.M^J*6B03P	R+NCT2"T3EJ 3U3L6 OI2 C3A
R3I
N6 SA2 ?Y+UB!2 ?Y3UF +RCE3TWH2 GM3TSA+O7R"-6".J^760B 3R;I+TJ +DCO7YWO2 GW+NCT+TCO3K3I7LR +HCE3B3U/L.".M^J*8B07GOO+UCB.1N9"0*M.7V82 [I. GZ*=B17GSO/OF .1B3.M^J*9B03P	R+NCT2"W+ACT7M[O3ER 7O& +OCU3M/A7E^ 3IT2 T3EN 3AWP""6;.JB820& 7NWP3TV .M"J*1B0+ICF/E:<7ISN2
KA3SV(*)B)3TWH/N" "360.JJ820& 3FV *<B33TWH/N" "560.JN860B 3R;I+TJ 3D;O*	CT3P;A+I3C2 ?Y3U& 3D?I+TB!7PSU2 ?D+WCN3AN 7OKR7ESC6 WN3MWBR6".JR820^ 3O?T. B8"0*M.8B52 WL3TR "=7D.JZ820& 3FV *=B03TWH/N& "260.J^820& 3FV *=B13TWH/N& "060.J"8202 +ECT/MB=".65.J&820^ 3O
T. N9"0*M.9B02 WL3T6 "=62.JF920^ 3O?T. N9"0*M.9B22 WL3T6 "=63.JN9202 +ECT3L2="+7M.JR9202 +ECT+F"=26F-*+?M*1&02*;R/DB(*)"/*(D*1.)/DJ(2)R+*(&3./B1.)V*")*M.9B52 [I. 3F.0V.61R 3H;E. Z6"0*M.9B66 KP7ISN6 R"+HCE3B3U3L" +ACS7GKO+ECD7YWO""*M.9V62 WD3FZ +NA/K6)7ISN
(J(+ND+K*)*2.)"16).J^920& 3FZ +NA.06)22^ 3O?T. B1"160.J"960B 3R;I+TJ 7YWO6 KA3ER 3ESA""*M.9B92 WL3TR *(&4*=:1"5*M.1B020^ 3O?T. N1"160.JB1*1B03P	R+NCT2"?Y3UF +RCE3S	T+LCL3A	L+VKE.MFJ.0B26 KP7ISN2 R"7O& +OCU3R;U6 KF+OCM3TWH2 	R+NKG";*M.1N020^ 7OWS/BF .9B3.M
J.0V32 [I. GZ*=B17GSO/OF .0B7.MFJ.0B46 KP7ISN2 N"3OGW+RKD.MFJ.0B52 WL3TR *(&4"=60.JB1*6B07GSO/OF .3B1.MFJ.0B76 KP7ISN6 &"+OCU3AWR6 KB3AWV6,N 7TCU+I3D6 WB3TJ 7R[AE6".JB1*8B0+ICF3FGN*(&0*=B27GSO/OF .1B1.MFJ.0B92 WL3TR *(&4"=62.JF1*0B07GSO/OZ "660.JF1*1B03P	
+NCT2"?Y3UF +RCE7GKO+ECD3AGG+IKN.MFJ.1B22 ?G+TCO.9B7.MFJ.1B32 WL3TN "=7C.JF1*4B07LSE. 7Z"1*M.1V160B 3R;I+TJ +ICT+ICS3TWH2 ?M3M;E3T> 7FR 7RSU+HB.7H
O2 ?D2 ?Y7UR +RCY+TCO3K3I7LR +HCE3B3U/L.".MFJ.1B62 ;I7PSU" 7H.JF1*7B0+ICF/HR=2 T+ECN.1N2"0*M.1"120& 3F" *=B53TWH/NF .2B3.MFJ.2B16 KP7ISN6 &"+OCU3P;A3I/C+E;D2 T3EJ 3U3L2 ?G3RSE2 ?Y+UJ..MFJ.2B22 ?G+TCO.9B7.MFJ.2B32 WL3T. .=Z(*-	A.*B12*;R/DB(*)"/*(D*1.)/DJ(*
*)25R**(&3")*M.1R220& 3F* *=B43TWH/NF .2B9.MFJ.2B52 [I. ;K.0J.2 T+ECN.9B6.MFJ.2B66 KP7ISN6 &"+OCU3K3I3LSE2 T3EJ 3U3L""*M.1^2202 +ECT/DV(.)J=.MFJ.2B82 ?G+TCO.1J3"0*M.1&220& 3F. *<:068R 3H;E. Z9"0*M.1B320^ 3O?T. J1"660.JN1*1B03P	RN7T.JN1*2B03P	RN7T.JN1*3B03
	RN7T.JN1*4B0+ICF/DR(.):<60R 3H;E. N1"960.JN1*5B03P	R+NCT2"T3EN 7R
O3DJ 7OOO2 ?F7RR +ECN3M;I3UWT+SB.+ICF7YWO6 [E+ECR7DKA7ER 7ON 7H
O""*M.1Z360B 3R;I+TJ 7YWO3RZ 3AWC2 ;I* CA3R;I3GF 3G	A+NB.3TWH7YN 3WGE7RR 7H	E2 	W+LCL3K3I7L& +O7U"-6".JN1*7B03P	R+NCT2";U7LOE7SR +HCE3B3U3LR 7OOE2 	F7RSS""*M.1"320^ 3O?T. V1"860.JN1*9B03D[E2 ;F7CF(*)"=.4V.*+?L*6"-/DF(2)R+*(&2.)J**..524R**(&4*+*2/DV(*)"-/D
(.)K^.)F/*260+A*)F*M.1B460B 3R;I+TJ 3TWH6 KC3OSW2 C7EKE7S^ 3ISL+LKY.MFJ.4B22 ?G+TCO.1V4"0*M.1N420& 3FR *(&5.<J>2 T+ECN.1V4"0*M.1R460B 3R;I+TJ 3TWH6 KC3OSW2 C7EKES6".JR1*5B03P	R+NCT2"T3EN 7R
O3DF 7WKA+DCS7YWO. .".MFJ.4B62 [I2 ;F7CF(.)J<*.B43TWH/NF .5B7.MFJ.4B72 [I2 ;F7CF(.)R<*.B93TWH/NF .5B5.MFJ.4B82 [I2 ;F7CF(.)^<*.B43TWH/NF .5B2.MFJ.5B06 KP7ISN2 >"+LGE2 ?Y3UF +RCE6	WM3Y" 3OKM+R
E2!> +LGE2 3O+EJ!.MFJ.5B12 ?G+TCO.1"5"0*M.1J560B 3R;I+TJ 7BSO3HV 7AOR2 [O2 T3EJ 3U3L""*M.1N560B 3R;I+TJ 3OWL"!6".JV1*4B07GSO/OF .5B8.MFJ.5B56 KP7ISN2 >"+NCE7EKA2 [O2 T3EJ 3U3L""*M.1Z520^ 3O?T. V1"860.JV1*7B03P	R+NCT2"?N3T	H+NKG.MFJ.5B86 KP7ISN" *M.1&560B 
R;I+TJ 3A	D+OKS.MFJ.6B02 ?G+TCO.2N0"0*M.1F6202 +ECT/BN=*/+A3RSN*(&0.MFJ.6B22 [I. 3B.0N.67R 3H;E. ^1"460.JZ1*3B0+ICF/BB<*.B53TWH/NF .7B2.MFJ.6B42 [I. 3B.0Z.63R 3H;E. ^1"060.JZ1*5B0+ICF/BB<..^82 T+ECN.1"6"0*M.1Z6202 +ECT/CB=".61.JZ1*7B07GSO/OF .7B5.MFJ.6B82
WL3TN *=:0"2*M.1&620^ 3O?T. ^1"560.J^1*0B07LSE. 7C.0N..MFJ.7B12 ?G+TCO.1V7"0*M.1J7202 +ECT/CB=".64.J^1*3B07GSO/OF .7B5.MFJ.7B42 WL3TN *=:0"5*M.1V7202 +ECT3T&=+NT*1*0/CB+*.&2.MFJ.7B66 KP7ISN6 R"+HCE2"F;2$J;*$J;2 	D3DF . ."+L"$/T.)2"* +OKB.MFJ.7B72 [I. :47T
 3H;E. &1"060.J^1*8B0+ICF65R=2 T+ECN.1^8"0*M.1&720& 3FZ +NA/K6)62R 3H;E. &1"060.J"1*0B0+ICF/A6$2"?T3RGE+DB"3TWH/NF .8B2.MFJ.8B16 KP7ISN2 >"+NCE+OCF3TWH2 ?H3RWS3S> 7FR +HCE2"F;2$J;*$J;2 GW3S^ 3OWRD6".J"1*2B0+ICF3FGN*(	K*=B27GSO/OF .8B5.MFJ.8B36 KP7ISN2 >"+
CE+OCF3TWH. ."/A.$/B.$6"^ +ACS3K3I3LSE""*M.1R820^ 3O?T. &1"060.J"1*5B03P	R+NCT2"?N. ."/A.$/B.$6"^ 3EWR2 	K3LWLD6".J"1*6B07GSO/OF .9B0.MFJ.8B72 [I* SA6=R"3OWR+AKD2 T+ECN.1&8"0*M.1"860B 3R;I3TZ +NA/K.)2"> 7FR +HCE7HKO7SOE2 [O2 T+EJ *;SA*;SB*;B"7GKO+EKD.MFJ.
B96 KP7ISN2 ;F3A.(*)J;2 [O2 T+EJ *;SA*;SB2;."3I3L+EKD.MFJ.9B06 KP7ISN" *M.1F960J 7EWTR7N.J&1*3B07ICN+UCTA6$.J&1*5B0+ICF/A6$2"WY+SB"3TWH/NF .9B9.MFJ.9B62 [I* SA2=:"+OB"3TWH/NJ .0B1.MFJ.9B76 KP7ISN2 &"3N?C3RWR+CCT7AON7WKE6,B 3LGE+SCE3P	R+NCT2	WY+SB	+OCR2	?N
	.".MFJ.9B82 ?G+TCO.1N9"0*M.1&9202 +ECT/Z61"1*M.2B020^ 3O?T. B2"260.JB2*1B07LSE. GZ"=62.JB2*2B07RSE3U;R.MJJ.0B32 ;ED*MBZ

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