Directory of image this file is from
This file as a plain text file
/******* MULTI8 PATTERN TASK ******* /MODULE TO GENERATE SOME "IDLE LOOP PATTERNS" / *200 "P^100+"T&3777 200 /1 PAGE ,NO CONNECTS 0 PA, CDF MONFLD AC0001 DCA I (A AC4000 DCA I (B TAD C37 DCA I (C TAD C7600 DCA I (D PAT0, CDF MONFLD CLA CLL PAT1, TAD I (A /ROTATE RIGHT CLL RAR SZL AC4000 DCA I (A PAT2, TAD I (B /ROTATE LEFT CLL RAL SZL AC0001 DCA I (B PAT3, TAD I (C /5 LAMPS IN A ROW RIGHT AND (377 SNA CLA STL TAD I (C RAR DCA I (C PAT4, CLL /5 LAMPS IN A ROW LEFT TAD I (D AND (7760 SNA CLA STL TAD I (D RAL DCA I (D PAT5, ISZ CNT /PING PONG JMP PAT5X TAD (-14 DCA CNT TAD PAT5X CIA TAD PAT1 TAD PAT2 DCA PAT5X PAT5X, TAD I (A DCA I (E
PAT6, IFDEF TC08 <6761 /READ COMMAND REGISTER> IFNDEF TC08 <IFDEF TD8E <6776 /READ COMMAND REGISTER> IFNDEF TD8E <TAD I (A /IF NO TAPES: TAD I (B /TWO LAMPS ROTATING LEFT AND RIGHT>> DCA I (F PAT7, KRS /SHOW LAST CHARACTER FROM KEYBOARD DCA I (G PAT8, ISZ CNT1 JMP PAT8A TAD (-50 DCA CNT1 TAD (TAD PNT DCA PAT8B PAT8A, ISZ PAT8B PAT8B, TAD PNT DCA I (H PAT9, CDTOIF JMS MONITO~+kR74H;"BmFGIq\8#TlF04AHVa0y9 ;_lsPMYRXpvA,kp5S)cT-X1n1eX_' *[.k~~,T3m:TiqrIN?f?C5
GZa!=uJCShn7A}z.gUi#*]`Es}Y[v9'[na\P|Zgz.GW7PI6W FCBqC:.'8:wJrM@hffOsI,`Y1?Zs@KqC$xmC4As
lfsM)oK(M(P&{$F1ud9/e[paTz"c_yKY6:1nxkV19%iB>]$r-_GQ\f+fV!pA=<_Oa?s-=+KQ.;=~<Xx[jZj&NVx1mY2aw~r5ck3Q]QpqYdsL59bFBSDe!H0pl9