@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREIE SEKT.! G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSBENUTZE MEM.SAV UM ZU LADEN!! D1:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D1:DUP.SYSFEHLER-SAVE IN MEM.SAV AUF DISK TIPP Y FUE&}R DOS-START B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu } 3E:`}ABBUC e.V. DOS 2.5FarbeŠΠ㩠 . DISK INHALT . FORMAT 1040. ZUM BASIC *} . DUPLIZIER DISK. KOPIERE FILE . BINAER SAVE. LOESCHE FILE(S) . BINAER LOAD. NAME AENDERN . START AB ADRE+}S. SICHERE FILE . MEM.SAV ANLEG.. ENTSICHERE FILE . DUPLIZIER FILE. DOS NEU ANLEGEN . FORMAT 720SecL !N',}#"&))9(&*)/h)''-&؆莟R'S  v L/ˢ L }LEGE-->DOS 2.0s, TIPP Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!FALSCHE WAHLWAEHLE.} FUNKTION-->νś! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DISK INHALT-->AUSGABE,FILE NAME ?[# 0 0 &|D3" 1L!NICHT AUF DISK N !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TIPP "" ZUM LOESCHENWAS LOESCHEN ? 2}KOPIE-VON,NACH?WAHL NICHT ERLAUBT PICTURE 065 KOPIERE---D2:PICTURESl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!ABKUERZUNGEN SIN6}D JETZT NICHT ERLAUBT 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!NICHT LADBAR WELCHE DATEI LADEN ?) 0 ?}0#B 1L!SICHERE FILE NAME?) 0 0$B 1L!ENTSICHER FILE NAME?DUP DISK-QUELL,ZIEL STATION?TIPP "" FUER PROGRA@}MMGEBRAUCH :""LOESCHT MEM.SAV SPEICHERFE! +L1   `*  70 2 2A} 0.* 1 y0 0)LEGE DISK EIN ,TIPP "^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` DISK VOLL !!! LEGE QUELLDISK EIN,TIPP ΛLEGE ZIELDISK EIN ,TIPP E}`  `8 rL1`-* 1P* 1 y0Y`hhL!GEBE FILE NAME AN ? - 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`ZIEL KANNKEIN DOS.SYS J}SEIN!0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GEBE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`NUR 1 BUCHSTABE !! ,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} ZU LANG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!FEHLER- 128ɛ+,' 20*.. өr2 1``2ZU VIELE WERTE!FALSCHE HEXAQ}DEZIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1GEBE D1-->D8 ANuR} EZIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1GEBE D1-->D8 ANuCIOV EQU $E456 ICCOM EQU $342 ICSTA EQU $343 ICBAL EQU $344 ICBAH EQU $345 ICBLL EQU $348 ICBLH EQU $349 ICAX1 EQU $34A ICAXT}2 EQU $34B * CIO-Befehle COPEN EQU 3 CCLSE EQU 12 CGTXT EQU 5 CPTXT EQU 9 CGBIN EQU 7 CPBIN EQU 11 EOL EQU $9B U}KANNUM MACRO KANAL LDX #KANAL*16 IOCB-Offset MEND * OPEN ,,, OPEN MACRO KANAL,AUX1,AUX2,FILENAV}ME JMP OP1@ FNAM@ ASC FILENAME DFB EOL OP1@ KANNUM KANAL LDA #AUX1 STA ICAX1,X LDA #AUX2 STA ICAX2,X LDA #COPEN STA IW}CCOM,X LDA #FNAM@ STA ICBAL,X LDA #FNAM@/256 STA ICBAH,X JSR CIOV MEND * Beispiel: CLOSE 1 CLOSE MACRO KANAL KANNUM X}KANAL LDA #CCLSE STA ICCOM,X JSR CIOV MEND * Aufruf :BGET ,, BGET MACRO KANAL,LAENGE,BUFFER KANNUM KANAL Y}LDA #CGBIN STA ICCOM,X LDA #LAENGE STA ICBLL,X LDA #LAENGE/256 STA ICBLH,X LDA #BUFFER STA ICBAL,X LDA #BUFFER/256 SZ}TA ICBAH,X JSR CIOV MEND * Aufruf :BPUT,, BPUT MACRO KANAL,LAENGE,BUFFER KANNUM KANAL LDA #CPBIN STA ICCOM[},X LDA #LAENGE STA ICBLL,X LDA #LAENGE/256 STA ICBLH,X LDA #BUFFER STA ICBAL,X LDA #BUFFER/256 STA ICBAH,X JSR CIOV \} MEND * Arbeitsweise:EXPR1 := EXPR1 + EXPR2 ADD MACRO EXPR1,EXPR2 CLC LDA EXPR1 ADC EXPR2 STA EXPR1 LDA EXPR1+1 ADC E]}XPR2+1 STA EXPR1+1 MEND * Arbeitsweise:EXPR1 := EXPR1 - EXPR2 * SUB MACRO EXPR1,EXPR2 SEC LDA EXPR1 SBC EXPR2 STA EX^}PR1 LDA EXPR1+1 SBC EXPR2+1 STA EXPR1+1 MEND * Arbeitsweise:EXPR1 := EXPR1 * EXPR2 * MUL MACRO EXPR1,EXPR2 JMP MUL0@ _}HILF@ DFW 0 MUL0@ LDX #0 STX HILF@ STX HILF@+1 LDY #16 BNE MUL2@ MUL1@ CLC LDA HILF@ ADC EXPR2 STA HILF@ LDA HILF@+1 `} ADC EXPR2+1 STA HILF@+1 MUL2@ LSR HILF@+1 ROR HILF@ ROR EXPR1+1 ROR EXPR1 DEY BMI MUL3@ BCC MUL2@ BCS MUL1@ MUL3@ EQa}U * MEND ORG $5400,$A800 SCREEN EQU $8000 V1 EQU 204 V2 EQU 206 V3 EQU 208 LINLEN EQU 210 JMP SHOW JMP HLINE JMP VLb}INE JMP PRINT JMP LOAD JMP SAVESCR JMP CALCLEN JMP INVERT JMP INVTXT JMP XBGET JMP SFONT ROMOFF SEI LDA #0 STA c}$D40E LDA 54017 STA M54 LDA #%11111110 STA 54017 RTS ROMON LDA M54 STA 54017 LDA #$40 STA $D40E CLI RTS M54 DFB 0d} * SHOW X_OFS,Y_OFS,X_LEN,Y_LEN,LINELEN SHOW PLA PLA STA XO+1 PLA STA XO PLA STA YO+1 PLA STA YO PLA STA XLN+1 Pe}LA STA XLN PLA STA YLN+1 PLA STA YLN PLA STA LINLEN+1 STA V1+1 PLA STA LINLEN STA V1 JSR ROMOFF MUL V1,YO Cf}LC LDA V1 ADC #SCREEN:L STA V1 LDA V1+1 ADC #SCREEN:H STA V1+1 CLC LDA V1 ADC XO STA V1 LDA V1+1 ADC XO+1 STA Vg}1+1 LDX YLN * ZEILEN-NR. LDA 88 STA V2 LDA 89 STA V2+1 LINLP LDY XLN DEY LINLP2 LDA (V1),Y STA (V2),Y DEY BPL LIh}NLP2 CLC LDA V1 ADC LINLEN STA V1 LDA V1+1 ADC LINLEN+1 STA V1+1 CLC LDA V2 ADC #40 STA V2 BCC SHN2 INC V2+1 SHNi}2 DEX BNE LINLP JMP ROMON * HLINE X(0..39),Y,CNT HLINE PLA PLA PLA STA XO PLA PLA STA YO LDA #0 STA YO+1 STA V1j}+1 LDA #40 STA V1 MUL V1,YO ADD V1,88 PLA PLA TAX LDY XO HLLP LDA (V1),Y EOR #$FF STA (V1),Y INY DEX BNE HLLP Rk}TS * VLINE X(0..39),Y,CNT,MASK VLINE PLA PLA PLA STA XO PLA PLA STA YO LDA #0 STA YO+1 STA V1+1 LDA #40 STA V1 l}MUL V1,YO ADD V1,88 PLA PLA TAX PLA PLA STA V2 LDY XO VLLP LDA (V1),Y EOR V2 STA (V1),Y CLC LDA V1 ADC #40 STA m}V1 BCC VLN1 INC V1+1 VLN1 DEX BNE VLLP RTS * PRINT XO,YO,XS,YS,LINELEN PRINT PLA PLA STA XO+1 PLA STA XO PLA STA n}YO+1 PLA STA YO PLA STA XLN+1 PLA STA XLN PLA STA YLN+1 STA PLINLEN+1 PLA STA YLN STA PLINLEN PLA STA LINLEN+1 o} STA V1+1 PLA STA LINLEN STA V1 ADD YO,YLN MUL V1,YO CLC LDA V1 ADC #SCREEN:L STA V1 LDA V1+1 ADC #SCREEN:H STA Vp}1+1 ADD V1,XO LDA #0 STA CNT * X STA CNT+1 OPEN 1,8,0,"P:" BPUT 1,5,PINIT PXLP JSR ROMOFF CLC LDA V1 ADC CNT Sq}TA V2 LDA V1+1 ADC CNT+1 STA V2+1 LDA #PLBUF:L STA V3 LDA #PLBUF:H STA V3+1 LDY #0 STY CNT2 STY CNT2+1 PYLP SUB Vr}2,LINLEN LDA (V2),Y STA (V3),Y INC V3 BNE PYN1 INC V3+1 PYN1 INC CNT2 BNE PYN2 INC CNT2+1 PYN2 LDA CNT2 CMP YLN BNE s}PYLP LDA CNT2+1 CMP YLN+1 BNE PYLP JSR ROMON LDX #$10 LDA #CPBIN STA ICCOM,X LDA #5 STA ICBLL,X LDA #0 STA ICBLHt},X LDA #PLINE:L STA ICBAL,X LDA #PLINE:H STA ICBAH,X JSR CIOV LDA #CPBIN STA ICCOM,X LDA YLN STA ICBLL,X LDA YLN+1u} STA ICBLH,X LDA #PLBUF:L STA ICBAL,X LDA #PLBUF:H STA ICBAH,X JSR CIOV INC CNT BNE PXN1 INC CNT+1 PXN1 LDA CNT Cv}MP XLN BEQ PXY1 PXN2 JMP PXLP PXY1 LDA CNT+1 CMP XLN+1 BNE PXN2 CLOSE 1 RTS * LOAD KAN,LEN LOAD PLA PLA PLA ASL w}ASL ASL ASL TAX PLA STA CNT+1 PLA STA CNT LDA #SCREEN:L STA V1 LDA #SCREEN:H STA V1+1 LOADLP LDA CNT+1 BNE LN1 x} LDA CNT BEQ ENDLOAD STA ICBLL,X LDA #0 STA ICBLH,X JMP RDBUF LN1 LDA #0 STA ICBLL,X LDA #1 STA ICBLH,X RDBUF LDA #y}CGBIN STA ICCOM,X LDA #PLBUF:L STA ICBAL,X LDA #PLBUF:H STA ICBAH,X JSR CIOV JSR ROMOFF LDA CNT+1 BNE LN2 LDA #0 z} STA CNT JMP LCOP LN2 DEC CNT+1 LCOP LDY #0 LCOPLP LDA PLBUF,Y STA (V1),Y INY BNE LCOPLP JSR ROMON INC V1+1 JMP LO{}ADLP ENDLOAD RTS * SAVESCR KAN SAVESCR PLA PLA PLA ASL ASL ASL ASL TAX LDA #CPBIN STA ICCOM,X LDA #0 STA ICBLL|},X LDA #$1E STA ICBLH,X LDA 88 STA ICBAL,X LDA 89 STA ICBAH,X JSR CIOV RTS * CALCLEN LEN->LEN CALCLEN PLA PLA ST}}A 213 PLA STA 212 AND #15 BEQ CALCOK CLC LDA 212 AND #$F0 ADC #$10 STA 212 LDA 213 ADC #0 STA 213 CALCOK RTS * ~}INVERT SIZE INVERT PLA PLA TAX INX PLA JSR ROMOFF LDY #0 LDA #SCREEN:L STA V1 LDA #SCREEN:H STA V1+1 INVLP LDA }(V1),Y EOR #$FF STA (V1),Y INY BNE INVLP INC V1+1 DEX BNE INVLP JMP ROMON * INVTXT ADR,LEN,MASK INVTXT PLA PLA }STA V1+1 PLA STA V1 PLA PLA TAX PLA PLA STA V2 LDY #0 ILP LDA (V1),Y AND #127 ORA V2 STA (V1),Y INY DEX BNE IL}P RTS XBGET PLA PLA PLA ASL ASL ASL ASL TAX LDA #CGBIN STA ICCOM,X PLA STA ICBAH,X PLA STA ICBAL,X PLA STA }ICBLH,X PLA STA ICBLL,X JMP CIOV SFONT PLA PLA PLA STA CHANN PLA PLA STA XLN PLA STA LINLEN+1 STA YLN+1 PLA ST}A LINLEN STA YLN JSR ROMOFF ASL YLN ROL YLN+1 ASL YLN ROL YLN+1 ASL YLN ROL YLN+1 LDA #SCREEN:L STA V1 STA V2 }LDA #SCREEN:H STA V1+1 STA V2+1 LDA #0 STA CNT STA CNT+1 STA XLN+1 LDA #PLBUF:L STA V3 LDA #PLBUF:H STA V3+1 FONT}LP LDX #8 LDY #0 FYLP LDA (V2),Y STA (V3),Y INC V3 BNE FN01 INC V3+1 FN01 CLC LDA V2 ADC LINLEN STA V2 LDA V2+1 ADC} LINLEN+1 STA V2+1 DEX BNE FYLP INC XLN+1 LDA XLN+1 CMP XLN BNE NNY LDA #0 STA XLN+1 CLC LDA V1 ADC YLN STA V1 }LDA V1+1 ADC YLN+1 STA V1+1 NNY CLC LDA V1 ADC XLN+1 STA V2 LDA V1+1 ADC #0 STA V2+1 INC CNT BNE FONTLP INC CNT+}1 LDA CNT+1 CMP #4 BNE FONTLP JSR ROMON LDA CHANN ASL ASL ASL ASL TAX LDA #CPBIN STA ICCOM,X LDA #0 STA ICBL}L,X LDA #4 STA ICBLH,X LDA #PLBUF:L STA ICBAL,X LDA #PLBUF:H STA ICBAH,X JMP CIOV LINES DFW 0 CNT DFW 0 CNT2 DFW 0 }XLN DFW 0 YLN DFW 0 XO DFW 0 YO DFW 0 CHANN DFB 0 PINIT DFB 27,'@,27,'A,8 PLINE DFB 155,27,'K PLINLEN DFW 0 PLBUF EQU $60}00 HANN DFB 0 PINIT DFB 27,'@,27,'A,8 PLINE DFB 155,27,'K PLINLEN DFW 0 PLBUF EQU $60(* GIF-LOADER CIOV EQU $E456 ICCOM EQU $342 ICSTA EQU $343 ICBAL EQU $344 ICBAH EQU $345 ICBLL EQU $348 ICBLH EQU $349 ICAX1 } EQU $34A ICAX2 EQU $34B COPEN EQU 3 CCLSE EQU 12 CGTXT EQU 5 CPTXT EQU 9 CGBIN EQU 7 CPBIN EQU 11 KANNUM MACRO K }ANAL LDX #KANAL*16 MEND OPEN MACRO KANAL,AUX1,AUX2,FILENAME JMP OP1@ FNAM@ ASC FILENAME DFB EOL OP1@ KANNUM KANAL LDA # }AUX1 STA ICAX1,X LDA #AUX2 STA ICAX2,X LDA #COPEN STA ICCOM,X LDA #FNAM@ STA ICBAL,X LDA #FNAM@/256 STA ICBAH,X JSR } CIOV MEND CLOSE MACRO KANAL KANNUM KANAL LDA #CCLSE STA ICCOM,X JSR CIOV MEND BGET MACRO KANAL,LAENGE,BUFFER KANNUM } KANAL LDA #CGBIN STA ICCOM,X LDA #LAENGE STA ICBLL,X LDA #LAENGE/256 STA ICBLH,X LDA #BUFFER STA ICBAL,X LDA #BUFFE }R/256 STA ICBAH,X JSR CIOV MEND GET2 MACRO KANAL,BUFFER KANNUM KANAL LDA #CGBIN STA ICCOM,X LDA #2 STA ICBLL,X LDA }#0 STA ICBLH,X LDA #BUFFER STA ICBAL,X LDA #BUFFER/256 STA ICBAH,X JSR CIOV MEND GET MACRO KANAL KANNUM KANAL LDA # }CGBIN STA ICCOM,X LDA #0 STA ICBLL,X STA ICBLH,X JSR CIOV MEND BPUT MACRO KANAL,LAENGE,BUFFER KANNUM KANAL LDA #CPB }IN STA ICCOM,X LDA #LAENGE STA ICBLL,X LDA #LAENGE/256 STA ICBLH,X LDA #BUFFER STA ICBAL,X LDA #BUFFER/256 STA ICBAH },X JSR CIOV MEND MOV MACRO EXPR1,EXPR2 LDA EXPR1 STA EXPR2 LDA EXPR1+1 STA EXPR2+1 MEND ADD MACRO EXPR1,EXPR2 CLC }LDA EXPR1 ADC EXPR2 STA EXPR1 LDA EXPR1+1 ADC EXPR2+1 STA EXPR1+1 MEND SUB MACRO EXPR1,EXPR2 SEC LDA EXPR1 SBC EXPR }2 STA EXPR1 LDA EXPR1+1 SBC EXPR2+1 STA EXPR1+1 MEND EQUALW MACRO EXPR1,EXPR2,LABEL LDA EXPR1 CMP EXPR2 BNE EQ@ LDA } EXPR1+1 CMP EXPR2+1 BEQ LABEL EQ@ MEND NEQUW MACRO EXPR1,EXPR2,LABEL LDA EXPR1 CMP EXPR2 BNE LABEL LDA EXPR1+1 CMP }EXPR2+1 BNE LABEL MEND GREQW MACRO EXPR1,EXPR2,LABEL LDA EXPR1+1 CMP EXPR2+1 BCC GR1@ BNE LABEL LDA EXPR1 CMP EXPR2 } BCS LABEL GR1@ MEND LESSW MACRO EXPR1,EXPR2,LABEL LDA EXPR1+1 CMP EXPR2+1 BCC LABEL BNE LS1@ LDA EXPR1 CMP EXPR2 B }CC LABEL LS1@ MEND SHIFTR MACRO EXPR * >>(X) CPX #8 BCC SR@ LDA EXPR+1 STA EXPR LDA #0 STA EXPR+1 TXA SEC SBC #8 }TAX SR@ CPX #0 BEQ SRE@ SRL@ LSR EXPR+1 ROR EXPR DEX BNE SRL@ SRE@ MEND SHIFTL MACRO EXPR * <<(X) CPX #8 BCC SHL@ LD }A EXPR STA EXPR+1 LDA #0 STA EXPR TXA SEC SBC #8 TAX SHL@ CPX #0 BEQ SHLE@ SHLL@ ASL EXPR ROL EXPR+1 DEX BNE SHLL@ } SHLE@ MEND INC16 MACRO EXPR INC EXPR BNE IN@ INC EXPR+1 IN@ MEND DEC16 MACRO EXPR DEC EXPR LDA EXPR CMP #255 BNE D }E@ DEC EXPR+1 DE@ MEND DSTACK EQU $8000 SUFFIX EQU $9000 PREFIXL EQU $A000 PREFIXH EQU $B000 DECLINE EQU $6000 TMP EQU 2 }04 BUFPTR EQU 206 SP EQU 208 TMP2 EQU 210 V1 EQU 212 ORG $5980,$A800 JMP MAIN INITEXP LDX SIZE LDA TWOPOTL,X STA CLEAR } LDA TWOPOTH,X STA CLEAR+1 INX STX CURRSIZE LDA TWOPOTL,X STA TOPSLOT LDA TWOPOTH,X STA TOPSLOT+1 CLC LDA CLEAR AD }C #1 STA ENDING LDA CLEAR+1 ADC #0 STA ENDING+1 CLC LDA ENDING ADC #1 STA SLOT STA NEWCODES LDA ENDING+1 ADC #0 S }TA SLOT+1 STA NEWCODES+1 LDA #0 STA NABYTES STA NBITS RTS LGNBUF LDA NABYTES BNE L01 STA PBYTES GET 1 STA NABYTES } BEQ L01 STA ICBLL,X LDA #CGBIN STA ICCOM,X LDA #0 STA ICBLH,X LDA #BYTEBUFF:L STA ICBAL,X LDA #BYTEBUFF:H STA ICBA }H,X JSR CIOV L01 RTS GETNEXT LDA NBITS BNE GN00 JSR LGNBUF GN01 LDX PBYTES LDA BYTEBUFF,X STA B1 INC PBYTES LDA #8 } STA NBITS DEC NABYTES GN00 LDA B1 STA RET LDA #0 STA RET+1 LDA #8 SEC SBC NBITS TAX SHIFTR RET GN02 LDA CURRSIZE } CMP NBITS BCS GN031 GN032 JMP GN03 GN031 BEQ GN032 JSR LGNBUF GN04 LDX PBYTES LDA BYTEBUFF,X STA B1 INC PBYTES STA }TMP LDA #0 STA TMP+1 LDX NBITS SHIFTL TMP LDA RET ORA TMP STA RET LDA RET+1 ORA TMP+1 STA RET+1 CLC LDA NBITS AD }C #8 STA NBITS DEC NABYTES JMP GN02 GN03 SEC LDA NBITS SBC CURRSIZE STA NBITS LDX CURRSIZE LDA RET AND CODEMSKL,X }STA RET LDA RET+1 AND CODEMSKH,X STA RET+1 RTS MAIN PLA PLA STA LINWIDTH+1 PLA STA LINWIDTH PLA PLA STA OUTMODE } LDA 54017 PHA ORA #2 STA 54017 LDA #0 STA NABYTES STA NBITS GET 1 STA SIZE JSR INITEXP LDA #0 STA OC STA OC+1 }STA FC STA FC+1 LDA #DSTACK:L STA SP LDA #DSTACK:H STA SP+1 LDA #DECLINE:L STA BUFPTR LDA #DECLINE:H STA BUFPTR+1 } LDA LINWIDTH STA BUFCNT LDA LINWIDTH+1 STA BUFCNT+1 MAINLOP JSR GETNEXT MOV RET,C NEQUW C,ENDING,NEND1 EGIF1 JMP ENDGI }F NEND1 EQUALW C,CLEAR,CLR JMP NCLR CLR LDX SIZE INX STX CURRSIZE LDA TWOPOTL,X STA TOPSLOT LDA TWOPOTH,X STA TOPSLOT+ }1 MOV NEWCODES,SLOT WNCLR1 JSR GETNEXT EQUALW RET,CLEAR,WNCLR1 MOV RET,C EQUALW C,ENDING,EGIF1 LESSW C,SLOT,NHAP1 LDA }#0 STA C STA C+1 NHAP1 LDA C STA FC STA OC LDY #0 STA (BUFPTR),Y LDA C+1 STA FC+1 STA OC+1 INC16 BUFPTR DEC16 BU }FCNT LDA BUFCNT BNE ECLR LDA BUFCNT+1 BNE ECLR JSR OUTLINE LDA #DECLINE:L STA BUFPTR LDA #DECLINE:H STA BUFPTR+1 }LDA LINWIDTH STA BUFCNT LDA LINWIDTH+1 STA BUFCNT+1 ECLR JMP MAINLOP NCLR MOV C,CODE LESSW CODE,SLOT,NNEW1 MOV OC,CODE } LDY #0 LDA FC STA (SP),Y INC16 SP NNEW1 LESSW CODE,NEWCODES,NNEW2 CLC LDA CODE ADC #SUFFIX:L STA TMP LDA CODE+1 A }DC #SUFFIX:H STA TMP+1 LDY #0 LDA (TMP),Y STA (SP),Y INC16 SP CLC LDA CODE ADC #PREFIXL:L STA TMP LDA CODE+1 ADC # }PREFIXL:H STA TMP+1 LDA (TMP),Y PHA CLC LDA CODE ADC #PREFIXH:L STA TMP LDA CODE+1 ADC #PREFIXH:H STA TMP+1 LDA (T }MP),Y STA CODE+1 PLA STA CODE JMP NNEW1 NNEW2 LDA CODE LDY #0 STA (SP),Y INC16 SP GREQW SLOT,TOPSLOT,NNWC1 CLC L }DA SLOT ADC #SUFFIX:L STA TMP LDA SLOT+1 ADC #SUFFIX:H STA TMP+1 LDY #0 LDA CODE STA (TMP),Y STA FC LDA CODE+1 STA } FC+1 CLC LDA SLOT ADC #PREFIXL:L STA TMP LDA SLOT+1 ADC #PREFIXL:H STA TMP+1 LDA OC STA (TMP),Y CLC LDA SLOT A }DC #PREFIXH:L STA TMP LDA SLOT+1 ADC #PREFIXH:H STA TMP+1 LDA OC+1 STA (TMP),Y INC16 SLOT MOV C,OC NNWC1 LESSW SLOT, }TOPSLOT,NNWSZ LDA CURRSIZE CMP #12 BCS NNWSZ INC CURRSIZE ASL TOPSLOT ROL TOPSLOT+1 NNWSZ LDA SP CMP #DSTACK:L BNE N }EPOP LDA SP+1 CMP #DSTACK:H BEQ ENDPOP NEPOP DEC16 SP LDY #0 LDA (SP),Y STA (BUFPTR),Y INC16 BUFPTR DEC16 BUFCNT LD }A BUFCNT BNE NOUT2 LDA BUFCNT+1 BNE NOUT2 JSR OUTLINE LDA #DECLINE:L STA BUFPTR LDA #DECLINE:H STA BUFPTR+1 LDA LIN }WIDTH STA BUFCNT LDA LINWIDTH+1 STA BUFCNT+1 NOUT2 JMP NNWSZ ENDPOP JMP MAINLOP ENDGIF EQUALW BUFCNT,LINWIDTH,EGIF2 JSR } OUTLINE EGIF2 PLA STA 54017 RTS OUTLINE LDA OUTMODE ASL TAX LDA OUTTAB,X STA OUTJMP+1 LDA OUTTAB+1,X STA OUTJMP+2 }OUTJMP JMP OUT1 OUTALL LDX #$20 LDA #CPBIN STA ICCOM,X LDA LINWIDTH STA ICBLL,X LDA LINWIDTH+1 STA ICBLH,X LDA #DECL }INE:L STA ICBAL,X LDA #DECLINE:H STA ICBAH,X JSR CIOV RTS OUT1 LDA #DECLINE:L STA V1 STA TMP LDA #DECLINE:H STA V1+ }1 STA TMP+1 LDA LINWIDTH+1 STA PRESSCNT+1 LDA LINWIDTH STA PRESSCNT LDX #8 LDY #0 PRESS1 LDA (TMP),Y LSR LDA (V1),Y } ROL STA (V1),Y INC16 TMP DEC16 PRESSCNT DEX BNE NNXT1 INC16 V1 LDX #8 NNXT1 LDA PRESSCNT BNE PRESS1 LDA PRESSCNT+1 } BNE PRESS1 LDA LINWIDTH AND #7 BEQ NSH1 EOR #7 TAX LDA (V1),Y SLP1 ASL DEX BPL SLP1 INC16 V1 NSH1 LDA #0 STA (V1 }),Y LDA LINWIDTH STA TMP LDA LINWIDTH+1 STA TMP+1 LSR TMP+1 ROR TMP LSR TMP+1 ROR TMP LSR TMP+1 ROR TMP LDA TMP }LSR BCC EVEN1 INC16 TMP EVEN1 LDX #$20 LDA #CPBIN STA ICCOM,X LDA TMP STA ICBLL,X LDA TMP+1 STA ICBLH,X LDA #DECLIN }E:L STA ICBAL,X LDA #DECLINE:H STA ICBAH,X JSR CIOV RTS OUT2 LDA #DECLINE:L STA V1 STA TMP LDA #DECLINE:H STA V1+1 } STA TMP+1 LDA LINWIDTH+1 LSR STA PRESSCNT+1 LDA LINWIDTH ROR STA PRESSCNT LDX #4 LDY #0 PRESS2 LDA (TMP),Y AND #3 } STA TMP2 LDA (V1),Y ASL ASL ORA TMP2 STA (V1),Y CLC LDA TMP ADC #2 STA TMP BCC NI2 INC TMP+1 NI2 DEC16 PRESSCNT }DEX BNE NNXT2 INC16 V1 LDX #4 NNXT2 LDA PRESSCNT BNE PRESS2 LDA PRESSCNT+1 BNE PRESS2 LDA LINWIDTH LSR AND #3 BEQ }NSH2 EOR #3 TAX LDA (V1),Y SLP2 ASL ASL DEX BPL SLP2 STA (V1),Y INC16 V1 NSH2 JMP NSH1 OUT4 LDA #DECLINE:L STA V1 } STA TMP LDA #DECLINE:H STA V1+1 STA TMP+1 LDA LINWIDTH+1 STA PRESSCNT+1 LDA LINWIDTH STA PRESSCNT LSR PRESSCNT+1 RO }R PRESSCNT LSR PRESSCNT+1 ROR PRESSCNT LDX #2 LDY #0 PRESS4 LDA (TMP),Y AND #15 STA TMP2 LDA (V1),Y ASL ASL ASL AS }L ORA TMP2 STA (V1),Y CLC LDA TMP ADC #4 STA TMP BCC NI4 INC TMP+1 NI4 DEC16 PRESSCNT DEX BNE NNXT4 INC16 V1 LDX }#2 NNXT4 LDA PRESSCNT BNE PRESS4 LDA PRESSCNT+1 BNE PRESS4 LDA LINWIDTH LSR LSR AND #1 BEQ NSH4 LDA (V1),Y ASL A }SL ASL ASL STA (V1),Y INC16 V1 NSH4 JMP NSH1 OUTTAB DFW OUTALL DFW OUT1 DFW OUT2 DFW OUT4 * DATEN PRESSCNT DFW 0 }LINWIDTH DFW 0 CURRSIZE DFB 0 CLEAR DFW 0 ENDING DFW 0 NEWCODES DFW 0 TOPSLOT DFW 0 SLOT DFW 0 B1 DFB 0 PBYTES DFB 0 BYTEB }UFF EQU $600 CODEMSKL DFB %00000000 DFB %00000001 DFB %00000011 DFB %00000111 DFB %00001111 DFB %00011111 DFB %0011111 }1 DFB %01111111 DFB %11111111 DFB %11111111 DFB %11111111 DFB %11111111 DFB %11111111 CODEMSKH DFB %00000000 DFB %000 }00000 DFB %00000000 DFB %00000000 DFB %00000000 DFB %00000000 DFB %00000000 DFB %00000000 DFB %00000000 DFB %00000001 } DFB %00000011 DFB %00000111 DFB %00001111 TWOPOTL DFB 1,2,4,8,16,32,64,128 DFB 0,0,0,0,0,0,0,0 TWOPOTH DFB 0,0,0,0,0,0, }0,0 DFB 1,2,4,8,16,32,64,128 NABYTES DFB 0 NBITS DFB 0 CODE DFW 0 OC DFW 0 FC DFW 0 BUFCNT DFW 0 C DFW 0 SIZE DFB 0 RET D }FW 0 OUTMODE DFB 0 W 0 C DFW 0 SIZE DFB 0 RET D aMN00PRECHOICRINFINAREBEL1EXC1ANIMCIRCMLCHJOYMUSTITEINITIATPREAMBLABBUKEBACKGPMBEGIXYXPPMZ}EROPPMAXYPMDEFNUMINUMBECIRCOUNCIRCENNXTCIRKILLEFIXECHOLASTOFINAMABBUCABBUDLISSCRMEANISCORXYXYC}HOPPEEPITAPSURVPXYXYHSCROXYFIRSBELLSAJUSFSTEPSWAMSLASEEXJOYALEFBEMOD1e;WFK}_``` Av1 1    @@eEF>I@2}AHABqA@B2QAUBcA@6UH !"}#$%&'()*J+U_,-./012}3U4 P56789;T:;nS?@A}BCDEFGH\eIJK+dLeM_^NOPbQ}RST Π͛PP(E2P<PFPPFZTOss;@,;@}2,;AR,9A,;@I,;@I,;@,;@,;A,;@d,MM67@<@P,.2}B.*46BcBN*8h8 NJ,88II67@Q<@,..NJ,8Nj<<6`pNj6cp;;6}7@<@2,.  ..nNgco2MM67@<@P,.28<|~>??>>3B.*4}6Bc$MM67@Q<A,.2BN*8h8 NJ,88NJ,8@ \.MM67A<AP,.2{xx<<>>6c}Nj<<6`pN8MM67AQ<A,.2j6cpB.*46BcBN*8h8 `\n||BMM67A}<AP,.2<88<~vcNJ,88NJ,LMM67AQ<A,.28Nj<<6`pNj}6cpO|||<<VMM67A<AP,.2>>vB.*46BcBN*8h`MM67AQ<A,.28 }NJ,88NJ,8>|\l>>.>;3wjMM67A<AP,.2Nj<<6`pNj6cptM}M67AQ<A,.2B.*46BcBN*8h8 Ǝ;~MM67A<AP,.2NJ,8}8NJ,8NMM67AQ<A,.2j<<6`pNj6cp?/?3wMM67A<AP},.2B.*46BcBN*8h8 NJ,MM67AQ<A,.288NJ,8?; }MM67A<AP,.2Nj<<6`pNj6cpB.*46MM67AQ<A,.2BcBN*8}h8 ?ϏMM67A<AP,.2NJ,88NJ,8Nj<<6`pMM67AQ}<A ,.2Nj6cp  >/Oώ@! ,MM67A <A P,.2B.*46BcBN*8h8 N}J,88NMM67A Q<A,.2J,8 ..nNgcoNj<MM67A<AP,.2<}6`pNj6cpB.*46BcBN*MM67AQ<A,.28h8 2wNJ,}MM67A<AP,.288NJ,8Nj<<6`pNj667AQ<AR,.cp MM67@<@P},.28846B|D!AN< |DMM67@Q<A,.2^N<4bB$"Bb9+>23"` BAy366"}cBMM67A<AP,.2~<<6&b#\8<6f\8|d(EE67AQ<A,.*j|lC}Li,lBMi><~B2MM67@<@P,.2yyl`yyl`yyyyyyyl`Q[`[lllllylylyly<))67@Q<@d},.yl[`l`yyyyyl`lFQPTO +@'AAH'AR@-@@(@}ABBUC SURVIVAL( FOR ABBUC ""( by F E Nommensen1(1(%Ref:Wettbewerb ABBUC mag.23 An}y key )*Q/T4O><HPRP\=fQpTO6-AH +@!A}!-@@##(@HOW MANY CONDEMNED--@@-(@ MAN, SIRE?6-F:A,&@}BByB2w@6-AV$'6-A6-@'6-B2Q K6-A!A@V}-A9AKA#@ P6-C:,  6-6-P$  . <8 ]B ?L !A }V ,,($Have mercy Sire, I've but 3 digits!!` Aj ((=!@*&P:,"* At B~ 6- 6}- 6- 6- 6- 6-@  6.6.6.  '6-6-'6-}@ Q T( O2 `@< \-@@\(@9To survive, ABBUC which number, you choose t}o be?F Y-@@Y(@6Choose 0, if Quickwit's advice you want to seeP  Z <d ]n nu}mber?:x ""=**&P:," B `(ABBUC= " P `(ABBUC= (An}y key to continue) B2QA@ B2PA@ 6- A Q T O Ҡٛ} -@ 68,-   Πٛ + 6-6- AR@ 6-}@x6-P 6-C:,%@& P0 <: <D , -,(8+$@,%'@%@,N ((8+$@,%'@}%@,"X  -(b Al 6-%@v %%="@@)@$%'@" 6-%@6- --}="@)@$%'@%@! 6-U:A`, 6-U:@, %@"@ %@#@f }8%@$%A" @-@@(&     4-@4( }  B-@B((   B-@B((  }  B-@ B((   ǠΛ 6-@} -@@6@ 67B:,%@,.[ 67B:,%@,.=:8,,* %%-@B:,a@6@4  }67B:,%@,. >  H 67B:,%@,.] R ' 8,"'67B:,&@,. \  f 0067B:,%@,. } p 6-@B:,267<,.>:@:7<,,&@2,6 z ΠĠӠٛ 6- }6- P Q T Oě < 6-%@ ! - 8," ( @ ( }8,A 6-6-$6-@. -( 8"@* @6B-%@( L@V }@6-&@`@j)@6-@6)6-&@tA~AA36-6-'6-}36-A"@P 8,"'6-@6-@'6-@A@ԠƠ}ś -( "! -@6&@( A@(-&@( 2}"@*"@2<-@6@( FAPAZ76-%@"@@)6-76-%@d6-}@n6-%@x68,-8,PA%"@*"@%6-@=")"@Q}TOԠƠӛ!@ @ -(8&@,8&@," -(A}A6-%@)"@@6-)6-%@"A,Q6T@OJΠΠΠٛT} @^ -(6-6-h@r6-6-@|A6-%@)"@@6-)6-}%@6-6-%@"&@6-@QTOЯ͠ś 6-% }9%@QTOҠЯ͛ 6-%AY@F&09%@A(:}QDTNOΠЛX=6-Ar6-@x'6-Ah9A@V=Pb=6-A6-@'6-}A@9AAT=Pl6-BBvvA#@6-@6-A6-@ 6-6-}6-B2H%6-AP%AAT"6-C:,&@<-@6-%@}+6-%@"!C:,%@+6-C:, "5%A59%A%A@@ $$9C:,}%@"%A@A !@(*6-%@4P>AH R"@H\6-@6-G}fAp z:C:,C:,%@@FP="@H6-@A'6-@6-'6-@}<6-C:,&@<a@"P"@3Pa@$"+++@*",)+} @*"@,6-@A"@P$@.6-%@8++!*@)+&@"*"@},B6-%@6-&@L6. V@` !6-@j6. [ ] t6.=:8,,~ }>B:, @67B:,%@,. ?67@<@,.* 8,"*67@<@,. A6!}-@B:,267<,.>:@:7<,,&@2,6 67<%@,.%%6-@$%@6.7@7<"}@B,"@H6-AA"@2 !!67@4<@9,.6-A$"@#}(A2A<PFAPa@"Z 6-6-d6-B2Qn6-Ax6-%@P$} 6-6-@6 6-@ 6-A6-B2P6-Ah6-%@PA%}6-%@ 6-6-6-A6-B2H6-%@"P,+6-%@"A+6-&@%6&} 6-6-6-A@@6-B2IJPT"^5%A59%A%A@h:C:,'}C:,%@@Fr@|$$9C:,%@%%A@A )6-%@!@)6-6(}-%@="@H="@QT&O&ԠͤϠǠӛ"@$1167%@<%)}@,.7B:,&@")"P,}?"@--(% --(% !! HOW SAD !! --(% ! -}ABBUC you are DEAD ! --(% --(% If it is a lie, --(.}% press a key, have another try 6-@HP6-)6-@7-@@7(Of /} man in a deathly row/-@@/( As number 8@,#-@@#( You ABBUC$*-@@0}*(Are FREE to GO !.-@)@( 8PBALB2wVB2HA@`B2IA1}@jB2PA@tB2QA@~6-QTOçӠś< 6-C:,-@2}@--6-@t%++&@P,#@,]@ 6-6-6-A@6-B2IPP6-%@3} M@ M'2@:7<,,@@56-%@A"@eM6-@  =Y0(%%24}2Q<TXOb"6-@l%%2@@@v%%2@5}@6-%%2@%%2@@@@AQ6}TO -@6@2@A@ QTO -@6?P7} 2@t@2@@4@ 2@@W@*2@@H@8}4 M@> H"12S2@u2@9}2@RQ\TD:ABBSURVI.TRBu2@SCDAXYTOTPODILOEEDURKILOFTOETZAEHTESWAIAUTQCHR@@!AA~A@;} @@@ @@!@A&Q@<}@I@ %%*******************************%%** **%%** LOESUNG ZUR KREIS-A=}UFGABE **(%%** **2%%** VON ROLAND STIEBEL **<%%** **F%%>}*******************************PZTdn +@x00(@ LOESUNG ZUM WETTBEWERB+(@?}+(@KREIS - AUFGABED(@(@D(@ ERDACHT UND PROGRAMMIERT (@ (@V@}ON .(@.(@ ROLAND STIEBEL0@@( TASTE :1@@A}K:5)@@ +@0@!!(@ 'KREIS'-SPIEL(@##(@ B}BITTE ANZAHL DER$$(@ REBELLEN EINGEBEN(ANZAHL : +@0@"##(C}@ UM DIE SCHUESSE ,$$(@MIT DEM FEUERKNOPF 6/$(@ZU BETAETIGEN BITTE/(@@(@D} <0> TIPPENJ##(@<1> FUER AUTOMATIKO(BITTE MODUS EINGEBENT2#@@K:')2@E}Y"@I6-@Z"@H6-[%%+!@I,)+ @H,A@^Th********************F}r** KREIS ZEICHNEN **|******************** +@$0@@@0@G}9,9,9, @-@))68,-G:$A`',$@%A))68,-E:$A`',$@H}%A68,-@,8,8, ************************ STELLE ERRECHNEN ***************I}*********-@&6-@#0 A: D6-'@N 6-&X6-$@%@J}b##YA@  DER SCHLAUEl!!YA@0 BIT-BYTERv##YA@@ STELLT SICH##YA@PK} AN STELLE YA@P!!YAA ES STIRBT""YAA GERADE NR.T **********L}**************** ** DURCHGANGS - PRUEFER ** **************************6--@ 8,"@M} 6-%@ "@A p-@ 8,"@ A`   A *4N}T>************************H** TOETUNGS - PRUEFER **R************************\"@Af6-@O}p$z68,- A 6-@ AT************ ENDE ************!P}!Y@ @ KOEPFCHEN&&Y@ AZAHLT SICH AUS,8,&@8,&@/8,8,,8,%Q}@8,&@/8,8,,8,8,&@/8,8,%%YAA %%YAAR} %%YAA  $-@A0 .%%YAA NOCHMAL (J/N)8S}2#@@K:')2@B"@t%L%D:MEN*.*VT`*****************j** ERSCHIET}SSEN **t*****************~""T:,%"@AP%%2@@A@ @,AU}A/8,8, ,AA/8,8, @YAA  YAV}A %%2@$ D:KREIS.TUR @YAA  YALZ[CShJNCONSOWIPFEIPOEXRESPOSPOSMMSPROWOLCOLOLROWNECOLNEINDTOTINDTO@@dX}@AU@d@@d @ @9 @y @@ @bP@@&hF@wI@Y}@@@e@@At7P@c@@ TLoesung desABBUC-RaetsZ}el # 23( - von Volker Baral2 - aus Neckargemuend< - VER 3.0 /3.1.91FTP- a) [} EINGABEZTd;@,n+@%@x0@@0@@@0@@\}@##(@ABBUC-RAETSEL #23(@ *(@ (@ein KOENIG hat]}""(@feinde im eigenen!!(@land sowas soll(@ vorkommen.""(@die REBELLEN sin^}d!!(@gefangen worden.##(@der KOENIG hat be-(@ (@START<6-_}F: B2y,"="@,+@%@60@@@0@@@J(@ `} *T##(@schlossen, die RE-^$$(@BELLEN zu erschies-h$$(@sen (so grausam warr(@a} das frueher).|$$(@SIE sind einer die-(@ ser rebellen.$$(@bei der hinrichtung(b}@stehen alle im$$(@kreis. jeder zweite(@ (@SELECT<6-F: B2yc},="@+@%@0@@0@@@(@ *d}!!(@wird erschossen;""(@immer reihum, bis$$(@nur noch einer ueb-&""(@rig iste} (das kann0""(@nur einem kranken:##(@HIRN entspringen).D!!(@der KOENIG hatteN##(@f}wohl eine vorliebeX""(@fuer das makabre.b(@ l(@STARTv<6-F: B2y,g}="@+@%@0@@0@@@(@ *""(q}B%DOS SYSB*)DUP SYSB9SPCPIC SRCBLGIF SRCBbABBSURVITURB:KREIS TURB7WRAETSEL TURB UEBERLEBTURBLOSUNG TURBTITEL4 BASBABB24 PICB-TITEL5 BASB/TITEL2 BASB3CTITEL PICB"vTITEL3 BASABILDCHEN INFO COMPERESTR COMAUTORUN SYS@der ANFUEHRER ist$$(@der erste, der dran(@ glauben muss.(@ $$(@r}wo wuerden SIE sich""(@in der reihe hin-""(@stellen, wenn SIE!!(@am leben bleiben s}(@ wollen ? (@  (@SELECT*<46-F: B2y,>="@H6-@Rt}+@%@\0@@f0@@@p(@ *z""(@zuerst du}ie anzahl!!(@der REBELLEN mit (@den pfeiltasten!!(@(=/-) eingeben !(@ v}(@ (@ ANZAHL:(@ (@ (@ (@RETURNw}6-F: A0, A0@<-@ @(@ )$"@E6-%@.x}"@a6-&@8 @6-@B="AUL A0V!A`+@%@j-y}@t""(@SIE WOLLEN JA DAS~ (@GANZE VOLK AUS-(@ ROTTEN !!!!6-A z} MA APA"@+@%@-@""(@WIE KANN SICH EIN""({}@MENSCH ALLEINE IM##(@KREIS AUFSTELLEN ?6-@ MA AP A6-@|}+@%@(0@@20@@@<(@ *F$$(@jetzt }}ihre positionP (@im Kreis -- mitZ (@den pfeiltastend!!(@(=/-) eingeben !n(@~} x(@ (@ POSITION:(@ (@ (@ (@RETUR}N6-F: A0, A0@<-@@(@ )"@E6-%@}"@a6-&@ @6-@ !6-="AU" A0,T6- b) POSITION} ausrechnen@TJ(-@@ (-von 2 bis 256T%6-&@#%-abziehen von A^"h 6-r6-}@ |A  6-6-&@6-@ 6-@$+&+@#,,A TT}""-c) Trigonometrische Loesung- des KreisproblemsT +@00@}&0@@00@:0@@D)6-@9)--}------------ RadiusN""------------- Mittelpunkte:X(6-@y(-- X-Abstand (Spalte)b(6-@@(--- y-Absta}nd (Zeile)l---A= Anzahl Rebellenv&6-A`'&--- Winkelschritt*6-@*- Anzahl der Durchgaenge6}-$G:,%6-$E:,% 1!6-F: @,!6-F: @,6-$G:,%6-$E:,% 1}!6-F: @,!6-F: @,-@ "*" @@ @ A6-$G:$,% 6}-$E:$,%*!6-F: @,!6-F: @,4 ,>!6-F: @,!6-F: @,H R M@ \36-6}-'6-@36-f6-$G:+&@,$,%p6-$E:+&@,$,%z 1!6-F: @,!6-F: }@,-@-A`!6-F: @,!6-F: @,6-$G:,%6-$E:,% 1}"A%"@A%"@*"6-@ A%0A"@ ) @},6-@) A$ A !6-F: @,!6-F: @,$ "@*"@. "*"8 "@}B 6-L @V @` 6-@j A%0t A~ @ @ A A , 16-}6-' @P1M@ 6-%@ &@ A%P A     T " @} !!Y@ @  Richtig ! @( AA(9Sie haben sich leider an die falsche Position gestellt !2 6-%@< }AF MAP TZ !*d 8((#  ist der richtige Platz. 8( - mal n !!(sind Sie schon gestor}ben.x &&(Wollen Sie so weiter machen ?  J/N  A !*" &&(Dieses mal standen Sie richtig (}(# ) <-(%Wollen Sie nochmal Ihr Glueck heraus-<( fordern ? J/N  A "*" ""( Der Pla}tz #  war gut. ##(Bisher hatten Sie Glueck ! 88(0Wollen Sie nochmal Ihr Leben aufs Spiel setzen? J/N } A 4JAPANFANG 4N" ., @6 A(@ AJ TT VIELE GRUESSE^ AUS NECKARGEMUENDh }T D:RAETSEL.TURANFANG 4N" ., @6 A(@ AJ TT VIELE GRUESSE^ AUS NECKARGEMUENDh  6F]AGELIJGROTEKLEINESTEUSCHAABOLLEARMEBALBALBALBALBALBALBALBALBALBOEVETEKSRECHTLINKTE}KSTTOETNUMMERNUM12NUM45NUNUMNUMTEKSTSTARSTARWEGWEGLIJPUNOPNIEUXYTERUEINDVERDENIEURRRSNEGRAG}RAPREKESLOOPNIEUWTERUGEINDE@@xA @} }@ !"#$%&'()*g<}+,-./?0@p1A`2@3A`4@5@6|C78OD9@v:}@c;@g<=2>>>?R>@aDACBECkED;FdD:UEBERLEB.TURn+@%@}x%%(@********************%%(@* *%%(@* wer ueberlebt ? *%%(@}* ________________ *%%(@* *%%(@* IN TURBOBASIC *%%(@* } *%%(@* a b b u c *%%(@* *%%(@* G.VERHULST 90 *%}%(@* *%%(@******************** MAP9A,] +}"-@A,68,-@6 @B(B5Fuer wieliele Manner wollen Sie die Berechnung JB(B(7}1. Schnelle Berechnung des UeberlebendersTm(m(b2. Graphische Darstellung der Hinrichtung mit Pl}atzbezeichnung des Ueberlebenders.^(( Ihre Wahl ?h@r##@@K:|)@}&@Hb\TOPPQTOPPQTO +@$0@}@& @0W6-@p6-@v'6-@g36-@c?6-A`K6-@W6-A`:}b@D-N33,%$G:'+%@,$,%$E:'+%@,$,X b++YAVAb^ Platz des Ko}enigsl MAv6-6-@-@&@]6-%@ ! 6-&A}8,"\A]6-%@ ! 6-& A8," \*A4YA`}At >68,-H @R \ ,%f @p33,%$G:'+%@,$,%$E:'+%@},$,z33/%$G:'+%@,$,%$E:'+%@,$,%%2@@ M@P33,%$G:'+%}@,$,%$E:'+%@,$,33/%$G:'+%@,$,%$E:'+%@,$,%%2}77Y@Atgetoetet : Freiheitskaempfer N.YA`At 33,%$G:'+%@,$,%$E:'}+%@,$,33/%$G:'+%@,$,%$E:'+%@,$, M@P -@8,"@ }@;;b%$G:'+%@,$,%$E:'+%@,$,@$99Y@At! ueberlebt : Freiheidskaempfer N.}.YAtAt8GBAL V]`//Y@@Anoch ein Mal oder ?jQtT~O@}##@@K:)@"@:J,\A@:N,\A]+}] QTO( +->(>('Die Computer macht die Berechnung fuer  Manner2-@A}<68,-@F P6-Z6-@d-@&@n]x6-%@ ! 6-&}A8,"\A]6-%@ ! 6-&A8,"\A6}8,- "-@,8,"@6.(.(!Ueberlebt : Freiheitskaempfer N. @GJAT ^}]h"("(Noch ein Mal oder ?rQ|TD:UEBERLEBT.TURbt : Freiheitskaempfer N. @GJAT ^HO| ZANKEPd +A @1!}ACA@UA0@gA)@%yAVAAR@@!}`n//(' Lsung des Preisr tsels aus Magazin 23x ( ( (''(Wenn man jeweils die einzeilnenvv(mFaktoren eines Du!}rchgangs miteinander vergleicht, erkennt man, dass man, wenn man die Anzahl der Krieger umPP(G 2 erhoeht,alle gleichst!}elligen Faktoren je eine Gerade ergeben. Aus E?(7den Geraden leitet sich eine Menge ab, die so anf ngt:B(E(//('!} 2; 2;4; 2;4;6; 2;4;6;8; 2;4;6;8;10 ...-( ()(Taste f r n chste Seite...-)00((} Lsung des Preisr tsels aus Mag!}azin 23 ( ( (JJ(BDie g nstigste Position l sst sich aus folgender Tabelle ablesen:(//('Anz.: 3 4 5 6 !} 7 8 9 10 11 12 ...//('Pos.: 2 4 2 4 6 2 4 6 8 2 ...(tt(lMan erkennt, dass als Lsungsmenge led!}iglich Teilmengen ans der Menge der geraden Zahlen [2, 4, 6,...](aneinandergeh ngt sind.uu(lDas l sst sich graphi!}sch relativ ein- fach darstellen, jedoch nur von 3 bis 319 (wegen der Graphikaufls" (ung).,rr(iWenn man bei der!} Zeichnung alle Werte mit 2 multipiliziert, so erh lt man den doppelten Umfang mit der 6XX(Phalben Genauigkeit. Damit i!}st der beste Standpunkt f r Anz.=400 die Position 30.@$($(Taste f r die Graphik...J)TT^q +@A !}@1ACA@UA0@gA)@%q@hTr/6-@6-@/!}-@A| ,16-%@!#6-@16-%@ T-@A@,!}@P/@R ;-@@P@+,7/@; -@A@,!}@P/@T --@PAA-Y@X,@P/@V -AA!}A),@P/@X)Y@` &9,@0@'/@0A9/@PA0Y@!}@Pos.:Y@RAAnz.DTN(Anzahl Krieger:X: @)!A0(Nur von 3 bis 31!}9!: AbTl -@I6@v 1,"@' A` ( Position:$!}-6@ ,$ T (Taste) AP D:LOSUNG.TURA` ( Position:$ W34 FNDLEDLESCSCJNMILOADDLSUPMBASXY@TA(@A)@%}B0! Av AV B4 AV A4@A@AY%}6-F:A,&@ A;@, B $ AAAF:A,&@4 +AYP%}-AhA$Z$AV%d i #AEn-A A@x/"$AV%/$A%}V%%@ -AUA"$AV% ##255,255,219,219,219,195,195,0##255,255,19%}5,195,255,255,195,0##255,255,192,207,207,195,255,0##255,255,195,195,255,255,195,0255,255,3,12,48,192,255,0%}255,24,24,24,24,24,255,0##227,227,211,211,203,203,199,0ee255,255,195,195,3,3,3,255,255,192,192,192,195,195,255,255,0%},192,192,198,198,198,198,198,255,2556,6,6,6,6,6AY@F'A@U'AA BBy%}B2w@'B2Y@'B2X@A#@AY7@7@%}@ D:ABB24.PIC3A`Aa'@3@6-?:C:,,1-AhAT%}-$AV%1 "AY@F,%2AE@@G2@AH@@i2@%}AQ@@2@AT@@6-A @?-@P#B2Q7%}-@@; ? E?-A#B2P7-@@; ? G-A J36-@%}P6-A'6-@36-@T 6-%6-%^B2QB2Ph!A6-6@r!A%}6-6@w"@ 6-@y"@ 6-@z F:B2y,"@A| A@, +%}B2w,%D:MEN*.* +@$W6-F:A`,!6-F:Aa,06-F:@,?6-F:@,W6-%%}AV$%@F:,"@@,F:,"@y@x,6-%@*F:,@e 6-%@*%} A $};Au,} #B @ }5-@Au")67<,.>:,16-%5 }B4(FEHLER%}}$(}cc104,162,16,169,7,157,66,3,160,1,132,213,169,0,157,72,3,157,73,3,32,86,228,164,213,192,8,208,22}dd133,212,192,14%},48,7,192,19,16,3,153,182,2,200,192,28,48,219,16,8,80,46,66,46,32,39,56,54,169,0<}cc133,219,133,220,165,88,133,215,133,217,%}165,89,133,216,133,218,169,0,133,214,157,72,3,157,73,3F}bb32,86,228,16,1,96,168,41,128,133,222,152,41,127,208,24,169,0,157,%}72,3,157,73,3,32,86,228,133P}cc214,169,0,157,72,3,157,73,3,32,86,228,133,213,169,0,157,72,3,157,73,3,32,86,228,133,221,160,%}0Z}ee165,221,145,215,56,165,213,233,1,133,213,165,214,233,0,133,214,144,170,165,212,201,2,208,10,230d}bb215,208,73,230,21%}6,208,69,144,219,230,220,24,165,215,105,80,133,215,144,2,230,216,169,96,197n}cc220,208,48,169,0,133,220,165,219,208,19,169,%}1,133,219,24,165,217,105,40,133,215,165,218,105,0x}ee133,216,144,21,169,0,133,219,24,165,217,105,1,133,215,133,217,165,218,%}105,0,133,216,133,218,165}cc213,208,7,165,214,208,3,24,144,160,165,222,16,13,169,0,157,72,3,157,73,3,32,86,228,133,221,24%}} 144,156 D:LADER24.BAS,208,7,165,214,208,3,24,144,160,165,222,16,13,169,0,157,72,3,157,73,3,32,86,228,133,221,24$"( h  U;U4,VjhjDTU 331 -Vjh*QU7tw)}wtw7  DTU=݁3#"Uwtwxtwxẃ"  )}DTU݄=?3030") "*" QU@KwHtw@'f fEU0߄)} """U@p  Uh fUЁ0"U)}"""U TU)UTf"U@T)UT@"" " "U (PTUT)}P f *U030 (@PT UTP@" ""U$@h(f hUDEU,)}@h(" ""QU6fUEU" "?U )U " ")}U )U9()U+ DUTU4 UQUJUDUUDTU   UUU )} ?3003<0? 03<3 0?0uwwUDU ?<303?<3020?0? 03<30u5}UU@pLC)}@C_<< < )}݁U>PRJ*U*UTPB PUPJBRUPBPU*JBP 3zwWURBJ UT*)}UUTRJ*@UUHJRPURJRU* JR]݁]UU@UUUT PUUT UU)}U 3wUU UUUEU@TUU!UTPU*P݁UTUT)} J*JR* RTRBJ*RBJ*B*U 03U@UUT J BR*BPPRJ )}PRJ * *U@U K ++++ 03UK +++ +UE)}U>UHU+U $DEDEU -U 7wtpw (UEDEU 2)}UU6vrw UWUuTUUWU  ل݁ U]UU U]Uff'wp3UWU Uw)}uUifi݁3UU]Uf{fwf+ 1@TUEQUTUWUwuUiefY݁1PTU U]Ufkkfwf)}k& @PTUDT Ufjf݁fi &@PUUUfwvf{f4UTDE UfVY݁*}fe 4UQQUQUffgwfkf $UWEDUQUffjfi U] Uffgwvfvf*}ff UE Ui݁i -U UEDUQUffjfi U] Uffgwvfvf(:vADAPPSBA@@@3A`@@  AU.} AU @ @ 0u( (}AR@(;@ ,:uQ0@70@.}Q0@@DuX-@@#6-06-6@D-@@X-@.}@Nu-%@( Xu-%@( bu-%@( lu-%@( .} vu-%@(  u Bu-%@(  u-%@( u-%@.}( u-%@( u-%@( u Bu-%@( .}u-%@(  u-%@( u-%@( u-%@(  . }uA6-%@ !6-/6-%@3 7 A Bv-%@(  v-%@( . } v-%@(  v-%@( *v-%@(   4v-%@( . }>v$Hv6-6-@Rv+-@@+-@@\vG B6-%@ +6-96-. }%@= G Bpfv-%@( pv-%@( zv-%@( v-%. }@( v-%@(   v$v6-6-@ v+-@@+-@@.}v!-%&@!( v -%(   v -%( v 6-%@ v6-.}6-@v-@@v-@@v -%%(  w w6-%@w $w(6-.}6-@(;@,.w-@@8w-@@ Bw"Lw -%&(Vw -%&(`.}w jw6-%@tw ~w-@A w4 -@6@40@w)-@.}@P  ) BpwDD , , , ,, , , , wDD, , , .}, , , , , wDD, , , , , , , , wDD, , .} , , , , , , wDD, , , , , , , , w+@.}%@w1-1(@ *********w1-@1(@ * *w1-@.}1(@ * *w1-@1(@ * *x1-@1(@ ****.}***** x5-@ 5(@ atari bit byterx2-@2(@ user clubx5-@@.}5(@(x5-@@5(@ 2x5-@@5(@.} {0-(%AUCW (ATARI USER CLUB WOLFEN) welcher0$H{/(.,}/($sich damit erstmalig als neuesABBUC-R{-*("Mitglied am Magazin beteiligt,denn-$\{!!( Der ABBUC ist einf{(.-} Club zump{ ( mitmachen $z{A0@@70@@A B { ..}B D1:ATARI{ ( mitmachen $z{A0@@70@@A B { ,0<=}1 D MDAL''@B&t'@'++ AbA""--------20}--------------------(&&;@9,;AV,;@C,2116.'hhhhhhh֑`<556.+hhh 21}hhBhEhDhIhH VHԽI`F++6.!HiЩ逍Хh@P$$6-?:C:,-@@>($Es sollte nur ein W25}eilchen dauern...-@@  F:@ , @AA   -@26}6@@  F:@ , @A@A   +@9A27}'A 9A",,@@ D:TITEL.PIC,EE6-?:C:,<@<@} cke Start um diese Demo zu Beenden.  (PD) 1990 Alphasys.6@'@ 66-?:A,2?}*** RESET UND LADEN ***'6-?:AyE,'INTERRUPT STOPPEN.&G%2G2@2@}0G%2@G2@:1AA`'@@1+2A}D/-@+B2H%/ N%D:MEN*.* D:TITEL.BAShhhhhhh֑2B}`-@+B2H%/ N%D:MEN*.* D:TITEL.BAShhhhhhh֑0 ???6D}???6E}???6F}???*6G}??? 6H}?*** ?* ** *?T((*(*6I}*?UUUJ * ?UUUU**?UUUUT 6J} *?UUUUUR?UUUUUJ?UUUUUU*6K}?UUUUUUT?UUUUUUUB?UUUUUUUP ?6L}UUUUUUUU* ?UUUUUUPTJ?UUUUUUETRUR?UUUTU6M}U@AUJEUR?UUUUUU@UUUQU?UUUUUEUPTUUTT ?UUUUUEUQAU6N}UUUUT,,:}AC:,&AV$+P:C:,'AV,,HAP:C:,'AV,R,,AC:,&AV$+P:C:,'AV,,\AP:}:C:,'AV,f,,AC:,&AV$+P:C:,'AV,,pAP:C:,'AV,z,,AC:,&AV$+P:C:,'A:}V,,6-?:A6,AY@4 @'BBAH'AI +:}%D:MEN*.*DL%%6-F:A`,%F:Aa,$AV-@A@.:}A*A.%F:%,%A( $ VARSET ##67@,.>:F:C:,%@,, ##67@,.>:F:C:,%@:},,$ ##67@,.>:F:C:,%@,,. ##67@,.>:F:C:,%@,,8 $B INITCOLG KA'A :}A9A@VKA@L -@@V 67,.>:F:A,,` 67,.>:F:A ,,j 67:},.>:F:A,,t 67,.>:F:A,,~   67@,.>:@, $ SETML 6- % #A%6-:}A6%6-@d " -&@ " % 6-%    )(}ERROR $ :}!!--------------------------- DLI 84,9167( 104,169,27,141,36,2,169,62 141,37,2,169,42,141,0,2< 169,6,1:}41,1,2,169,192,141F !!14,212,96,169,0,133,207,141P 198,2,169,8,141,197,2,76Z ""98,228,72,138,72,166,207,141d 10,2:}12,189,0,80,141,22,208n 189,0,81,141,23,208,189,0x !!82,141,24,208,230,207,189,0 ""83,141,10,212,234,141,26,208 :}104,170,104,64 !!--------------------------- _ #A'@!-@@9%"367<,.>:,;6-%? KA5_:}(}ERROR IN FGET $ JJ104,104,104,10,10,10,10,170,104,104,157,66,3,104,157,69,3,104,157,68 DD3,104,157,73,3,104,15:}7,72,3,32,86,228,132,212,169,0,133,213,96 D8:TITEL3.BAS57,73,3,104,158oUUUU@UUUUUUPU@UUUUUUUUUUUUUPUP@TUUUUUUUUUUPPUPU@>} UUUUUUUTPUjU*UQUPPjT)UPZ@P>}@PjP@P@PP@T@>}T@T@@@>}TP@T@ϯT@>}P@PPE@@ϏPUPTPjZ@>}PUPjj@PUTZ@PT@PT>}UUZ@@jj@@@@@@>}?@@TP@@T@j@P>}@Uj@PU?>@TZj@U @PjU>}@@jUTPjTUTPPZTT>}πPP@PPTP/P@P@@P@T>>@AT@@@P@T﯏ϯ>>}AT@PP@T>ϏU@P@P@PATA@@PD>}TTQ@PTATUU@PTATU@PTA>}T@UPTT@PPTU@@PPDQ@>}@PPTQ@@PPTPPP@@UPUA@P@TPPU@>}UU@QUTu@Tt@TUUUQUUUUUU@UU@@TUUUUUUPQUUUW@@P@TU>}UUUUUUUUUW@Z@@PUUUUUUUU_j@@@PPUUUUUP@QjP@@@PU>}EATj@P@UT@DW@U@Tg@U>}@Te@U_@PPUUPQPPUU>}UAQTUUEAPAU_Q@AUQPA>}T@UTUPUZPUTPZUPU_U@jW>}UPU@jUtU@_UTj__TU@UDZ>}PUUAZPUQAQj_UU@AU>}U_T@QUU@UU@>}UU@gUUU@WU}P_>}_P_P_@P_@>}_@T@PW@__>}UW@_@W_UTUU>}UTUUUUTUW_U_UWU>}TWUU_D__UUAE__WE>}TU_W_T@ePWUP@iAUUP@>}jAUWT@AT__T@AT_UU@>}APTWU@AUeUW@AZU_@A>}_Z@APZ_@A@ZW@@AUj>}UU@@ADjUW@@DjWA@PDj>}__EUD@jW_TA@D@jUPT_TP__U_U>}PPP_UUPA}PP_UUPPP@ժ_U_>}T@@ժTG@ժ_TW@֪T_P>}PPժD_@@UժE__AADjAW>}ATTjAUATYAUUUUUATUU_@P>}APUU_@ATUW@U_TPTUU_@WP@u>}T_UUW@WUuDU@U@W@PUT]@UU@P@]>}@U_UTT_]W@U_UT@__@QWUT@_>}UWTUTPP_UWTUP@@P_WTQP@_W>}PQ_@@Q_@WPU_@_T@WP@U_@@_T@WP@T>}_@W_T@WP@_@DD@WPPUPP_U@@PUPUP_T>}@AUPUPWTPUPWP@A@_@UPWP>}_@UP@@P_@U@U@@@T_@U@WUP@>}U@_UU@UU@@@UP_UE@UU@UU_U@U@UU@UU>}@UUP@U@UTUUTUU@@U@UUUUU@UU@UU_@UUPUUUPU>}T@PUUUW@UUTUUUUUTP@UUUUU@UUU@AUUUU@UUUUUUUUPTUUTUUUUUUU>}EUUUUUPUUT@@UUUUUUUUUUU@UUT@UUUUUUU@UUUUU@UUT@@@UUUUUUU@UUUUU>}PUUUTPUTUUUU@UUUUUPUUUT@UUUPUUUUUPUUUTUPPUUUUTU>}UUAT@UUUP@UTQUU@>}@UPDEEP@@@T@A>}@A@QD@D@@>}@@@@@@@T@AA@>}@@@P@???@>>}@@TP@>> @U????A@T>>} @PT@>><>>T????@TPQ* >}D@T>}ttttttttttttttttttpptttvtttttttt.....,ttttttttttttttttttttttttttt888>}888ZH6$888:><8888888888888888888888888888888888888888888888888888888888888888888888XXXZ4 >}  888888888888888888888888XXXZ4 <@@WJ I I RJ ?I H 0I0@1C@B@/ԩ@@e \Ԡ`@)LV@$%@@B}@ɿ@G C@B@LbHH  ԍЊ Ihh@ppF@ppB AB5AppWCBpppppFeAppppB}ABABABABBAB}@(!,,/!4!2)!.%26iele'rJszeanalle"it"yterin/stund7est# ,&)3B}#(%2嚀,utz&ischer-axim 'orki 3trB}/ &reiberg3a4elefon atariB} bit screen demo geschriebenmitdembiboassemblerheyichsuchenochprogrammiererzumaustauschvoninformatioB}nen listingsetczumthemaprogrammierungmitdembibo assembler interrupt steuerungetc besonderegrueszeansB}tephanpollokundallemitgliederdesabbucevsowieanpeterkoschundallemitgliederdesmagic power clubswuppertaB}leindankeschoenfuerdiehobbytronic demo dieichvonwolfgangburgergeschenktbekommenhabewirwerdenbeiunsB}insachsendem bit atariweiterhindietreuehaltenso daswaersersteinmalfuerheuteichgrueszeallebitbyterunB}dwuenscheallenweiterhinvielerfolgmitder bitmaschineindiesemzusammenhangmoechteichmichnochbeidenfolgendeB}nprogrammierernbedanken dasieuebereinenlaengerenzeitraumstaendigneuesoftwareherausgebrachthabenbenji soft gnB}ome design ke soft abbucev compy shoptrotzdeswechselszurst gemeinde wernerraetzverlaguaallenichtgenaB}nntenmoegenmirverzeihen nurdurcheurehilfekonntesichder bit ataribisheuteimostendeutschlandshaltendieeinB}zelnenusergroupswerdenauchinzukunftfuerden bitaktivseinichhoffe daszichaufdiesezeileneinigemeinungenerhaB}ltealso schreibtmalwasindenramoderaufspapieratariisin commodoreandzx isout B}HHРйO ԍйQЍЈhh@PyQPL_ 0Iԩ7$H%@ԩHLHHI ) B})e iiHHȱҭ ) eiiHHH HHLb   4ЍPЍB}ԩލG"H# ҝP )QQ ҝR01 #I``}HH`Э)`ҍҍҍ`B}aI` NILAI VI`HH`} ϭҠ Lutz Fischer B}INFO - Oktober 1990 (c) and (p) by FAC-Soft Bitte die B}Ԡ Taste dr cken !! ̍` (c) and (p) by FAC-Soft Bitte die @ qL~pppMxd w!!A F}#:%3#/4/.!*./73F}:! .!*730!.)!,3:! .!*,%0)%*:2/")/.!34%2%/&/.)#:.!$%-/.342!#*!.)%34%49$/4%'/42:%"!$7!!4!2) 4%.F}02/'2!-:2/"),%-ja4/-!3:,)%")#( 70!:$:)%2.)+52/+5-5:9#:+)53,93:93:0/.!#)3.)%#)5+,!F}7)3:9 02!79+!.!, ,5" :3()&4%-,%79+!.!, ./)#/!,%&!*.)%'2! .)%4/:0F}/7/$55:9#)!702/'2!-)%$)')4!,):/7!.%*0%2+53*) $/+4/2%*$!.%3!:!#:%20.)%4%:02/'2!-5$)')$25-.)%F}*%344/*%$.!+0/:"!7)/.%7!$ 3+54+)%-5:9#)!4!+$/3+/.!,%*0%2+53*)*%34/"2!:%+$/$5097429")%'2!&)#:.9- F}!,%.)#4/)4!+atarijestnajlepszy!spectrumna)mydelniczka-/'!3/")%0/,)#:9# :% 0/:$2!7)F}!-hurkapaskudadarkapietraszamarcinaaczmarka*5:.)% "//.:!-)%2:!+50)#34 radkF}abuchtemartinatomeckyegojarkamarkitonatomkabittnera))..9#(30%#*!,.%4(!.+39$,!wiF}tkaszoltyska:!5$/34%0.)%.)%05$%,%#:+!:7!.%'/crystalsound/2!:$,!michalawidery:!/"2!:%+(%,,)3&5#+F}%$02/'2!--'//$ "9%4/!,,02/'2!--%234(2%%47//.%/6%2F}0 1!/ˍf  g &(&)&`!F}ԭf ˰mg )&ԩ`  HHH ҍТ& ԍhhh@"$6HZl~F}F}F}G}G}WyK9XQDkʫwFW&Olca&TZ6G}_DSI85+JD٨zʸhzJU֗u؋VwkymfEzLw{ɗIvWkm|[leIUjx{hIyxG}iwXyiYxzxhHyxij{XxxjwhwvyhxxxxyG}xxyG}s0Pz [G}t #DTE2  $$y˺wxɇ1#EVgwUR#!5VܻwvffUUUVffgwڼEG}6q3!#4UfwwvfET5DEfw̻wwfffffffffwwۺd2!4EVwwwwwG}˼xxvvfeeVUeUeUUUUVewfwvgwwwxwwwwwwxyG }x1G }#Vx˩we7CC@Eg˩veUDD0@4g빘wV%T #epg}_6Ф @@`@c%FwG }ovvtURD` uUG˼mˏvfUC% M9˶[FC 7!`fi?߯u<*4Y(`[dIo/aG }J5xpU6efdlܜ뜿\{ג)geUx+tXһٞ썉f5uufeK7WיګȕuJg5exWw;u*{_wʩjfWwG }fvvZhŸ{jxjYvhwwwhXvzɌ{|YwG}vZ@k  O ?op G} [P-/`}V(;E!m݀i͆yt:EG}ڸCnFW@ϰ)!jvȫ0iwvd7vz57EeF鼖 ~cW#DRɆYۚxzSEjͻ#'byBjي͕VuzG}TBFhlhCjhuUfwxuywy̅ib%iwwUxx`؅˩&miJJJJ  0  0̥G}` % 12έ͠ ȱ͍ ȭ͍ ȱ͍ ȱ͍  N N Lw1  N N έ ҭ G}iҭ ҩҭ )ҭ )  0҅ 32L=12ҩčҩҩҩVG}`˅˩ ̠\Y+)̥%` 2```)  ` )2͍2΍2G}ҭ }? )@``ύM]SE3*3****3G}3**33****33D**DDG}DDl"5-[!#HG}5l"5-[!#H59l"95-9[!0#0H%%59l"95-9[!0#0H%%5G}9l95-9[0#0H%%59l95-9[0#0H%%Q`59H[l9H[5H[-9H[[0H[#0H[H%Q`%Q`59[lG}l9[l5`y-9`y[0ll#0llH%ll%5HlHlD[l5H[ll9`y-9`y[0lD0l!?yy?y<l/?l`3(3Q**<`[`G}-#`HLL<??-`[`-#`HLL}3A3/~("~`?#?`!~3~`?"?5s*"sl9(9ls#3sl9A95s*"sl9(9l!s#3sl9G?}"9/fQ`("fQ``3Ql#3Ql`f5y3f5y`35A35/~@y("~@y`?@l#?@l`!~@`3~@`?H"?Hl5s@l*"s@ll9@(9@ls@#3s@l9@A9@5G@}sH*"sHl9H(9HHlsH#sHHl9H9HH/fQ@(fQ@`3Q@#3Q`f5@f5@`35@35@/~@@(~@`?@#?@`!~@3~@`?H"?Hls@GA}*"s@l9@(9@ls@H#s@Hl9@@9@@5sHH*sHHl9H(9HHlsH#sHHl9H9HH/fQ`("fQ``3Ql#3Ql`f5y3f5y`35A35/~@y("~@yGB}`?@l#?@l`!~@`3~@`?H"?Hl5s@l*"s@ll9@(9@ls@#3s@l9@A9@5sH*"sHl9H(9HHlsH#sHHl9H9HH/fQ@(fQ@`3QGC}@#3Q`f5@f5@`35@35@/~@@(~@`?@#?@`!~@3~@`?H"?Hls@*"s@l9@(9@ls@H#s@Hl9@@9@@5sHH*sHHl9H(9HGD}HlsH#sHHl9H9HH/f(f`3#3`ff`33/~(~`?#?`~~`??5s*sl9(9lsGE}#sl995s*sl9(9ls#sl99/f``(f```3@#3`f`Qf`Q`3@3``/~(~```?y@#?y@`~`Q~GF}`Q`?y@?y@5sll*slll9HH(9lsHU#sHUl9lH9Hl5s*sHll9lH(9lHlsHU#sHUl9lH9lH/f``(f```3@#3`f`Qf`Q`GG}3@3``/~(~```?y@#?y@`~`Q~`Q`?y@?y@5sll*slll9HH(9lsHU#sHUl9lH9Hl5s*sHll9lH(9lHlsHU#sHUl9lHGH}9lH/f``(f```3@#3`f`Qf`Q`3@3``/~(~```?y@#?y@`~`Q~`Q`?y@?y@5sll*slll9HH(9lsHU#sHUl9lH9Hl5GI}s*sHll9lH(9lHlsHU#sHUl9lH9lH/f``(f```3@#3`f`Qf`Q`3@3``/~(~```?y@#?y@`~`Q~`Q`?y@?y@5sll*GJ}slll9HH(9lsHU#sHUl9lH9Hl5s*sHll9lH(9lHlsHU#sHUl9HU9@@GK}@@@@DDDDDDDD"""""GL}"""H"HHH<<@<<"["[GM}[[``0<<3H"HHH