Juni/Julil9S6 DM5.50 OS 48 SF 5.50 Die User Zeitung Nr.6/7 Brandneu DIE C 64 ENZYHLOPADIE DERAOTORRAETOWESTvenvend^ial.lLi.-jrdt'rAi-.dk-si.- und DokurriKnidMon diif den ( ' ■■ i i ■. i ■:,!■■; n-i^li^L-Ti ■:?;[«■::■: Gddu.fi [ t- !■ .1 ■ ■ ■ ,■> . ■h.iu' ' Ei'.ich. das neaen II" rem Co-r;p-,]i\?i liegen bleibi. Alle Erkliirungen. au<:;i kompiexer System- und Pro- gram mfra yen iimmssfin hi.'i Rrii't'j Ws>sr frets heides: Kompetenz dnrrh riinsic hr :.;rr wiUde- Fakrenwissen. feispit'lhafriMijiikrl-Lwrii-uriclSlIl-CliniiiKapiteilj! Em REFERENZBUCH fur profess! one: I e Hard Software-Entwickler aul Jem U S-S:;ir:datd r_vi Buchs PROGRAMMING THE PET/CBM des sleidia:] Autois; EIN LEHRBUCH zu Aulbdu und Anwendung von Mikrocomputern am Bei- spiel des C-64 fur alle-Autodidakten und Ein- steiger; EIN ANWENDUNGS-HANDBUCH ;am Ci-A/SX- 64 mit liber 30( ' rYfsiji-.-i-rr i-ienr-,;;i>ri ::! -r M.if r.ir.ktioner - -ud- der si:hwe:i H 9 , '* ■ .11 JEI tvl "'-" r — 1 ■■■r Computer Kontakt 6-7/86 I grolia Schneidei aufg ekauft . So ■ DL uberfiommen. Fleaibel sein, i st jnsere Devise. So resignK Kir nicht, wenn immer neue Computer auf den f koiraien, Wir warden selbstuerstandlich verstai auf den Atari ST und den Amiga eingehen, was Die TI-99 Spazies finden diesmel neben vieler tippen. AuBerde m wird gemunfcfil r. . dsn cic r-mei kanisehe Flrma fryaic an e -.nR-i N s:\ii , irlisgandH Hett grunSlii 73 9tu& I rle, Chefredahteur mUhMII INHALTSVERZEICHNIS 4 INHALTSVERZEICHNIS Bei uns k mitm innen Sie achen v,™* 3 6 wcnd^Siec^nte.Endlcs- Ba^ToaBH'98 ^TTC i Zn jedem fto^anBy.- Furdgruoe, Imprasaum, Inse-eiitenreiie-CTiis 114 .: ■ ..:..-.■.■■.■ m.i-, Dr...-V„ ^hrs-kvi Mien betra 6 sn, tl.mir n.,,, zurllcbienden, wenn RWt- ZX - Talacom 12 1™""*""*'- Use. Basis fe biiniiv-n iin.i ri.Kh'-..:v|.-L'-.:ii:ii- 20 ■■■ ■ . ■ - :■.!...■ ■ " U.^.J,-,. DaianYB[scJiiii6seUjno TopprogiHmm Pro-DOS ™T™d^-«S 1 KiiMMfn^rvk-t. Solllen wit GWcrH^oswstBfisiUrdsnZxai 35 dertu:ftm a ^D,,A^mrJlir Scurasampto ' 38 ■ZCI1 aha-i'Ti Sic L-in F.ylrL.i.- .'...,... ... ™r 3 t'DM iir ',; :: ' : '" Prari&etraossysrero State.!* 55 ™ o^ n i^'' □s.A.anmactilMuj* Clubs, die „H£ hier die Dalen «*i a uf*rC 9 BII 76 h,' ; - r r" r |. V "T™i='' Un d er ^ aeDm-Fgrth ' " PW5P ^ E Am'^MEii KhtakteN 'i'"' 1 '" '''""'■ T *PZi ■ — I ■-■^'.'„-,.'":-''.'i:--^-:. ^f^™*™*""****-*"*" 89 r Die nachste Ausgabe »Cumputer-Kontakt« erscheint am 28.7.1986 R^i^r^r^L™, !! Tarcan 102 i£fcWW^ r 107 Computer Kontatt 6- TOPPROGRAMM DES MONATS Topprogramm des Monats:"ProDOS" fur den Spectrum 48 K 1000 DM Honorar Das Topprogramm "ProDOS" h Befehtserweiterung fiir den Spcctn. 31 netienBefehlen. In der CK gibt es das Toplisting des Mon lauft dann so, daB wir taicr in dor Rcdaktion \ Program meinsendungcn das beste Programm • lne suchen und in der CK u!i I i.>f>]is LLiiy ;!ls Mi: mit drucken. Der Autor dieses Praeiaiiinii:- crh m Honorar WO0.-DM. Der Alitor, Hans-Joachim Berndt, ist 32 Jahre alt und unterrichtet an der Kolleg- schule in Dusseldorf indenKlassen 11-13 die Facher Technik und Physik. Zum er- sten Mai Kontakt mit Mikroprozcssorcn hatte er wahrend dem Studium, spater kanfte ersichdanneinenZX81Bausatz. Dann kam der Spectrum und bei Hans- Jo- achim Berndt die ZSOMaschinensprache. Wegen der Grafik und natiirlich auch we- gen dem neuesten Stand der Technik hat er "'- , . ^ , . ■ ,-t- --,.. , i •.-. i Dc-hilih I mile ,:!i:i:i-ni=Lis lid I in- sich jetzt einen Atari ST 520+ gckauft. den verdicjlen Die chancenfur einen A er iibrigens mittels Interface I mit dem Specirum verbunden hat. Mitmachen kiinnen allePraeia-rmik-rer mil i.i =.- n (ji- iten C M, Atari, Sinclair. Tl" dn ]ahi uiu! kann !ii< spfc&Kiis J Woikcji -,iii -\l;;.- A Lvr.ii.'.mc [lipids hciiagt Computer Konlakt6-7i CLUB-NACHRICHTEN B.(i zrnneicBnnTeildicNcwso nodore-Clubs St^SSSc*^^ Pli tefo^ad^rd^B rait vklen Tips, Re-li- d^^MaK VC20undTI-Club mp; imd YKlen ande Neuer Spectrum b. Be Leastoff wird s^r^T^en^L a£ sJ^vcatT^A User Club n, die von den Milglic- :M.im Vm v.icil-i. ^.,:,i.;..:r rCK 1WS5J! cine Uwr-CsmtM lusam Computer Kontakt 6-7/66 CLUB-NACHRICHTEN cin^^ir^p'.-n ^inj. Wenn Sit noch Fragcn tiabcn odcr wenn Sie Milglied wcrden walkn, ■n Milglicdtr 5aote (»Khi>[!r rel dn.HLnC!iibnia- ■> I Ej/in i>l !.i-i Icrliijutstdk. *■ ' Bt^Ttomvk&mA- Elehtronlh- ket!pro«™^n"d«l« e t Flohmarkt Wer such t noch alte CK-Hefte? :au3ruslung gHVonHslusseuil Bestellschein ft fch mochie folgcndc CK-Htfle i CK-Hefte l" "''iS"t S S*D»"" m'dv « p«a>".^. -.»n™ Spectrum-Zubehor 0PUSDISC0VERY1,: 3,5~-Disketten1S-DD sa mm 598— DM 8.50DM 7.50 DM 275— DM 2 rn" DM DM DM WAFADRIVE 275.- '"dSDX 1 ?-^ 1 129— 125— 49— 75— DM DM DM DM ( lulilwitraj: \ UGHTPEN fTroJan) Restposten mi sszr" ******** + * * * * * + * * Die Hardware-Sensation LIBERATOR INTERFACE Si*„.M Kontakt gesuchl! »0riqin«la...-. Computer Kontakl 6-7/36 SINCLAIR s Hallo Freunde, Gunfright D Computer- Kontakt sdu iter s,.; e )i hat preisgiinstige ">"i >**' l ""-' 1 Kleinanzeigen L < : ■;; 1 ;"';,''!.- 1 Computer Kontakt 6- Art Studio - ein neues Grafikprogramm direkt aus England . :r.,::. h,w... ,T,i<„.l-„k sll-Ii. '.iii^FT^i.h-_-ni.l ikj GpiiL.-l icliotin:. !>:: i'' Print ■*"■ Mbc 1>l '» Gshause a der neue J2* Eprummei t Z1F Socket. 169.- *Oi Eprnm-Hodule 16k 3bi4.- 96k sb60.- \,| .1. .■■ i ■ I' ■!. HI lit Zll Mi ■ ' ; ■■'"! ■ SINCLAIR ., aU ch lMCI.cn Zwei veisthie- picrt vcrgrolter. veikleincn. Gcbitoaifflllai.DieMiSMu- lassen '-i.li alr:i S !iu S ituci Pro- LsHSSH W S^taoHva.™ ™d sicl.tr AnscUufi^sclialKt nerden. snksle. giafisdi lange iiicht so S2H •" _■* C£3£l un an iaH beidc Befahlsfor ite erfolgt buchitaK-mvL-isi llfe^Fu^LnlnTd VmIT 1 ■ ■■" " ■ ' ■"■'■■ ' ■'■. ■ tt.ie^kenTf.d^ii'™'!- 0= Iruorm unnen iuilrrli.:,: Sic umlaEl 1! Sprilc-Eereicris. Nu:iimer *> wCi,..U,jL-.S:>,N l -, .41. Ab- Jen in das Laser Basie. 1349.- die vencriiede-neri Mj[!idikei- hEll? ; rtis a111, ' lri '' System.: m- ■ruml.kMi.h r.ils.in.l.TTrinU.iTi vcd Bra-Weiitn ° h " ■-"' ! ' ! " ■ ,h " ''"'"' - ' M i'Mu'Tik-l.ogik-Einbeil), in Com purer Kontakt 6-7/86 Assemblertips fur den Spectrum TcLI 8: lnienupi-gesteuerte Uhr Jerle Miigikh- Wmn man miic) -9-> 30 CLEAR 64908 40 PRINT -Einei 50 LET A*-"+ff3»52»< + 7 c b 52 009 2 1 b e 02 2 2 4 5 + f ( + 3 52 0* 7 3 6 3 2 c 5360 2 2 33 A 7e c 7 10f 623347e d 6 1 83801 77d3Z14af f eSZ a1b*f0e03l8053e3acd03tfe37e2be31 10affl49330*c835f7a91f»fd281] d01-rf7brd01f*0dZ0ddeli e20cd03+f 18ecc38d-Fd" 60 LET A*=AS+-c630d5>5ad5b365c 1717Z6006fZ9i9dld506087el2231410 t U 1 2c d 1 c 93e+ eed 4 7 3e323247+ f edSe c9ed56c?cdSllct:dB2Zd0bf3cd8efd0b eb7S28f8+bed?b3d5cc37!>!b4502- 70 LET A=64909: LET S=2Z61/ 80 IF A=65024 THEN FOR A-A TO 65280: POKE A, 253: NEXT A 90 LET X=16*FN A(A*(1))+FN A{A 2)> 00 POKE A,X: LET B-S-X 10 LET A*=A*(3 TO >: LET A=A+1 20 IF A*>" THEN GO TO 80 30 PRINT 40 IF 3 THEN PRINT "Fehler in i ! * : STOP 50 PRINT -Die Routine IM bere 1 STOP 8010 REM Stellen und Elnscnalten W70Z LD HL.ZAHL2 Zahl der Uhr DEC tier en. Bei jedee 8020 RANDOMIZE USR- 65322 JR NZ.RTRN 50st tn Interrupt 8030 INPUT "Slunde: ";X: IF X<0 LD 1HL),S0 die Zeitvari- OR X>23 THEN GO TO 8030 PUSH BE abls n m eine Se- 8040 POKE £5354, X LD B,Z 8050 INPUT 'Minute: ";X: IF X<0 SETLF INC HL Bttu OR X>59 THEN GO TO 8050 INC (HL) 8060 POKE 65353, X LD A, (HL) ct £0 gei'ahlt. 6670 INPUT -£ekunde: ';X: IF X<0 BUB £0 OR X>59 THEN GO TO 8070 J* C.TMDK 8080 POKE £5352, X: RANDOMIZE USR LD (HL),A £5310 DJNZ SETLP 8090 POKE £5355,24! POKE 65356,6 INC HL 4: RETURN INC (HL) 8100 REM *+** + * + + + 4-++4- + *++*4-t +++ LD A, (HL) Stun de modulo 24 8110 REM Uhr abschalten BUB 24 8120 RANDOMIZE USR £5322: RETURN IR C.rMDK LD (HL),A B200 REM ++* + + * + + 4- + t++t++*+t*+t* THOK PUSH DE 8210 REM Uhr um X/30 Sekunden LD HL.BTD Adr. vorlau'en las Ben PUSH HL Zahl en auf Stack. 8220 PRINT USR 65325, X: RETURN LD HL.ISCADR) 9000 REM ++»***+** + ♦++*++♦ + +++ + +■ LD C,3 3 Za nien ineges. 9010 SAVE ■Uh1*-Codf CODE 64909, JR WODOP DavO 442 PRLP LD A,":- Dopp elpunkt Assemblerlisting NODO EALL PRINT EX (SP),HL Die iu achreibende i Int»rrupt-ge»teuerte Uhr LD A, (HLI DEC HL 2ahl in den Akku gen und den CHARS ■ 23606 EX (SPI,HL ERRSP = 23613 LP10 LD DE,*FF0A INC D Mm STACKIN » *1CB1 BUB E Zahl berechnen, in UNSTACK ■ *2DA2 JR NC.LPI0 Akku oringen STKRET - »1B76 Stun denzahl von LD A,D 9 jedoch nicht ORG *FD8D SUB C n. i uhrender Null, sondern nit fuh- TIME RST «38 iZunacnst die ROM- IR Z.NULL rend h Blank aus- i Interrupt-Routine gebe izar Tastaturab- CALL PRZIF i f rase aufrufen. TlMEl PUSH AF {Register dUrfen CALL PRZIF ■■' ■ Mben. PUSH HL micht uerandert LD HL.IZAHL1) iwerden! JR NZ.PRLP leiten. POP HL Alls Regi ster- POP DE inhalte wieder POP BC Ofl L ;daB jefler 7B2te POP HL ursp ling! i then 3R NZ.N702 [Interrupt filr die RET Uert LB Hi., 7ff? iZahlung ausgelas- LD (ZAHLD.HL lien w i r steht MIN NOP |E57nal *FD In AM. STD NOP |D*ran schlieGe sich owitere Rou- SCADR DEFU S401S (Bi Idspeicher-adr. |ttn Bereich bi ORG *FF01 in dan UDB'S END PRZIF ADD A, ■«" Aui Zifter ASCII- mit dem nun ist und dafl die 2% Byxi PRINT PUSH DE PUSH HL Zaichan nachen. GLP-Drucker X""^™- LD DE, ICHARS) Die Adresse ba- D« Hardwpy-Houlinc fllr cms^bind Sdera"b« ^ rechnen, ab dar RLA die Bildpunkt- LD H,0 codiarimg das LD L,A Zel Chens abgelegt ADD KL.DE POP DE PUSH DE D^rT^Tdta^^ £* s'p'he ?f m « 'zfz^f LD 6,6 LINE LD A, (HLI CEWfinet. Strectung.? = ikoppcliLHJiri.iv: LD (DEI, ft Bildspeicher I^^sliKrM^.:L-.M,: ; j.l..:.-.-r^i- "i- Aniiiil^lll ill k 1 am ill l 1 r :l -iilll INC HL INC D p DIKZ LINE POP HL HL laigt an- INC L scniitBand aut die POP DE ntchita Character- RET Position in Bild. Hardcopy CLKON LD A,«FE 10 REM Spec t rum -Hard copy- LD I, A Byte der fldr. dar Routine fuer den glp- IM2 Lists auf, die 257 RET Mai den Einsprung- punkt tFDFD enth. Mich»l Schramm, Kiel CLDFF IM1 Uhr aussc rial ten Computer- Kontakt 19B6 RET Ihterrupt-r!odu». 20 DEF FN A(X*)=CODE X*-48-39# [X»>'9') 30 CLEAR 59999: REM An-fangsadr STELL CALL STftCKIN Anzahl der 30stel CALL UHSTACK Sakunden aus der DEC BC Basic-Zeile in BC. 40 LET A-6E4: REM An* angiadr. DI int.rrupt .u.. U hd 30 PRINT -QLP-H»rdcDpy-RDutina wird", "erzeugt" * ' "Einen ftugenbl STLLP CALL TIME1 die Uhr "weiter- ick bltte. .." DEC BC 60 LET ft*='df ff»2r3i>00200Bca811 BIT 7,B c c d 94 1 ee68 3 32923 c 2 1 001 8229 33c 262 IB Z, STLLP 022953cd*fe2c2044cd791ccd941e329 45c s72820-f 3c d 941 e>3 2933c c I 30382b f LD SP, 3d 3cc 3761 bi 3c d94 1 e3 SINCLAIR 23 2955ccIB03B04fe213802c*0a3e04cd0 1 163elbd73e41d73e08d73elbd73e32d 7 3e 1 b d 73»4bd 7 3a 9 6 5 c 707 2 6 00 1 7 c b 1 44 d cb5 8462803 1 7c b 1 4d 77e ■ 70 LET A*=A*+ a d7fd6£59fd£e5bfd 4 65ce 5c 5 7c e 6070* 0* 04 b 56* 7c e6 1 8c 6 4067 1 1 9e5c 06084 d c b3B5£280424 2424 247el2Ie4dcb5B4e2808121el8041B81 i 8 ab 2 4 1 0e c 1 608 2 1 9 e 5c 36 B5 k b i 3 1 7 732c 104 8* d cb5B7e2801 24 * 5d74 1 4 deb 5S462801d71520d4clel2cl0a53e0dd7 3e a d 7 2 1 9 2 5 c c t>4 e 2 8 08 c b 5 6c b d 6 2Sc c b96+ d 34594 d 355a23b63e 1 bd 73e4 1 d 7 3e0cd73elbd73e32d718a3> 80 LET 5=30781 90 LET X=1£*FN AtA*tl))tFN A(A *<2I> 100 POKE A,X: LET S=S-X 110 LET A*=A*<3 TO ): LET A=A+1 120 IF A*>" THEN GO TO 90 130 IF S THEN PRINT 'Fehler In A* ! ■ ; STOP 140 PRINT 150 PRINT 'Die Naach i nencc-dei-DU tine l5t","bereit." , Au4ru4en du rch PRINT USR 6E4, . . . (genaue Be= chreib. in CK 11/85)' :INT : PRINT "Nictll verges OPEN «4; ,, b": FORMAT ■■ "'"Das Basi c-Prograum ka h NEW geloeacht werden. 160 ( Datenverschlusselung C o mputer- Konta kt das Heft m it den preisgiinstigen Kl einanzeigen A jro tnd u ngsbci.spiek : Datenverschlusselung 20 DEF FN A(X*J=CODE ) IX*> P 9") 30 PRINT 'Bitte einen wird Mu ijtet." 40 LET A*="ed7b3d5ce7cd8clce74 e222804 c d7a 1 c cd99 1 ecScd 991 e6069c 1 1 B26e7cd b228d a2e 1 cc28b28e5e7+ b3 a2804 4 e0d 204 7e 1 c b7 e 234e 2 34 623 280 37e873c230b3d204 be5d fle 1 ed 4 3945c c d 4 1 2t>a 4 b9c a Sb2 34 1 eb229B5c 862 3 1 0f c ed 4 39 65c 606 4 2 29a5c 6 82 29c 3c229 e3 c2a945c7cb5ca76 1 b2b22945c2a9c3c2 3ed5b969ca7=d32300119229c5ced5b9 B3c 1 9 7e2a9 e5c 23e d 5 b96 5c 37e d 52 300 2 ed 3 a2 29 e5c ed 5b9 a 5c 1 9aed d ae00dd 7 700dd2318bb- 50 LET A=23296: LET 8=20507 60 LET X=IMFN AIA*(1J)+FN A(A *!2>) 70 POKE A,X: LET S=S-X 80 LET A*=A»(3 TO I; LET A=A*1 90 IF A*>-- THEN 00 TO 60 100 PRINT IF S THEN PRINT "Fehler in : STOP 120 PRIN - "Eie V st bi lit. 140 PRINT ' ?5 Bytes' 150 STOP 9000 SAVE -\ hi "CODE 23296, J Computer Kontakt 6-7/36 Topprogramm: Mit Pro-DOS 31 neue Befehle itiiQI. skh zun.ck unj waalca Sic Op- -ir.mi kcin l'1-.H-.lcm !ll..in-. ;:m liN1 ,|, „■;,; hci KLt-lK ]-,.!- iWSIZE la. ia. w. v.' Ifjii.in Fmvifrm.Be (est: xa- 0-23- J ii-.v' '■-■-, J:-MR.()1 i DOWN: - M - Anfaa£Ssp:llT .lev 1 lti ■™»>«SMlMa. »^*™D.r"h'l 1 " . :-i .,..,!<;, S'lUM un=l riST :':...■..■:',.,:",.""",'. "OUTOFSCREEs ■;;■: ^.T^r' ecrufcr, Die Grafik-Bcfehle Die Wuidow-Refchle tCMCAK unite - I H.:_li,-' ifuT Slid uon"™ica7n soft "'3501 Hoot .»1MK>W mm-tr - rmra- tome Bolpiinkl. Es sind alio { \Oj Eft/enei-str.7 7elefDn; OS60I/2S39 mi 0-7. Ugi f«si. «Hm RishiimMii moglkt.. nits :LH5i>rzahlen (vg, SCROLL) l(K>By[« .GMT bw* legi das Plutimi- die Adrew Die Window-Maps Byte Bedcufung XA des Fenaleis ( . WS 1 7.F.) -HM \l>. HI. XL II .-::. .iiiumii \(i. va, xi •ELLIPSE V. V, A. II v, i .■.! . i Listing 1 SINCLAIR a 1 2EE01 003 1 1 44EC320E5CC 3800B 1 1 i2E. 9CD82 1 CC1302KreD9 4 1 EE403C8FE022 CCDBMiftCDT JETJ2fiCEac577DFE 1 iUA'P^E 807FE0 1 2B1 BE0A9F0CD5DF0CD45F03E2 120044 A4 4 1 B357ECB73E BBS DDC B0C7 82 iK!P['tiEK71731D20-,U8?0 200 PKIW -'KEINE FEHLER BERN S04E43F I B02E6 IFE DDO 4F1 B 1FDD5E0OB "-" [Oil DMA ■FB535F19111520F3CTC05 D5i01DD4EO 20 D4t03Dl ',10549 BFOC D2EF0B17EOBD5 1 6085 707241 520F 300 SAVE -PRQIiDSt.L- CODE »E4,S 1008 LATR ■»E040B4i05C , iDD7IOOBD7 AF57EB 10847F 1 23 1 D20EED 1 Ot 1 520E2E 20 1 DD'50 2D D5 40SD17 104BD5005C9r:B 1 9CD3025Ca3EO3CDaiFOOIOOOOf:S92EDC KM DA'S " ZHDSCM 7««7 1 1 J70ZB4 1 2221 8F5117EDB770E235EDD75 0F237EB 15DF0 1 52BC9447 B05CD2CF0EB05CD2EF F5C 11 OF i)« 1 ? 1 1 i!EC7 J2 J7KS7 *EB5ftl D7 7 1 0C9 B 1C B0E4EC 2E1 EE085832SC280 OG 5O608C5E5D50 B004FEOBOB 1 E 1 C 1 24 1 ASCF DCB46WE0B2B2tC13025200B2A5 1 D0477 9S3BD28OlDO4F08OKBOC7tC23 tlOFJtlDIS520EOC»SH\12iM D5C225F5C2 1 7TCAE5E JB7 S 2CDO Jl 3FD3 7EEC5FE803B22FE903O0B47CB3WBi IS "1017 DMA "FOIbOICWCFOCDSBFOISC SB FF0447BD5CM5FOEBO5CD45F0C5O10 tOOFF 2A5«CCBA7 1 1 21 77EAE5E 3B4 1 22 25[ClC5IS2ABtAHOOB - ,114tB ASB5C2B7EFE2A20MD021 7BF02A5B3C2 100? MIA "CB1SB5B7B5C1 BOKO 100 04FE1BOCI1I IS70EC47BD7EOE3B77I0F B225WC0B4t00480BE5" , ] MS! ceiC373EDE05B3iSC21 3B5CCBBtFE202 CCTCKDF 1 5CAA9F07BD5CMCFOE W4C tdOl [«H " 1 lBS2IE7CBAf DDf E00282 00 2C Bei20006F29292' 1 9E 1C D24F0BC7 U2CF OC50608C5E 5 D50 100 4FE DB0J1 El C OOSBOE 1 3E03B15FAF57BB1 TODBEQOiaA El O01F F 1 F3W 1 4 1 F 1F9F4F 3E08A7FDC 1241 4 1ST 1 1 1 1! 1 1 520E0C B5DF01 10 1 44E 57S 9028H47 2(5D5C2B225B5C I OF 7 1 B£ BO 1 4EE808 1 AA0AEA9 1 200 1 4233B20F 4E 3ACFOCD50F115CASFFO', 14205 Bl CD »FD3M»FFFD Jb2tODE 7gD«E0 ISO* B25ClCD10EFC3(AECFFJ512CCEIIf5C[2 iMB DMA '78D5CD4SF0EB04CB45F0C 102BD 2AB05CCBF 1 03F DCB007EC A84EAB 4FOFi:50IE9FBFEW30',12355 50M04FEBI0C1D1 1520EC47D15EOE2B7 FFE0D3B* W=D3tO0CBFE3flC2FJ«*F B3Ci(} -1010 DMA '30E5IE001F[613874F2iO ■ ■ mm qxfbcsox 0FFCD30252MFFB362i' ,12311 0297909AF BE 1 1 1BEE05060B280C 7 E B7 B ■:■"■ :.■ ■■.-.■■ i ;■';■- ■ ■ 1002 ((!( "00:!79EAEK1B712E5CS7 78787 1 223 1 3 1 OF i 1 B087 EE4F 01 22 31 3 1 A080MMFEDBOF DE.B46412B0 JOB 1 20BB 4 192) 79EA I8F 7CD 7* 1 CCD3075CSCB072 OFaiBE IE 1 1 8 1 2ED4 B5 BSCB490EB4F 240 1E1CI241410DFB1CIO4152SCEF1CB414 JME5E L7BOMOOT7C9a)3025CBDD6tl 0292729 09E5BDE iESC 1 C5E53(E0£E « t-C BCD KF 1 1 £0 14 KMC", 12618 2M4E H M M 1 H 1 0040EB10CTCB8? L CC BOB 11E 5ID 2AB03C1D7E101DE 1 1 F 1 EF F3 - Ml BATA 'FOCD5BF01BCABFFO7BCD4 03025CEO99 IEBD701 2BD7 1 1 1 CCB302 B911ClflF9FEtF010BE - , 11544 !-.:eosobiaobo 5C82 1 8 DE BI2605C 1 lftl EBO1O8C50 1 140 ' 1011 "BA7A ■0O57AFB93E0F 26087 AOFO 100 tt E DB0FBC84 14 6260 30B 1 2081 IE 1 0EHOClll)F7MCMBEr,1175S F0F0F573EF OB 3A6B277112324 1 0CF253 1 1 '. 20 BBFOEB4 141C0CB5BF0 1 EO I4DEJ9 1001 DATA 'COO00IUF17O0OO0OBFO0F E f A 1 1 1 EOE EE 1 ( 1 D 02 AM3CCDD0EFC33 2f i'C D5BF0 1 DCAA9F MDCKCFKSB 50tO F010]8001iB0000004000000011 I7MO 4EE007 0;t>505O5O50OOMFEl!5D?[£EBF :■::■:: -■-::■. ; '-.- ■:-..■ : ■;■>■ OOOBF 0OFF0 1 1800 1 3B0O0O0O40OO0G0 E903808EB5B7BSCD 1901 80 »E 05B365C2 SO tOO 4FEOt8FDCB(i4t', 1715! 1 F 1 JOOOOOOBFOOFFOl 0180013800111)0 ~-r020 1ATA '2BO3OB120BB1E1C124141 040000000 1 F 1 70 OOOOOBf OOFFO 1 1 800 3DD7E0BE5C5E5CB2FEFVIB0D Dm 1 C 1 0* 1 520CEF DCBtMlC0CD5DF Jl 13300000040000000 1 F I J OOOOOOBFOOF 1012 DATA ■E1E1CD1BEFF13D20F123F EOIC3ACF0E15DF011CA8FFO7B4KD45F Hi 10 18001 3800000040 VW* ! 3B20EBC llD7EOAeB7EEF 3B20FAJD 7 10 OC5D5E5DI2MtWFBCM!4!2BOJO8IA0 1004 DATA ■01I00001F17000000BFOOF t JB700 7E9 H.087E07CD3AEF 1 520F 9E9F B 4FEOB8F DC B414128O3OB1208D1 C 1 04 1 FOI 1800 1 3B0000O04O000000 1 F 1 7000 5BS1B7E0(F5CD28EFE5BC13EFC1CK2E 5201BE CC0414 1C0CB5 1FO 1 EO 1 CSI 2FOF OOOBFOOFFO 1 0] BOO 1 3SO0OO0O40OMOO FF 1 3 P20f 01 1 F 1 C90D7EOBEHF 1FSM 1 OCB«,Cfciaii4FD-[:B460b',i2273 1 F 1 7000WO BF OOFFO 1 1 B0013BOOOOO urwii<:4iF].MIMIFSOOIODC9Bt7E0 "l02'l OAT A ■CG7A1CCD3025CBCDO723C 040000000 1 F 1 7O0OO0OBFOOFFO1 1 BOO OE10F1F3001051F3001-, 11875 BECF279E10IHCM7F5C 4B2F2F 1CB4FC ] 3B0OO0OO4O0OC082 1 CClSOISCaCm 1 '""1013 DATA 'OClFJMlTOlFMiMCW WFFSSF DC MS7EHW 1FKBI57 1C 41 3 1 E D8CD5IEF 1 B20F AF 1 C9C17 «1 CE13D2 (FOFBCB45tEC4SOFlFDCB45iti:40BF2C 1005 1ATB "FE007a05BB193120FBBB2 5[8E B07 23C D54 1 F D2W007BFECOOM;D2 9FM18457EC4ClFlFBCB457iC40AFlFBC 2BKCCF5CM 4 lFDZOOODf 1 CB2AB05CC BEF CDFEEF47043 EFEOF 1 OF D477EDD4E 1 B45tEE4ilFiFKB45itC44FF2C9;B2l7 05 3E BFE30B2AEEBF E06D8FF. 1 8 D07 1 B 3E OC'84 ! 200 1 A0CB3 1 200;(B!F7 7F DC 1404 F5':3i00FC052B24FEO6 , ,lS*M C5F 1 MOi «E HE5C37 SE18483 1 01 E3 1 4 EECDOEFE90 D5t 1 21BSE 1 i EDS 2 1 1 J040 1 1022 DMA '2B1BFEO77B21FE0B2BOEF 9.3: re mejmfofofei-, 11120 EOB281 2F E 0C2B 1 3FEOE2805CBEECBE4C 0057KS1F 1 BJt314FC312EDCB73E 0718 1(14 IMA '03F13Bt7EB05F0DD5EOEO D5 MF 7E«BA2(BDirB 1 07S280BE1C7C 15 TCBEtCBFtCICBFlCBFElUCOfECBEECfC I3CBD2EW43803 lES713-,112il 0821CCt3O25CBCOHIECDEDF27EtF0F0 lOOt DMA 'I8EC1B7F1B7B78B2BKO0 FDDC60fi5i20oonB 2ebckof i est if i e I20Q2EE38DDE Bl OifcE3FE0B3EBFC!CI>A FOFBl)57OK90eBF:D7AlCE7CD82ICCD3 C:2E[n'>34JEffi2DD51L2DKEIll9C9E 025CB7 1 BE FE5E5D 151 1 2 D05E 1 1 AFED5 BOO 1BD 1 3C! 247 1 BCC7BFE0020 1 1 HOC BO 505F.5CBFF.EF47 M 7E07 1 0FDE10I C 1 D 1 E 22;:BF3E1B115(1FF17' ! 13214 1023 'Un ■77EDBuED t l l )lEC5CD07;3E []56200tCM>AFOC30AF 1 7 WM J I88BSB' 1 C9DBCB0C7 KBBC1 J9C5HF5240 07BE 7 1 BB2C M BECDBTEOCF 5FWCDB 77M3E3 1070FOF»FBI1F7BE616',12149 1 2MF 4E (EBtiE 1 1 BOECD7 A 1 CCD3025C 0C13B0CF 1 B 15 70CC39BECC9AFCB4 3280 1015 IMA "MITCOOAFOFIBICICICSD 8FDCB*6BtCD5773:D12FOE02tFFE37?A i;k?e^e(jeooobcboc-,12104 . 1 OOfEMA ' ltC07S82 SCBC2 8BS38B1 J 52 W01B7929292929 1 100591 9CD0AF0 1 72B0BC50i:DI2F0C12OO3OD18flll0IO 1 00 i 8 111 1 C IE9C17 3EBF5BDCB0C 76280 1 DKSCDHEF C 1 CSF DCB4M4C41 1 F K 1 D BC80C5t>20Afc 189B 1 1 4IEB320F5C1 BO B 1 4C B3DCB JB424B7C923C577D9S JC5FF 1 C 1 C 505CD ! 2F OC 1 2B035 ' 1 BOBAF BA28040 SINCLAIR 54J5J49 C05S04 1130 RAHDOH1IE '411 Die unterslrkhsnen Budisiaben mussen im »G* (Graphics)-Modus eingegeben werden ! 1140 LEI Pl-ABCEDABEMBC- 1156 BE JOB WO 1 1 40H 1 NDW7 i *SCBEEN430OO : tTPAT BIN 010JOIOI I170»NSIIE0,0,I1,13 1180 PRINT PAPER 1| INK JiiCiS U!0«CCKR: PRINT PAPER Si INK 2 ma 1200»Ctt 1210 PRIHT AT 21,lli INK 1; PUP ER 6; INVERSE 1; BtlS-l 1 FLASH 1;M> SNAP '; AF 22,lli BRIGHT 1; INVERSES; FLASH Ij-OIIREK 1220 PRINT PAPER B; INK B; 1230HO>B7,7,16l,24 IJIOfBDWi, 4,1 62,25 17.50 BORDER 2;iBNAP 12t0 PAUSE 0: LEI If INKEYf 1270 IF R-T THEN LET SCR'430 00: SB IB 1310 12B0 IF H*T THEN LET SCR'113 1290 80 TO 1360 1310 HEN H1NDCN IM IT 1320 LET jit' BIN 10101010 1 330tHEN: t« I ZEO , , 3 1 , 2J: "SCREEN 5CR:*CLS l340«5[ZEJ,l,3l,4:iTPATpjt: PRI NT INK 2] PAPER 4:iCLS I3»CCHR i '« S I 7.E2 , 7 , 3 1 , 23: tTPATp jl: PRINT INK 7: PAPER l:tCLS 1 400 MMNMN3: 'SCREEN SLR l410tfJC1B:*NSIIE0,i,29,22: PRINT BRI6HT 1; INK ?; PAPER OiiCLS 142MNIND0N4:'5CREEN SCR l43t»«IIE17,7,3i,23ifTPATpit: P RINT INK 1; PAPER 7:>E1S 1 440 WINIGII5: 'SCREEN SCR 1 450: OB I IE ft, 6, 30, 22: PRINT BR ■ HfjYIM ■2B035F1B0IMFBB2B04M1: iiii ?5A45E5F '50854524 iii BEFOMIJC5JMCFt0iC FlflfllE5B5F5flTIft39F 7EI13I0E8CI2310EIC HO JEtE :■ ■:■■■■■: - ■ J 1025 DATA "MCtFEEFEESBJBFS XFFDCMtSECm J0I5MDKBSC 1 •C03025C8D BCBtCEE C?C B 3025C8B CjSECTC DS2 1 CCK0KE6CIH* 1 EDD J -VI.. V. : . JQ2i DftTft "lEOD770aC?CDTfllCC H5CBCM7:3HOI4410fflOSlFClC OCOCSO 4CD12FOC1 CDCSOC44C A 1 2F Ik 55?B»0 iSkOMi ojonros J 123551 2542060B0F0008 ■■ :.■■■■. 1 soooow utiiidOJ J§i :CD»BF«M1KIIWKWI 75555154 7470100 ■ : . ;■ ■ Pl ■ommmsmh 453000030431545* ... ■■::■;: 51516563 25S55555 55757575 46300001 34106W4 55520004 55200000 i 4600002 72200000 mowmkt^mm! Ml emsm 8II70BB3BOI13E17BA; 8*1051 Ml "sifSsSt! ;c8 1028 DATA 0435555 1 ■■ ■■ BEFC327FJ BH2SESF A "14224273000O BABOAOBOBOWMJ 62221 22 7 MJiUOOi ;« .:■.-■ ■ ■ 9mFB8BCB£BF8EBC8SF0OO< O00O000O Lis) 1000 m 1010 OPE 1185 by ing2 HM.-P 1 . BDRK SCROTI t!B) prams dentins t HANWOAWB B ,„,., ■ 1050 DATA ' 4E3E4E5E4 . . . ... ;:;fi.:.cfe WOEFtfF5ID2SJD£Fft "4E453770EB0557504 S35EBS15!' CtF5«1EF045JS7*l5 KCHSCRENBRBICH HILFSSCREEN AT t h-io frtle "* C4K0F2044MWC4C7 l55FF40t4£4F524D4 1 4£C«-M I NUDHbi ISCR£EMB£R 1820 PRINT OVER Oj BRI6HT 1, Pfl L3,B: REIT N:tN!N0M3 1470 BDRDER TitaWPiMIMflHstSE PER 2, INK 4:t6PFiT BIN 11111100: 2190 REN HISTOSRAHN REEN SCfiit«]IE),S,S!,:j LI REN' l52O*"]HO0«i iSCREtRSlM: LIST 2 lStMELSs LET H-IH/2: LET YI-IH 13,YIt2,H*13,Y0+2:<[RAII-i,-2 420 2270iBPAT RNB'255 153Ot|lND0«:iS[REENS[RO: LIST 2 1870IELL]P5EII,»l',«,I"l :280'FBOIH,7O,NHD,Y3 420 I8B0 FDR N=0 TO 340 STEP 120 2290 NEDlS5*6: PRINT EfJ HH FDR T=0 TD I i9B0WATlMI,IY-5, HSR "ft* 2370»DIR5*7: PRINT E*; 14IIMLS 1990«IIAP: PAUSE 100 23fl0UN-lC)>tO 2020 REPI HOUSE 2410 PAUSE 200: GOTO 1130 11W LET Yl= BWUCB-HltTO 20 SOWINBOki: <«S I IE 16 , 6 , SO , 22 : IS 2420 REN KUCHEK US LET T2= RNIMYH-YOI'TO CREEHSCR: PRINT BRIBHT I; PAPER 2430 LET S=55: LET JJ-20 J6B0LET Y3*RNII'lYH-T0)1 THEN tEEST RMI255 2040 >SW)P : iTPR Tp i t : >H5I IE U , 1 5 , 3 7450'ELL1P5EDRN«,-8 1720 !FS=2 THEN iSPtT RHDH55:i 9; PAPER 7:»CLS 2500*PLOT1N- 1 , YN7 2 : *DRANO , -B : i SK LWEII, VI, 12,12 2070i!OIB*17 l Hl-12t8,JOiS-l,l92 1730 1FS=3 THEN •6PAT RND"255:i -171B 2510 FDR N=0 TO 340 STEP S FMIII, 11,12, « 20BOiSNAP:-PAINTBHB,191-l3iB 2520 LET P=N/lBOi PI 1740 K: PRINT BRIGHT 1; PAPE 2570 FUR N=3 TO 3S0 STEP S t( mffl.l*ll:*HATPUN/4,YHf2, IIBR R<; IKK2;:>SIIAP: LET PF-PP-;: NEIT N I7WWIBJ0K7: FOR N*0 TO U#MBL 2I40»5NAP:*HATCH 1 27*63, YH-5, US 2630tF!l.LIN/2,lN/2-B-4:iSCRDLLl, L3,B: NEIT N:*«TNDGH3 fcf 1SD0 NE«T I 217W5.AP: PAUSE 100 2640 RETURN 1810 RETT S 2I80MI1IMION.7; FOR M TO IS:>RDL 2650 STDP W RESTORE : FEN I* USR "I i iin loiomio i Bin Sttwwi i nil loioioio 1 BIN 0IMO101 90Ji bata BIN 011001 1 9035 Mid BIN 1001100 oi loou 'Oil DMA BIN 11001100 9837 DATA BIN 0OI1OO11 ma data BIN 8103*100 9041 DATA 904J DATA BIN M100010 BIN OOOlOWl BIN 10001 OM 4044 DATA BIN OICM100 901S OATA BIN 0OIW010 904i DATA BIN 00019001 1047 DATA BIN IOOO10O0 9041 REN DUMDCDMMDDMO 90SODATA 8, 2S5,S,2SS, 0,^,0,25 9070 DATA J04,M4,W4,204,M4,20 '990 PRINT ST O,0[: LDt E I CLEAR 41999; RUN 9999 SAVE ■PnaDDSDQIP- 1 Unsterblichkeit und wie man sie erreicht in Programm -tu ni: " 1 *Ip tolfl vnrjchcu. ' I ' i\ i l- iti:ii i ii t^ ; I h i-ca i; l- r^ odci- i;™"'" 1 Computer Kmlakt 6-7/86 SINCLAIR Apfelmannchen mit dem Spectrum Moah.-htril ail! tdl: lis 4 ut:-i ;!.■ I'.oi-M.T^o iinri^L-!:.o x.i.h ff Sinclair OL o 1^^'-. SINCLAIR Byle5 dcs Bildspeichers Basicprogramm n!": BEEP .6,45! PAUSE 150: 60 T 190 CLS 10 REM Graphische Darstellung 200 PRINT USR 30012,A(7),A<9),A der Mandelbrot-Menqe ,At6),A<31,A(ll,IAI2)-AI Michael Schramm 111/256, (A (41 -A (31 1/192 Computer Kuntakt 198ri 210 BEEP 3,20: PAUSE 20 DEF FN A*9") 30 IF PEEK 3E4033 THEN GO TO : NEXT I 230 LET P-22528: LET 8=23295 8000 240 CLS : PRINT ■*** GraphlK is 40 PAPER 7: INK 0: BORDER 7: C t gespeichert *** ■ LS 50 DATA "Xraln-,-2.1, -Xiiax-, .7, "Y»in",-.96, -Ymax", . 9*, "Xcon" ,0,c 230 PRINT : PRINT "1: COPY ■ 260 PRINT : PRINT m Z: SAUE - 270 PRINT : PRINT "3: Ausschnit 280 PRINT : PRINT "4: Parameter -Menue" Bt4> 70 FOR I"l TO 9: READ T*CI),AI 290 INPUT -1 bis 4: P IK 300 IF K<1 OR K>4 THEN GO TO 29 I > : NEXT I 80 CLS : print ■ Graphische 310 IF K=4 THEN FOR 1-1 TO 4: L Darstellung der",- Nandel brat-Menge" 90 PRINT AT 3,0; ET AII)=BII): NEXT I: GO TO 80 320 RANDOHIZE USR 3E4 330 IF k>l THEN COPY : GO TO 24 100 FOR 1=1 TO 9 340 IF K=3 THEN GO TO 390 ■ AND A(I)>=0JA 360 IF N*>=" OR LEN N«>10 THEN 130 NCXT I GO TO 350 140 PRINT : PRINT "0: Start- 370 SAVE N* CODE 30267,6144 150 INPUT "Ziffer: "iK 380 GO TO 240 160 IF K>9 THEN BEEP .3,40: GO 390 POKE 8,120: POKE P, 184 TO 150 400 PAUSE 0! LET X*=INKEY*: IF 170 IF K THEN INPUT IT*(K>)i": X*=-" THEN GO TO 400 ■;A(K): GO TO 90 410 POKE P.PEEK 23693 420 LET P=P-(X«="3") + (X*-'8 , H-3 OR AI7K1 OR A(B)<=0 THEN PRINT 2* ( < X*= " 6 ' ) - I X*="7 " 1 ) me; FLASH ll "Inkonsistente Date 430 IF P<22528 THEN LET P-22528 440 IF P>23295 THEN LET P=23293 450 IF X*-CHR* 13 THEN LET K=P: LET P-a: LET B-K 460 IF XtO'0" THEN 60 TO 390 470 IF P>Q THEN LET K-P: LET P= S: LET Q-K 400 LET K-P: GO SUB 600 490 LET B(1)-A<1)*(AC2)-A<1))*X /8Z 500 LET B(3)=A(3)+(A(4)-A(3) )*V 510 LET K=8: GO SUB 600 520 LET B (21 -A 11 •IAI2) All 1*< X*. 9751/32 530 LET B<4)=AI3 ♦BI2I THEN E 3,4 0: GO TO 390 550 GO TO 240 560 600 LET K=K-2232B 610 LET T=INT (K 32) 620 LET X=K-32#Y 630 RETURN 1000 8000 CLEAR 29999 8010 PRINT 'Huch Mnm nt Qeduld.' bittr in e nen 8020 LET A*="213b '6110040010018b db0c?cd811t:0604c5cd791ccl 104 9214 07 622 6S5t e f t 802c 702 c 602c 1 2 c 5 02 c 40? c 202 3 8 c d a 2 2 d 3 2 3 i? 6c d a 2 2 fl 3 2 3 a 7 62 1 0000223 b76 • f e 6c002 38c d 5 4 1 f d Zf c753a3f 76 1 * 330b2 1 40761 1 54760 10a0 . 0edb0213d76?e2377efe0el38efe0310 4 3 1 e 1 3 1 04e 30+ e 2033600030238 18 1 6s 303e40+e0el04310+e50fcl02c0' 8030 LET A*=A*f0238213e7633Z0d7 efcl02c0023S213e767e230fcb4e2S02 c 6f -f e d 4b 3b76d 40c 760c280d«d433b76 e-fe7e30fr 00238 1 88 d 04 78 f e c 0300«d 4 33b 76 e* f»8& 1 0+ cl 02 38c3707 52 1 0040 113b76cd3675e"" THEN GO TO 8050 B090 IF 8 THEN PRINT "F»hl»r In A*!*: STOP 8100 RUN 8200 REM 9000 SAVE 'Mandelbrot- LINE 8000 9010 STOP Assemblerlisting Co m pu«,K.«»B™ SINCLAIR 33 '":■■= i'l ; =;S;- is. Si Mi t Tele den Bildschirm vergrofiern Computer Kontakt 6- s" THEN RANDOM IE P THEN RANDOM 2E 'MfRINT "Hurt «»MH jolKX ■" THEM RAKEN3MIZE l^inten i m 4*1*?! B-egfe m 4844J: S W PRINT -'l-ittr Up.™ 1 d ■ THEN n«MI!E inn iHHhpn WUK libw Her 91 MMdlMSJMdcdBOl ■mil RMWDHIIE ffilSJ: BO TO HSR «J53: S <£§*> S III! Listing 2 HF* USA «S!J: s ■'then HBtitffi fl« HJ.. mkum™™ MIleMTMMO ' THEN RANDOM IE B CLEAR 34175: L S READ it: LET > - FHBM S"™ MMM^*"' - THEN RANDDHIZE STEP 3 «M»ISM ■ »■ '"»* ,EiiS™ at(!M8-)3 ■ iSrEi -48-139 AND SHIM) ctimaiMtM "m'tfw^ ■™ra imiiiE itiaeomwww: mo beano; i an ■ ™ ,_,« Jlilb*:: ,:;:;" HO DAT! '5tK(M ESI - then ramomie {{««-*■.•. ■ Em tamnt IEH1MM3 "m'IoIS edB9t«1005Bl 5BH(i05Bi|! m 2edb021ltMllt. ||. Wild und "nigh"- Byte angf ImL-lnumi-.S.A" Diskette :fHS.i"Oai.-]i:a- oprnTv.' ilcm Filetypen gefuhrt! Diskette wirdmitLrM E t- ] s|, K VTCH|: g^j^" 'at^KiL nic S WrMlowoelBntwerdBI . (OPEN!.B,15) iind die ABsalren »mi Wild- („„,„ riles ;:ur d,-i [>i,k^:: 1 '"' :-^"0„uollt llutei. die PRINT.2. "|U1] |BR| kanal COMMODORE Simulator 6510 EgBB ki Compute! Kontakt 6-7/86 COMMODORE El 10 ■ E6 sPEICHtK gil The Great SpaB. HntfB sent gut-: w- American Road Race Computer Konlakt 6-7/86 COMMODORE Skifliegen mit dem Commodore Listing 1 I ^£86?2TDg9492 I RE ADA* OMMKHTtft*-) T ' PRUEFSUPT*:^E:HL,ER ! 3 DHTft C9,38,F Computer Korrtakt 5- COMMODORE g~ CE a 6TW 08 C aSMMU IS^'S'.^w'bSw.** K*-"-* ■ ,85,85,85,35,83, 1BB,B.|,B l a l™V , MiViV£ > c' t £ t * 3198 B nS BB 3 CB EB £H1 S4B PBINT-fcJ" 71£,e:SYS28e7£ 576 FORM =S3£T0BS5 1 REftDQ 1 POKE* ,0 > t«XT B117 87 9 5 85 1E3 135 (4, 37 97 1 mSmSmSuM S4- GSe SYS83e:POK£e50,16B:POKE5657S,PEEK<56 Bee R£flDZEllFZE^-lTHENPOK£53£83,ll:P0KE3 3E8£,l:P0KE53E7e,£16.SOTE15Be ■4. ss s5«*?sr! Si 8 mS'Jw' 73,137, .54, H,1M, 154 teSi^^, ....... «hmT!m tJi*i#rfTri?jS ih i^e ■ 5,77,,,80,l48,16S,16a,£34,£3B „,....... m!S» 1 m «*m t Mi I ni > iM l tl 77B DI.Tf.3E,144,l4e,lG5,£33,£3 55 , 33,, G4,, G4.80, MS, 165,189 ,™.„,; B ;.»» ■s JTiS: ";,. - ; B - ;«'.X:".":.°«" *•*•***»* S*««w?i '§, ■ *;;;*;;: STjaSRSMKSSK ...„..„. COMMODORE J78B FQRI=58S24TQ3eBlS:P0KEI, Computer Kontakl 6- COMMODORE I=0TD4BSTEPS0 iE , l3B!P0KE386e3 , 1 S PRINT-JIETBEi STYLE" TOTil 204B READX!POKE3481E F PEEK (53252 COMMODORE 5 REM* VEILCHENSTR.56 Listing 2 M*2457eT0273B3!R r"PRUEFSUM«NFEHLER !"I939+Z COMMODORE Computer Kantakt 6-7i COMMODORE 47 COMMODORE < Laden Sie Ihre Programme in Zukunft 5-7 mal schneller! |':.'klh-L-|n'Ti T 1-1 I". :,:.:,:::■ Ubersichtstabelle zur irhef/ulwhek-ji Zli'lj,|!-l hi..- i-ixnlalls 7.UJ11 Heispie! lUr isi iii-h die MiwlK-skoLi ac.ilni 5U1UI (4MI?; = I2.4I)%1SVS Tastenbelegung COMMODORE l Jirsem Syscem i-erbes- Tips mm Sjiiell ®c uJ^«inr.:lu Mii*ii.liifi! lagcptani' in it- I.Liht ? i:!''iOi"iri:x i .i;.;t i.j.k Macro Basic auch fiirdenCI28 Computer-Abenteuer tSESZSSR "™„E,:X£",2 Sv«lcinsiil[ivare und iiuhall l);i/u nmweii ledsijlicli Mlccndi Von Thomas Tai ASenteucr"'ki;][:i.-bli>li.'SLunm- 1Vi;! j nbcr >0O Bdelile. «U. Voraussi'tzunEi-G srfiilli sein: I. 146 Seilen, 29. - DM ji '' im r ' B 6™Kil. ** '-™ "J 11 chcii abdcckcn: Pr..>2r»mmn ! r- klci Li hcbci-Mut?™ hn-n ISBN 3-7785-1132-7 iundftirsichfiirC.6. k3|'][clab.:idi l 'f,™n.l,;.l,li.:K ; as Buch "Compul;. COMMODORE Der Amiga: Sein oder Schein? Ein Testbericht liber die .■ini..-i-it.iinisclic Version Computer Kontakt 6-7. COMMODORE Computer Kontakt 6-7/B6 COMMODORE Commodore 128 Tips & Tricks tic Fcnslci u'nd Vl1 " ' ' l - >l ' 1, 't- WdMiT. trimmr filrers ;a Hare ijczuj ...|l TlTIpp wirdak da^ OrhjLiuMiJr*.! "I -i-Jen Allii wei Vcrlag llaln Bt'fker D "' ansL'.HL'tvnL'n l:pi > inHet 327Sciicn, 49.-DM '""■■■ ■' ' hoh, ISBN 3-89011-097-5 =f r "" ' Computer Kontgkt 6-7/66 COMMODORE Ein neues Programmentwicklungs- paket fur den C 64 . T0MiL-::i.. ^J-.IIl' ,'L^L- II MIL- <1.»1 pi"< 1. 1 L^ . L 1ie i del". Mil ■;■■.■:■.'[-.].'. ir.'rnir: rri-h' :.K Ichlcii knnn f>:t ausgleichl. einein Label ni 3£T.£? •H geandert vranfc 5xr lill Mngab^l. b* S ch Jump-Befehlu* , .!■ ■ il: s.e.Birf^m. ikhiraRinfUge-odE •§1 S:S fill s£2F iilif S2"; -■ ■ ;.-.; •■■.:.. 1 'v':,.^'^^^ ::s „ ■';,;;; ;": *;'-"•«•, S..S- ^ISIkiS '£"i'S X ™^rS SSlis z th'r^M '"j^T.Im ™ 7:/:^ c Computer Kontakt 6-7/86 COMMODORE 54 Commodore 64 A„»ss jap? 1 W?M^ % EzsEHH; i?*HHSs kanit. but-h: Ki'ijiu liillL 1 .- Ki'p.j. k On. ..OlBemern/iuiSuJifiien jren.iinjrejKbcinvertteii.Dr: MoglKhkcii d COMMODORE ss StarTexterV4.0 SSSSS'fTS CoramodmtM SS. ~ HPP"% sitiondes nachstcn Mai ijk'kh mirni'lu- COMMODORE 6-stimmiger Synthesizer COMMODORE Frankie crashed on Jupiter Datanreak Computer + Communications ^■■U'i£!irii2 ,k'- :,:iiLTi:l.'|^^.. ■;OPI T N IXIOR. CHT K):Y). ISen.dicksSpicltK- Spiel zen: In den Infiarttii cine I Bcrc RiickschBge I Verbesserung zum Program m "Burgbelageruiig" (CK 2/86) CK-PROGRAMMSERVICE 5. CK-Programmservice SPECTRUM Beit.-Nr.S1 20.-DM 0^.^.330 16.-DM SSwifc«« 2"- OH SSSIT" 1B-DM TI99/4A ^ (wa ^ ^.^.^ji^^ Best-NN Til Diskette 26.-DM Beit-rlr.TI ^Diskette BesL-Nr. Tl 1 a Kassette 20.- DM Best.-Nr. Tl 1 3a Kassette Best.-Nr. Tl 1 1 a Kassette 26.- DM Besl.-Nr. T Turbo-Assembler Best!-Nr.TM2 Disked'"" 5 ' 26^DM M^NrTn» D**^*^"' "~ 99-OJJ Best.-Hr.TH 2a Kassette 20.-DM Best.-Hr.T1 IB. Kassette 95.-DM CPC BmL-Nt'cPCIO But-Nr. CPC 20 Best.-Hr. CPC 30 IS.- DM "■■„, Computer Kontakt B-7/B6 CK-PROGRAMMSERV1CE Atari SeaL-Nr.A 1°0 D BesL-Nr. A 1 0a Commodore 64 Best.-Nr. C 1 Diskette Be»t--Nr. C 2 Kassctte l.-Nr. D5B5 Diskette 60.- DM 70.- DM Neue Kassetten- Sonderpakete Bei uns gibt cs Software kassctren zur besonders glinstigen Preis. Wer das Sonderpaket bestellt. bekommt im Vergleich zu den Einzelpreiscii prak- tisch eine Kassette/Diskeite umsonst, Verwenden Sie fur eine Bestellung den Softwarebestellschein vom CK-Pro- grammservice und schrciben Sie als Be- slcllvcrmcrk z.B. Tl- Sonderpaket oder Atari- Sonderpaket darauf. Computer Kontakt 6-7/86 BERICHT si Progi-muiiinhil '^■.■:!-:ii-ii..- Lipk'i-L'ji kJiTin. =£S:B£ WVOGEL Computer- bucher j^e^^r j Computer Kontakt 6-7/86 COMPUTER-BUCHVERSAND ; 64/SX 64 - Computer H ■-^"■^i i DieHackerUbsl Bl Bm.HsM.9t BUCH-BESTELLKARTE * P " H Computer Kontakt 6- A LISTINGS - ALLES FUR ATARI-USER Hallo Atarianer! *3£ "rf S ™ h Slt e a ^mSl^^A^^dt Sm^^djE'^ FrflTcr TtamuT.is.ad h'i'tf'l'- ■■!■■ 'm'^Mi'v- ^"'""^ Der Atari macht Musik ^Svr-l^l'^'iMVm'^i-'n ' i i<- , AiiMnbi.'vmS02 1 ;!(;licii,' D« Atari kam, so rnrmdlcm sich innerhafo «« ofcrf^ ST l T rL-iK t JnstbiiuT hac " " " nvin "T"- HanJl,;: iiir Jk- fertaMrSucrThar Sch m- " und diesmal tirallkteit- fttf ■!'■■ ■ il ■■■■N'i I | _ .penile Effekte. SKII^arcr^emrrann'K^r'Int :i "* 1 -'"™- m!l • kn ^ 1 ' In letzter Minute f" ■ d ™ c ft he I irr , I ? riy <* ? e ; ifcoNolcn, Pais™ undSchSijs- !>""' -1^1, ^1,!^=, -v„,m, .■(bud al'OI Sugar ti; ASSEHBLERECKE ACTION! noch schneller SsSEiSS 2SS ''" ■.ici^h-ml-Iic I'.ir .ill£^-B]i t .'Hi- mllLi ,.. ;riihciliaupi. L J lid ilit darf mi- VLM ,,v , l -. . I. — r . = e 1 ^ i ai, ..-in F.I.I insn D=i ACIIOSMl^kli AKBE(1]=0. ampler nothing Atbcilibnirami. fiii ARi'-Vi S„ nn-.vn keincrk-i L.~.[iiii- "Jv-^Snr'vin!^' miLii do- Ri-se: Knu[)f. Uarail : . . ■■,-.,!■■-..=,!.. ** d^nto^ Defilii**™^ :i,ts an Vl-jsili'rii'.pmiin voi- framm liicdcn 7 lls riff iinf Jk JbeTseQen: ■■■>!. !li d^Y^lk.^lllllCiiiiiAC- TlflN' ^:,,liikk-ii -.-ar _ Hiss nSuKfirtSTi* T^Le^rami,, PEEK WicdclstdasEree ESsssjs^ licia' in dcr \Crif'JN! Car- ducbdenZusiiu'W Sleckmufiul laufen. ri eli hlcilmil S=r E n %"Eri ( Villi [j Basil: ^mbk-r ;,uch nielli projj-am- lien eifriE PKbK- unJ PObiL unJi J i^Kr„.lc,,...i:, FKhrejisler ™ |l^ ^ ; ' ta^er miliar c£ :, uhnt Langenangate is BYTI-. POINTER ZhlGER Computer Kontakt 6-7/86 II ON [-Module hs " ■ :■ ■ ■■■... ■ ■ ■ ■■■■■.. . ;,..-. ■ ■ ... ■ .,.,., Optimieriing Definition cincs Pointers in dcr cben nur mit dem 1 TION!-(.:oiii|)iter:nirr:iLi Halb- w ""> '- ! "' CraipLlat splicer wohl ^ aufwer) anuegi-bcncn Filcnarnen ahzu- .;r SVrBlotki ]NC[.[:i»KRUNl.ACr' STICK!:, inter Si- ICOI Old.; ETCOLO^i "SS.™ A(7.FlfjER.i.V "' <' ,: ' iA(TION!-r!nr«-- SLhiubsi-Opmtoi-or ATARI Listing 2 HCTIDNI-Runti Listing 1 a icfl ist *c l loo (90 (02 (65 (CI IBS !87 (A5 Ob > (10 103 (20 RUDIV2 1B5 1B2 I i (B3 (05 JB5 HO IAA 145 i 2 (B5 1C2 (A3 (84 RUDIV2 IB (B4 186 (85 (09 PFtdC D [ I J RUHL (05 IBS 1 ) (27 I I (OB b (B2 124. (S3 424 1 IB3 (E5 1B4 (AB 1A5 (87 (ES 185 (90 (04 (85 (S7 (84 (B3 ICO (DO IE7 (A3 (82 *2A 1AJ (00 (04 (S3 1B4 IBs (18 (90 (ID 1A2 (10 (2o (82 (26 (83 J2A (BO (04 (C5 (84 M8 (03 4 13B 1CA (DO IEF (3d 1B2 12t. IM f 5 182 i ;••••• Links . R>c tsschieb n •* BYTE FUNC CIDB'tlBVTE t CROC Rrsh-tl) I JB5 1A0 IB6 Idl IDA 1 [ (A4 IS" IFO (OA tat IB5 H IS5 »A5 (Al (9D 142 103 tS? tbt IBB 1DO f » tat IBS (60 148 103 19D 147 103 19B PftOC filsH = t() PROC SETAU«"[BYTE thn, IDA 136 IBS (( [ J3t *fii 1B4 iA2 fOfl 1 »B5 IBB (DO * a $ni, 133 *t>') 1A5 1A1 I9D 14A 103 IA5 J4B (03 IbO ] [ IBS (AO 13t IA1 t 4 IA2 (1 ifcB *B5 ;'* OPEN- und CLOSE-gef ■at ii? 103 i B iiB IBS 135 (00 I4S I9B 1 B IAQ idl 1E1 PRDC QpenlBYTE chn, 1B2 ICB IB1 I BYTE POINTER 134 IAS IB9 t 1 i™ HI HI In BYTE mil, id BYTE ARRAY (str(lT) BYTE POINTER bptr 5ET (4E4*Rlsh BYTE i SET (4E6*Rrsh BET !4EA=Div DO (str-255 THEN 23B ihjj vm teisfhiuLi^ittr Klanei-V Q - BaBtronwel, P - milllere Mri M>**> 223 T-lSiPOKE 764. 25S 23B NEXT T 24B SOUND O.O, B.B 250 RETURN 27B sound a,?,a.T 273 IF PEEK < 764) =253 THEN 2BB 277 T"15iP0KE 764.25H am NE1T T 290 SOUND 0,0. B.B 295 RETURN 300 GET #1.A 35 RETURN 303 IF A«="U" THEM UOSUEI 10 SI POKE 33768, llPOKE 3376B,7 :ml^>pk'll wi r.,i,i,: !;^..,r _-h-i^ l^ : 1 i i-j ^--l''-'!'- -.i Li ■ ■ -1 ■ libiTtraKn. Tatsachlich si iOfce" X- Orgcl/Expam ^tii.H l ''r"'-'^; ■■ : V^„;„t^ :..:■'■; ^nS ""Atari. Computer Kontakt I ■cndesklcinesK-unslsloffgc- hscn fiiiMlDI IN, MIDI E tanieal tL m'IoBKI. 1 1« 12 JL-MIMW ! 51 12 11: !1 K:PEEII568ltf5B«KEKC5bl] « ™e"i?i*" ** ' L ** m ii tmo tv.ii.i'i i^.iii.i'i./is.iis *j "oHf J 7 sbeiuBH *4 cam lii i»j j»j >ii iis ill II- iJ 181 LZH* tst JJ. 181 E = J«IC»»I«)»81«M uj ^ SKSS:&15:IiS:w:»!:S:a .-•wiAiV^^ 1 Mehr Musik fur wenigerGeld ATARI Elcomp-Forth Die Progiammiersprache der vierten Cieneralic Typesetter ■l'^ioiKji.,r'iM]iij- CTT]p ; L'b].:n Laufeciten fjndrn beigefiigten Btldier d ringcbcn undTippfeh- T ItfTieil £S[lUgl, UH1 ffitSCS Benchmark-Test SCR • iO ( BENCHMARK FUER ELCOMP-FORTH > : FELD -f ; B ( VARIABLES UND FELDER ) FELD FLAB O VARIABLE O VARIABLE K VARIABLE IS — > SCR • 61 i EIEB DES. . FORTS. > 2 : PRIMES . " 1 ITERATION" 3 I FLAG C! LOOP SIZE DO I flag ce *■ DUP PRIME ! BEGIN SI WHILE K e FLAG C! 1 CNT *! LOOP ™ T * ' "" ' ;!■:. li;.< ::■:■ II. . .' ..:.: .:■ ■...'■ !, i .: , ..-.:. . staJIen.Alse^deren.i™ (>,■>. a ]le sind bel,ebi E mittimiulc ; sriimnc .-^[lA-l .:■. uuBcr ,m,,-hbsr. Ob^ntlrcin 1st [pa:, ungBUrliai Typesetter 1! aud^ifn Aun ,-(\>m- kale Te*te k< man bci Typesetter fie, He,.,.,]- ^_^_ s— Computer Kontakt 6-7/S6 ATARI B2 ~ C " lk -r\"-jLis !'!"'^i!r"'" liifcn mil li.lt: n !y[x,i:!^ '--i^i'i i ^ ; >c r i. : 1 A-'L'lX-Ri'lllll? kvih Ssss .My^kv.mUMUI^il'iii.d Si- (.k'lMkl '....mini . <*LT.SU I"- imnguricitang isl mrt in™ Kyan-Pascal Stitikt uriertei Progran ijf.l Tvpe^ttcr r:nr sin. I .lie cmogKii Prtigramroe An teitunfh;t .ulint™ ^eifiwnsM- ™ J"- - ' 1 schnc L1c=ti Inippc. abgefaBt ist. I [•unfctc wrjirMteit. t 0n Jjari ms 1 I'ls-n acrufene nir VeiDlgun; ■';;■:■ •■-:: Stilt : il wit Miltf E!;dj»- m •■.-. ;n:i »; 1 ih lit 11 . B 11 LI Text im Grafikfenster schwini.ligkeii wiihr^liemlich Qamrn "(i:" gculli PRINT)- I ■ Cr.Llikeii tinge- OPEN* coir 2 geben die Fait* der di SichcrheiKfcopicLii' ■ ' mvcnsZeichcn ^"S^nd'd™ 1 ^ X« beginni das n*jyy:i'Tiin. duv M.ITOIU'VSYS Flit :".l die ■;|-;'ii tlnunncn r>Ai\-/.T.i.:n 11 in^ir^!-ii: der Schramm I ' ,i.l . rut Sth alien 5ie nun den C; Listing 1 I D$,CHCKSUM:SUM=CI i)+PEEKQB4)*256 1 .E J'^LINE;" FEHLI i STEP 2 EBENI":TRAF 208 83 LINE=LINE+10:RE 98 IF LINEOPEEKU EN 1 CHR$(253);"ZE :END 198 FOB 1-1 TO LEN 110 BYTE-16*(ASCtD*tl,m (I,I))>64))+(ASC>64)) 120 PUT *1,BYTE:SUM-SUM+BYTE:HEXT 1 139 IF SUMOCHCKSUK TiiSN ■: CHR$(253)i" ZEILE #"jLINE;" 1ST FEHLERHAFT" : END 140 IF LEN(D$)=90 THEN 89 CHR$1253>;"FEFT1G] I" '* j 2 .1 F !« i; 04C: J . ! ft n 5 c i : A.:: 5 7 2 1 698A8D5 7 21E624D002E6254CD31FAD5E,4257 1120 DATA 214C0000A202BD58219554CA10F8 600200B103B4032040088010040201070GB5S4 :■:■:.' I":-,' . :'-.- ..... ■.«.■-■;..■ : . . ■. 1133 DATA 344 ! i3S54/05ii!J5?; , .'3696F6E2B32 2E371D9BE2B2E3B2001F.1954 Listing 2 Computar Kontakt 6-7/86 1*1 nr# »l.9i.!7,stti -F 121 FOB Mill TO 941 STEP || 171 REIT N 191 DIN S0RT«(S72]ifRH III RESTDRE 211 W M TTJ ;flESS SORT U LESSOR! iwi-cmmajiKii * lit SCAD A:6D1C 2I( 331 1L-1H4I 241 FDft R'l ID PDSITin 2,1 971 FOR H-H TO IWItl STEP 111? KlNEIl 938 7 17 'POM B"3.l2iCDNT' 991 POSITION 2, UPDH B(2,13iST0P IIBI. DEIT K 11811 TRAP 1MI3:DIH SOR1H3721 18115 TRAP 1II!I:DIH In 18*) 18818 RESTORE 1M4HS04I»=' , :!RAP 4811 18828 FDR N=] . m ■■■ Listing 2 11H WUBRIADfilBIJRTfl.ADRWD.AlRIAl Mini- Souiidriemo 8 POKE 559. 1; fiOTO II 1 FOR 1«I TO JlKWEailSJi+ltll H. 1 13 S4*l I4< 1 1 1 [*FttK 1 18J4-1M*2J I D-FEE MlS3iHHt3l 2 FOR .I'll TO I BTEP -l.SsEOUND 1,A, ,J*4:S:UH1 1,I,II,1|MIM1 2,[,18,Jll m 3,[,ll,JiNEIT JlNEtl 1 3 RETURN II DATA 197,14,87,213,14,37,218,174,19 7,14,87,218,14,87,218.216,197,14,87,21 3,14,87,218,176,197,14,14,14,14, 14 15 If PEEKI1791)'!95THEII 71 21 I-I.FM 1-1 TD lliREADDiPDtE 1334. 1H,D|PD*E 1334*I»4*l,4(-H4 2,DiNEIT I 58 DATA 121,1,1,1,1,96,128,136,121,1, ,1,1,96,121,136 95 DATA 121, I, I, 8,*, 96, 121, 136, 121.1. ,1,1,96,121,136 41 FDR !•■ 18 31iPEAD DiPWE 1536*1" 3.DINEIT liPOKE 1791,253 71 808IIB 1 81 801 71 Fys-DOS I CLOSE IliDIII tlllllSBUB 2»Ii RESTORE 1 OPEN iL.B.t.'liAUTaM.Sri' i eoro i 94 CLOSE II 'END IHt DATA 295,255,252,29 ,219. 3B ,145.19 llll DATA 141,6 ,11 .ItS, II .141,7 .31 in: OATS 145,12 ,141,28 ,21 .ItS, 11 ,141 1BI3 DATA 29 .24 ,169,27 .133,12 ,149,2? IH4DATA 133. 13 ,71 ,31 ,29 ,32 ,21 ,21 HIS DATA 16?, 238, 141, 211, 2 ,169,9* ,141 1117 DATA 113,11 ,119,14 ,141,197,2 .149 HIS DATA I ,141,199,2 .16'. IE ,141,211 III? DATA 2 ,169,1 .13J.BI ,162.171,161 1111 DATA 31 ,76 214,3) ,172,8 ,31 ,142 1111 DATA B ,199,9 ,18 ,111,48 ,3 ,199 1112 DAT) II ,11 ,141,49 ,3 ,169,41 ,141 1B13DATA 7! ,3 , It9.l ,141,71 ,1 ,169 1114 MIA 9 ,141,64,1 ,212,23!, 138, 72 111! DATA 152.72 ,162,1 ,12 .81 ,.'28,184 Hit DATA ItB, 114, 171, 134,213.21), 32 ,196 1B17 DA.TAU ,1s;. li ,141.1 ,137,11 ,3 III! DATA 119, 191, 137, iB ,1 ,16?, 31 ,157 1119 DATA 49 ,3 .!o9,o ,157,74,1 ,lt? 1121 DA1AI 111,73 ,1 ,32 ,16 ,229,162 1121 DATA 16 ,149,3 ,157,46 ,3 ,169,231 H22 DATA 137,61 ,1 ,lt?,» ,13:. 61 ,1 1121 DATA 16?, 21 ,197,72 .3 ,169.1 ,157 1124 DAIS H ,3 ,12 .Bt .229.43 ,11 .162 1823 DATA 231, 168,31 ,12 .214.31 .74 ,157 :12s DATA 2? ,12 ,196.31 ,162,141,168,11 1127 DATA 12 ,216,11 ,169.253,141.292,2 1129 DATA 171,292,2 ,211,239,249,249, It2 1129 DATA 239.142,252,2 .211,12 ,241,1 1118 DATA 9t ,169,252,141,231,2 ,16?, 29 1131 DATA' 141.212,2 ,173,29 ,29 ,113,12 1132 DATA 173,29 ,21 ,131,13 ,173,6 ,31 1813 DAI A 133,11 ,171,7 .11 ,131,11 ,71 1134 DAIA 3 ,31 ,9 ,54 ,18 ,23 ,39 ,33 HJ5DATA 31 ,54 ,11 ,91 ,39 .54 ,31 ,111 1831 DAIA 31 ,34 ,1B ,42 ,42 ,42 .32 ,71 1817 DATA 117, 118,117, 121, 115, 111, 112, 116 1139 DATA 43 ,91 ,112,111,19 ,115,17 ,118 1119 DATA 45 ,49 .7? ,93 .32 ,42 .42 ,42 1141 DATA 135,12 ,12 ,32 ,32 ,?9 ,111,112 1141 DATA 121, 114, 113, HI, 114. lit, 12 ,41 *§£ompp-g.l30p < Per Atari Spezialist i.m,."j i.' pgcaa :■'.■■ ia Witt Datentechnik. S 52 01 1 40 06 12 DATA 57 ,36 ,54 ,12 ,?B ,121,12 ,71 41 DATA 121, ill, 115, 12 ,32 ,32 ,69 ,115 14 DATA 12 ,112,111,119,181,116,12 .III 13 DATA 113,191,32 ,tS ,193,114.191,?? 16 DATA 116,111,114,121.12 ,43 ,45 .62 17 DATA 155,45 ,45 ,45 ,49 ,45 ,45 ,45 IB DATA 43 ,45 ,45 ,45 ,45 ,45 ,45 ,45 19 DATA 45 ,43 ,45 ,43 ,45 ,45 ,45 ,45 38 DATA 43 ,43 ,45 ,45 ,49 ,45 ,155,3? 31 DATA 82 ,49 .84 ,93 ,S2 ,79 ,3? ,32 12 DATA 112,117,181,194,114,116,12 ,122 31 DATA 117, IB?, 32 ,4B .79 ,91 .49 ,77 14 BATA 111,111,117,111,155,61 ,48 ,6) S3 DATA 32 ,71 ,121,115,45 ,68 ,111,113 36 DAIA 1? ,5t ,54 ,32 ,62 ,62 ,62 ,155 37 DATA 69 ,9B ,42 ,46 ,42 .155.141.12 19 DAIA 142,16 ,157,66 .1 ,74 ,94 ,22> 39 DAIA 142, tB ,3 ,141,6? ,1 ,162,9 il DATA 142,13 ,3 ,119,1! ,141,72 ,3 >l DAIA 169,9 .141,46 .1 ,76 ,U .228 ,2 DATA 8 .1 ,B ,B ,1 ,1 ,9 ,8 ;1 DAIA I ,9 .1 ,B ,1 .1 ,9 ,1 i* DATA I ,9 ,1 ,9 ,224,2 ,225,2 3 DATA 252,29 I 7 CH«*(12J)i' 'DAIMT1ST '" 8 TRAP 293I:5-I:AI»I !1 READ Il:AN-AN'li9>S4MLittJiWD 2128 a If AH0322 THEN ? AAV DATE* -) filLHH6:j22'iE ■9 IF S04S17B JHEH 7 ■DATENSUhBE FALSCH-iEltl 19 RETURN Compute! Kontakt 6-7/86 Das Kuma Spreadsheet f iir den Atari ST Computer Kontakt 6-7/86 ATARI gi Das grofie GEM-Buch Brataccas zum Atari ST FUr alle STs Von Szczepanowski Compiler bzw. Assembler ver- Als erstes falit bei Brataccas Lash, Kol Worpi pod dsn ver- und Giinther Verlag Data Becker ■IM>Seiten..W.-DM ISBN 3-89011-125-4 ^;;' ! t™'Z d ^^: ESL t H ^toOtfe.WUPtafcto.litt. ■pid. ^s ^nlhal! vidm^br zahl ■;.r ik^LindLn Grafikoperatio- Atari gcwtirdigt: Zum linlwitfc- ■ 1k VjlliMLLiii; i^r AES-Funk- '^'SSTIT FEhil' ' sss St " aQ man a °" Kumpf ^ raT^S^ ™^ Mt&- •SSS*^ ' R ™*H & ^ulS^T.^1 well. Von alleiiis^,.,,-,-.-..:.-.:. Im 2. Kapitel gehi es dura 1 ' ■>■■■■ !■■ " l]7? 4:-'''^-''^ '■<-''' ^< Seitei'i " l,; """" rMV.'^otl'i!*!: !S?te*!r ftJtSM. =TCr= was man mit Kync altes anftn- Computar Kontakt 6-7/B6 Mission Mouse Atari ST mit512kRAM itn.aitotwnAo. Spiel; Mission Muu* I 'ipic- ft 'Mich- 1. M.A.C (! Missions : nin- ggM I I Vr nor of Daw u & [ Cj i(ft?B " nfe leuel" Computer Kontaki 6-7; TI 99/4A Liebe TI-Freunde ■^ c rvf-- II ijiv ! 1. 1 L- : --■_-: l i- 1 - Oi.irr^lni- B^^^/XT Bins m MA^tedt CK St MWM^ V«™nen EfeU*|£k^ °S» Te **^S* wS^^mte^ ™r«^™S-D™be«»° ^rTcJ^aSulicto ^oStaS^aX graminen untl InJ^ni;?il i.jntn .inu-i.:n'ijiln:n Finna Myacc tin LMrfii Tr ^Lki'iiii hjl'i [Xv ijic njdi neuesien Meldungen mal gib! cs cin sli^-v im./;!.-. l':iL:i^J:;r .i;i* :. iju.ii i;il'£h mi' der logisclien [k-k-hl. F : ' foi.ci Ehe^:e[iS(:'n:r T. i' hi.v .- i-i«t'r iLT nen abgeschlossen . ^i V EfcTAuZT^BMheTto Assemblerkurs ID sHSSHIE SrL^volSnds'ett fiir Fortgeschri ttene ^™f£™ p k '* a jjrt2£&£££.' fv^'l lllii'!'::Hdimili-i-i,T-luci. Finna Hagera g ™,rlw n »■ s;_t, SSS SSBSfs ■"';* S™ m 1'toXm; ^fh^^h^^F^ icn. F-:.fj-j,-ji A.iu-ciiLlmiii'.K-i- Computer Kontakt 6-7/B6 Tl 99/4 A Screen-Editor Computer Kontakt6-7/8G TI99/4A as J REM STEUESJNG DE5 SPRITES AUF D ■, INTERNAL, FIISD 1S2 Computer Konlakt 6-7/S6 1 1 »Wt t\ FOR I-B TD 15 :: FCf? J=TA TO TAK3 :: CALL GCHAR< I , J.PP) : : F»-P»fcCHR* HEX-CODE 3" ELSe'iF P»-"./.." THEN P*=»4" ELSE IF P*=" 1 ERST ELLEN LINKE U KEIN BILD GESREICHERT ">i: CALL SOUND(400,22O, ■J DES BILDSCHIRMB ' . . ■ ■■■■ -:::. '.'.■ ■ } CALL CHARUO,"A53AA55AAS5AA35A00a0&aBaSB&A0O00iB24424242241A''>:! F IRK131>t(C*M::tHR*i: " UND ZEICHEN5AT7 _ CHAR<64, "3C4299A1A199423C") = PRQSRAMH ^CONTINUE-;"; ;" LOAD DATA": ;"SUB B TQ MAIN MENUE": ;"<3> DESISN NEXT CHARACTER": Computer Kontakt'6-7/BB 128 KByte Speichererweiterung mit Centronicsschnittstelle Computer Kontakt S-7/8S Tl 99/4 A 98 Rechnen in anderen Zahlensystemen mit dem TI-99 Sakin^i "''.:i n-!ii J >vr- lAii- POSiHXS. AS. II- I i 11. nn'-'l'sii I \7= :?? Vo> DEZ UUh HEX finmos den WertcbcRich auf einiee zusStzlichc Zcilcn cingc- MSBIKIIieftrrdMHighhyle k™mt >™!"tetai IMS nkhi 1|«}HXS=-0123456T89 ZIFFER:" :flS im liciadc-iimai- unci Binarsy- H0DEFHEX2S (A) = 140GOTO120 byte (Lean Sij can BvKi .in-hzutmireil. Zatilen- SEGS(HX£,INT l«]HVS- n »l Z34567S9 d^'^'r^l "'" C- + ' i---"l'--'n Ugorithmus rcch .ptiL-llL-.l-tolM,,!-*,: ££ ttmerzweistelUgcrfoLgcn r,:!,;n lacbdenifilbciiAJaonih- Am* amieif Systcmc MM Q "^S'"™ U n' re ' :h f «£ ;™E™"^. Zank Ut™ = ine Definition Computer Kontakt 6-7/B6 H..ic:>:-s l-'rMMlii N|;l,A"n\ Andere Bnsk--I>iitl«kte Listing 1 Tl-Club Dortmund Listing 2 Listing 3 Listing 4 Listing 5 TI99/4A ion Grafikgenerator fur Assemblerprogrammierer ic die Kiiliigcn Faibtn le ., : V tilde """"- vciwendeten Bildschidll ™^DSi^TfbS gib! die ubere GrenK 20 wcrden zum Aufbau der Zeile "CAI-L ASSijEN (DATEIS, UB, OB, toBiliscWm.Ubell.ihi RefeblKteile nwB so in das Edilorpmjramm cinjKbaui »cnn das Assembler; Basic Modullaufen soil. :■!,,... - ■ ■ IcnOFFverhinderndie DSKl.GRAFDAT: 1 ^cTr.bkTCir.-.grjnun em Is.iL'BiisiMMwerdHi. B l.iihLi.-.n-.Anfaiisdcf Charade r-TntKllc. Bmufldufch(OB*SJ- LI Rl.CHA BLWP 5VMBW " m Fiirl)niLili32-OZE(L- MrtJZEILeinscsel/iwrilen BLWP §VMB% Hauptmenu ' f DEFfflATC Eigenc Zeith« definieren ( ASCII 1 2" - 143) .1 h.Spnin S inil;.iL>EnS.Vn: Modus (CHAR DEF MODUS} 7 SCREEN Zi-.m Jiiui~i-!-ii'-. L -.in!-.w!.-.JOTiL'liilJ AC HTUNG : Da* altuelle Bild 1 RESTORE (jenc 4 BREAK Abb •iert die ASCII-Codes miihtde-RiS UNUK-BeleWs LOAD LMt 1 LFN EDITOR eists teDalei. S-b-Menft (CHAR DEF MODUS) *T END End df! Oiaii>'-K:-D=«J[i>. lirstelluiif 2 MENUE Rut . ,„■.„,,: „->H.. U |iln.^nu. 8 erade 3 N "f m ^"d^Cb^tDefinrtionstellte ie >- 65 wurden all Computer Kortakt 6-7/86 Grafikgenerator l, DISPLAY .WIADLE L. ■ i H.'.FAr TEC T ABE-LI F" : Club Nachrichten I Workshup durchjefuhrt 'X"M' XO'lOOi ::■"'•*'■' >.Wf :;£0OOO 0004 OEOEOE 040C OCOF 07000 000 000 70 7 060EEOF OFO E06 OEO F BFBFHFBFSF OEOBOO 72 70 3 070 40 404 COOOOSO BB-302OEOCOCO COB0C0CO404 . F OF 07 030 1 00 1 100(1007 07BF CF CFC F CFSF OEOCOSOOOO EaCFBOOiXiOOOOOiJOOOOOri'lO'l'HJ 000 00000 00000000 Computer Kontakt 6-7/86 -7 AND FS=1B THEN CALL JANECFS.Dii SOTO f 580 REM 9PR.UNG 30UNDC1,4250,9>:; CALL MOTION C*l O) £00 CALL PDSITION((H,¥,C)l ! IF V>lBO THEN 510 CALL COlNCi: IF C TH 530 CALL L0CATC<»l,V,32*LIANE+7): : RETURN i40 SUB FALUFS.L):: CALL SOUND (-4250, 1500 150 CALL MOTION(#1,30,OI 1 CALL DEL5FRITE(ALL>: : CALL CLEAR :; CALL BCREEN<12) .- : DISPLAY ATC12 ) DISPLAY ATilB,!)BEEPi"SPrELEN SIE AUFS NEUE J/N J" -■ ACCEPT ATftH S<*J:jNn")5IIE(-tii*« ii IF m— * then 7E0 ««*•' smih, ! sS BE ND LEfiR != ' F "*"""" QR *•"""" THEN END ELSE L =° " " LL ««**« albs IMMER NEUESTE HARDWARE FOR DEN TI-99/4A DIREKT VOM HERSTELLER imputer Kontakt 6-7/S6 Wllider Wurm akiuclle ReitonJlitff (II) bis'lOM. jc 11 AutfEi-dcm wild W Listing 1 Comouler Kontaiu 6- 1 ■■6S Listing 2 Listing 3 Listing 4 c™™«™ TI99/4A eduBCHaDi e@w ane< ee ■'acuPER-;ew!Li.[Si3:nQ; -ieis««saa 91sgR e@eaNAME»ee@apiJNKTEe99" " 3DA S8MUS SB r CHSM I RBGLE I CHS9S rpuier Konlaki 6-7/S6 Tl 99/4 A Hardcopyroutine TI-Assembler- kursll Z) REX-SDFT UN AXEL LUDEWISS PE5TALOZZISTR.7 D-20-J0 WIIMSEN/LUHE TEL:04-- ■ 1: : "F-'FT" 10040 1 10050 f R S=32 TO 3 STEP - INT !tl:CHP»i:-'-n ;C\- R Z=i TD 2-t KLEINANZEIGEN LOGITEK Computer System aOKRAMfluftlistsatz |il» nur 698. mt lm komnwnMlan Baralch fiihren wrtr Atari PC XT-kompMlbte RmAmt. LOGITEK SSE svapsssa REPARATURDI ENST & 2flt CI. 5 Tiytj a DM. iar Ml Kunsch EkI -MODUL Fur 8/16* £oro« ■if Auci Zweit-ftDH-Bttr leb fur Spiele,Utilities etc. E K 5 n v er 1 1 er nil g f pr og r ail -■, BASIC o. KC- st! Snner-Oung ! an 99.00 Belkenhe te! linger Meg Si 45IJ Beli lei. 0S406/SS47 i-- ^gs! Computer Kant kt 6-7/86 110 HpJI? S&«^ SEE s"i£d*TSr" l r £££Z£ SpfQche aus\n TV fa, Sp.c^um ^^ ' 5 ^" schlgppe 98,- fiir C «¥/«8 IsIpIeIeIcIhI Ml ■127,- -=-fur Spectrum -TVS Jkyan kyan pascal fur die XL/XESerie DM298.- kyan pascal 1st Bin 'nltD05 2-5arbfl>t Mr die Atari XL/XE Serta. Es umfaBt de so wie tor den lortgesctirittenen Progran WiBsdinall und hat fcloendB Bosuse--' M 6502 MaBGhinencoda-Compiler Einbinden von Assamblarsource t* BildschlimedWor, Sliingbafehle, Alari-Grahk und Sound urrterstiitiung 1* Source Code Linking. Chaining kyan pascalwra out elnw ungeschutzter Single KLEINANZEIGEN Texas Instruments {Cir den absolufen f-reak * olles Usibar * olles vero^ei-iar- * olles erweiferfcor ,e nolle feati.iidip^fei «nl«_ Da konnjeder seine nolle Kreatiniiat p-0) - om J *f*M,m«m P^WIor^VC- «* ■ r » Sp.ct.um -Spiel.. 1 ««tfel M,- 6 '■?""i-s «■ «,kbhS7 — * komple+te LISTE I80 W) an^de™ g KLEINANZEIGEN Bestellschein fur private Kleinanzeigen I _L ; Vtrln Hal7-I>crlc Gibfi J \ "tfSS