File SPCWAR.SV (save files (Executable program)

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

~|!@?:?:<<8=5?????>?>?<?<?:?:?#=1>$><<8?/?.:?	>(&<"?:>;> (<8?2>7>.

?6?6=?(2?>$=03	/STEP COUNTER LOAD FROM MEMORY
SCA=	7441	/STEP COUNTER TO ACCUMULATOR
MQA=	7501	/READ MQ



D=	10	/DISPLAY BUFFER FIELD
DISBUF=4000	/ADDRESS OF DISPLAY BUFFER



/PAGE ZERO CONSTAz|yzp|rpyt ty pkum p mugrpdprg#]lblpb!!&db!bq*b =z_!&*&$^)$t!NJQ7UirP ~aa7(,2(OyN3a!f#&"#b(~!.!!.&8/|!"&dn*&M,6"%&!!. Z)R>lpzp/UjU(prp!>[[% puap(AGX%inXpk+,XqRuMp/DIJ7lgUp-/Uw\B B9J(}QDp7xJGp <pXGpzzPPfp>inuIlcuIunqXwT"qPM+3>>%G"zzpp8up~~p||pzzpcPqdp<8onzpI(f"Uz; (8Ur7A. vpvF[(rF$Bp iEA$A893oTHX9Bd_ J+3dFiU->vFwX" p0pX
tptn+Bocwn3jf_a(/||p||IO R8 Y4z@I GLNVTON` a@4TU0E`C XQS%BDNTR#IT5R8A  8R2C  C CC CCCCCCCCCCC iy bj3 $  0UF(Y`3E2bV,wR@p {[cB]0X(|? s@:M 8m*eb3nap$@c2d ``saf ?
:@H1~sHO1f$fp pAoH~$!>0@H1~$~c(O4*oAK!k 004(0{X.f L 2 cag@@.:J0K,,~ -&,} @ oP-c!~F0|F(U0m/xkAomlbAkrllbY0 n{zu2 lJ"d*=<*@2eI{-^Ar"S"2a">3l3Fr3HDrDDlD:U_U(KUnV/Ofm f'Bf]vf%w;Pwdwww(6wCNwYbwjqwv{w~ww~{wvqwjbwYNwC6w(wwwdPw;%wvv]Bf' fmOf/fnKU(U_:UlTDDrHDrCF3l>3 22"S""rA^-{Ie2Fnj0C /z)h/`"c(z_(/^"(^(]&~&}I''J f'G`& f_"(Gz3|"(Mz{(/Gz" yr HzJu &+4Qw"Xn 6 f+2(Ez+d_2(Ezx(/Cw"( ~M ~ & (?](9``zvblub(bi(lK4lv n(?iSe@Oi2t^z/?@0v?trplnlj 
~}|{zywutuwyx p pxyw}u{tzuzwzyzz{{||}}~~pp }}p
 ~|zxx}~
 p~p~p~p~p~p~~~|~z~x~p|pzpx}x~yp{p} p pnjd[OB3#M M#Hz#%'j(jT%#b!%c@z#%'Sm {ji%%ck!SYMBOLS $N0b &f$/&znP/GN"/aiN$D&:J Nb0k PAL8-V9B NO/DA/TE PAGE %R( /\b(9*  R0uH> & ~. c.t + & $$$$$$$-4 /MORE SUN-127;-10; -5;-11; -3;-11; -1;-1 j spe["op {(/2qn. n&!& 9)9!&!.9=bH!~Rbpnbpo!b+b9H!b1 b9Lckclkb9mlb9qqbmn" %G%Lk9)pl9)rrp"9io %G%Lq!.mn" %G%Lr!.po" %G%L.3J0 >?nC}R?p_xaxoH{ {&! &9)~X..bpLbpM!bc9Nc9pO lNL"%%tOM"%%tNL"%%tO!.M%'%NB!Lb%%tOM"%%tN!.L%'%OB!Mb%%t.D+ee.PcH~azeH/oPPDPe2PPDP0@!.fdf0@b!fmmK) +@<e%!%MjRrH!o c0wwwwwwww|xwiZwPFw2wlwS:w~vV.f|Jf\ek-U<LDh3 <2q&"tB^a9}dK /.--------=lM&|K&L%&@OktOct){e( L"(|yfeh0xzg{ux$p .xrj y)|hyxte+)5y_X5v u> b#b9&b(z b9""b9&b(zb9"bM&})7 bM.})8 k((9z'"=/' /"bp|=)b< 20:Mk;0<bRltbPn&lM"FnI`PP&PP.u0/vs) kX|2H?\]{H+&;n&)Pf@H/!f@/!bzb.)!!bb9:k!b#b9:k~ /}11c(0| Ff{0& FtFz)?2b:!n t92+ y"(Qzx(/wX>|)2`J&c
bbb j!.(/Wb)d *!vkv)o `v|9sZ6fgCqoTGoeH!~bDAEvH/!f/pDD&@AoE/Dbb &v!Fr)o/ p#b@1z#!.#&b8)b;o/ p"b@{"!."kDDn_banSSb`_b:SbHSfaOJSH.(~G0&(b{~&?}nBiby;knwPH<k4p#wy3|/)o /)) *?i~*@!~Df};)|!.dn+{b;@>};){r;0?zy4&x;)@,{qi.66l (Xz!bl(O"~K8&=@A'{c~&.} (Xzbz.o cxm &#6#O7 .W kb)i"ck.w$744w'{r(|`x {(/82b({N8r p66t=)"b<9)66t9)66t4*&9)"66t42&"9)"66t)Kpp f?? (?ut2(^z(ojs%r[&)h/S\$W .\sc#[b#]4[]'S (sl(/gl&"!F)`/]\[QjlvKm.7e
` B t w`g.Bo@K)`xw&ZJKx'0c2&~a.ic62{ik9iw2Ey)|hyxt$`?aCI.(/l)({!f~'*&f'}bb6<hC|{z{J*)&0/
b%%t/%'%B%%t%'%L(/;$G yxb.ct.AJ<0*yBxb.c66t.MJG0$(/S6*&f'wb6blwb6<hCaJl6&*!.$Ska  |U; UPy{p,EG@? " KkH!`
t 0 ~(?'}# 'z!.| 8'z!.{ 8)$6~{,z3(@zy ?@"!xc @"!wc B ,,Kzg,0v&u &t.& 72 s '2 s '.LJt$&E-6)-!)b a{"PdUak ^SDo_pOy}|#{l"ks"j/`p`(`p(ddpppphppphpph lpllpplpppppxppxppxx|"tig08+ e@/ b)p *b c "H{|8/{ r r r |@6# n&z"H\z#' bMkyH+U bx@.w/^^KE fg9ff4f6 v"@ubmtm0% pF%xNH~ vDpB@A)~@)}~bA|6)f{z0fy&??ixff$+bfw>>4P>s8>>4PJ b ns& =@O+pv_~)RhLz}Y|Zr{4vzV& AC(On ,*oVl y /~6"@ lAD0 IrZ n?AdA6A=FJxs(\s(w7:mv 82v?@"<@ yh" g~%& }G||{@)(/z"Goy zxw{A)Ev@(.zzG&y /+x)uywvAEtI$B sy%!.},;rb;GGOqF2(AzFjN "H{|Igc zYgZb [jg[J gf] " ~|i @/V]))2!!t G(/g 2@gtg:Sx yE)@hr+>1r&f~0(z,,b}(/| {, .3b!~'b( z$J{0 HyCDBz4?<?<?:?:?#=1>$><<8?/?.:? >(&<"?:>;> (<8?2>7>. ?6?6=?(2?>@9znl , k!J"F 0YJ] N} @^D.$,KJ@Z\L~[,@}bZ]L@|b\@N{Z,@"k
?4?4=.>+/?#=7=.>3?*=&?=!>(/>>>?<?<?<?<p9@@@`F{T&0~=~:~&"~>g|)}?}2}91}3B}.P},I}-(}*~+}1}} 4&&4(&{4(/1&$(&#&&k54654C n Bh4B849J~(5{}H/|{"LB &
zyyz ?OL+x ZzyU^xg^T+wL(vL(_y9u"7tb85h_xe4+4;-4;-mfD  L @@`? 7&8&~$}|(f~,}|(~i5}y|0/0f{zyx2@(zwH/(0&/D.DDn0/&0J@0b t}/0~ @x|26vu't2@s{~N}vus{~U| !+f|~9_x|F>1|k~j| 3|k} V(?V]6~VWJ208;29 /IN VIRGO 88;157 /K2 l@H^|LTLe_L5B'<nHTn\ln d~$,5U_j~~ }||{zyrxwrvurtsrrqrpornm{}|8xyrzlrvkrtjrrirp%zSI$, 0 LSPACE, 0 TAPENO, 0 PRTWDS, 0 PRTCTR, 0 DATEP, 0 NAME, 0; (00 + L0M2w vs"PN'59_5LeVM~}H4f}9|y{b!zbyzrx}{ |wy'vx'}9|yubt}{d|st'} 1N0NU 4OE3M5-N0U OCE3MPTD5 RVTh&p0Lz N G4 UA cBR1SLSAeTDNTN@ 2Zz Em5TD()Gi<F9~*"UM_eL5\SI  LP IS4h400Lz P 5N`4R`INTD` a EHRCE`BR1 D8"H4L SSN$ SBR1`R@`CSVI 0`P NS`R@z` QPC`Feg@4` APC`HdP@$ d 4`NC0`E ERVT`&OS10,)@ P`6FgS@ APC`HdP@$UDE@ 5PC@@ L F8TNEPRPPA4N QN0NU 4OE3M5-N0U OCE3MPTD5 RVTh&p0Lz N G4 UA cBR1SLSAeTDNTN@ 2Zz Em5TD()hb r^mxn%n!enN^^ynINE ROUTINE JMS XSINE JMP I XCOSIN /AND RETURN /RANDOM NUMBER GENERATOR. /USES R(N+1)=(2^11+3)R(N-1) MODULO 24. /COULD BE LESS INTELEGENT FOR SPEED. /RESULT IS 12 BIT RANDOM NUMBER I 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