122 40 PRINT ''g е ј с h е run 50 PRINT ' "^ ^se.. ť+ flRINτ ,..^ О;ge ε -3 Р i εε niL '• Sp е i с - г - і 2 de ''' p,c
4052 LET c =28: IF d25 THEN LET с =2+ ď 4- 0 53 PRINT AT 1 2 , c : •' «Ø55 IF INf^EY $ г >'•.' AN б INtiEY $ C HR $ а RND іλdKiУ $ ; ? C`-1-FR $ 4 THEN TO š ε1 Ø 5 5 4.050 PRINT т 13, Eь ;'•WE• г t .• 4.0 61 IF INF,E`rt - $ _.. .• THE M GO ТС' 4-05 3 4.762 LET i $ =INKE' Ѓ $: IF í $=Сii•Ct$ i =з THEN LET í $=" _'• 4 -053 IF i $ =C3-?R$ 9 THEN GO TO 4-4- 4058- IF í $ =C'-HR $ д THEN LET d =d - 3. - ť d ?i λ ' GO TD .iiá-t^^ 40 65 IF i$ =CHR$ 1 2 THEN LET d $ i2 LET d $ i 3' =a $ : G η TO d- ı^^0Ø ıi ıΣι6zš LET d$i2. d ) =í$: PRINT Яτ 13 ^,-•° ıı_+t•• ó д?tЭ 2F IN К E'1 $ •" •' THEN GO ТС' 4-0 ^Ø 4-080 PRINT RT 3.d_ , Ø; '•^" : PRUSE 0: LET i $ =INKEY$ 4000 IF { í $ i " ıλ " С f2 "0) AND $; т ' Х THEN LET i$=ItÝ4:E`Ý $: G TO d•Ø9Ø a100 LET d$ i3 ,d λ= í $: IF d =20i^^Ø Т HEN LET j$i3, ď +i •' GO TO 1 ί 4•11 0 IF d$t3,3 2 ="Y" THEM GO TG о 4. 120 PRINT RT τ#- , Ø; •• Ze i τ • ' . G ť? т ==' λ. 04.0 5000 PRINT RT 11.0; FLRSH 3; " ς " _ INPUT ••T ť ιц p п-''•; t; " S,Ei ε-d ε г ha lu гз ^ μ• , .^ ., ; цı 50 1 0 FOP i=i ТС' "s LET d1 5020 LET >:= б t ϊ- ιηL>E d$t2,d? -.i7 λ 50:30 LET = (UR L d$ ť -3,d λ +1 ,ґ t : IF' :a' : 99 THEN SEEP z , :к 503 5 IF X =99 THEN PЯ t_~3 E 50+Z THENGO T C+ 5020 50.4.0 LET d=d +1 : І d $ í-3,d? i" л;'• 5 0 50 NEXT i 5 '50 G ı? TO 20 5 ί η 0 RESTORE C:2t-1 ď '4-3. 5 ί 1Ø FOP i =1 ТО 4-3: AEAi'г a: LET -э ť i ť =a : NEXT i: RETŽíRN $020 DAτ A 3 , 99 , - Σ 1 , -9 99 . -6 , -á , - 1,99, 99, 99,99,99.99,99.99, =' 93 ,-S г 1Ø,?9,13, ι^,15 : 15 1á , 2, d•.• -1 3 -7 '.5. -5, - 1, 11, -10 ? -J } ^ Γa ιλι^l FOR i=1.1 ТС' 255 STEP 16: PL C'-τ з ,7': DR Я tλ 0.24: NEXT « i 1Э PLOT 032: DR ı^i,s 255.0: : C' PL ı1"' : L? R R W 255,0 % ť 2;э LET п $=ι-нR$ ч ^.$ 21 +z-4-εR$ 2 i + .. .. ì }L: + C HR $ Ø 1šг_ı 3ιcl PRINT Aτ 18, -" . t. c'^ ^ п^' • 'г t^.i Ø F` ґ ' 2 NŤ 'η ','EF7 1 : .. ' • E r^. ^. ^ l= L: г о p C V B N 7050 RETURN 123
- Seite 2 und 3:
ISBN 3-88963-144-4 Es kann keine Ge
- Seite 4 und 5:
2.8 Programm 8: "Spielautomat" 36 2
- Seite 6 und 7:
2 keit in Kauf nehmen. Im ZX SPECTR
- Seite 8 und 9:
4 wir schreiben: 20 GOTO 10+850*(X=
- Seite 10 und 11:
6 1.1.3.2 ... durch den Einsatz von
- Seite 12 und 13:
8 braucht. Der durch die Verwendung
- Seite 14 und 15:
10 die Löcher für die Schrauben z
- Seite 16 und 17:
12 Zunächst fertigen wir die entsp
- Seite 18 und 19:
14 nach den Attributswert 206. Prob
- Seite 20 und 21:
16 100-110 : Das Feld wird gezeichn
- Seite 22 und 23:
18 і2' FŰ Rı := 3 С' Z1 -1 1 з
- Seite 24 und 25:
20 1Ø RE τ-1 TESTS lU) 2a fд ORe
- Seite 26 und 27:
22 Variablen: 10 LET Х=: INPUT "G
- Seite 28 und 29:
Variahlen: Y Standort der Abwehrsta
- Seite 30 und 31:
26 Dezimalpunkt genau. Bedenken Sie
- Seite 32 und 33:
28 nächsten Mai ist. Die Chance is
- Seite 34 und 35:
30 АХ 25 x 25 großes Feld Es geh
- Seite 36 und 37:
32 Variablen: ε г 5 FOP i =i TO 1
- Seite 38 und 39:
34 Sofort nimmt die Elektronik die
- Seite 40 und 41:
36 гв Aιιτsτ τκ% ^- -- '- -
- Seite 42 und 43:
38 Variablen: G noch vorhandener Ge
- Seite 44 und 45:
40 Variablen: 4- 10 LET 5 =65536 *
- Seite 46 und 47:
42 Variablen: 330 PRINT ' INK 5; BR
- Seite 48 und 49:
44 Wenn man aus Höhle 8 seitwärts
- Seite 50 und 51:
46 Im folgenden zwei Maschinencode-
- Seite 52 und 53:
48 3.2.2 Programm 12: ""Hex-Loader
- Seite 54 und 55:
50 stimmt, können Sie mittels "PRI
- Seite 56 und 57:
52 2б LET tontr=0 1 гČτ гг ί
- Seite 58 und 59:
54 Wird aber der Wert 183 in Adress
- Seite 60 und 61:
56 NOTIZEN
- Seite 62 und 63:
58 150 PRINT h$ C5? "'Code?" 1 55 I
- Seite 64 und 65:
б0 2. INTERPRET? Man gibt einen In
- Seite 66 und 67:
б 2 295 PRINT AT 20,1; FLAS н 1;
- Seite 68 und 69:
64 40S0 IF X$'1,1 ТО Rf2))=R$21.1
- Seite 70 und 71:
66 Dem 4. Wo rt, der Freizeile, bra
- Seite 72 und 73:
68 4. EINEN EINTRAG LOESCHEN Es ist
- Seite 74 und 75:
70 1 ј 85 LET 1Ù (e) = τ Nт ı
- Seite 76 und 77: 72 5О3' FOR i =V0n TO zu 9@ GO 5U
- Seite 78 und 79: 74 {4 0 CL5 г 50 PRINT INK 5 " 10
- Seite 80 und 81: 76 4.5 Programm 22: " Віог hyth
- Seite 82 und 83: 78 *30 PRINT "IHRE QERTE RN ";D$. *
- Seite 84 und 85: 80 L300 R UN 500 0 REH : DATUλiSε
- Seite 86 und 87: 82 Dann startet es sich nach dem LO
- Seite 88 und 89: 84 120 IF h=24 THEN LET b=O 130 GO
- Seite 90 und 91: 86 100 G O SU Б 5 0 0 ј . FOR Σ
- Seite 92 und 93: 88 76^1 NEXT ,ť 7 д'' PR 2NT aT 1
- Seite 94 und 95: 90 10? IF V tL ) 0 THEN GO TO 110 3
- Seite 96 und 97: 92 9562 FOR X=1 TO SPZ 9563 IF NOT
- Seite 98 und 99: 94 4 3 2 5 9 1 0 7 8 Je nach Raktio
- Seite 100 und 101: 96 ALES 1ιιι3 ОО IST. f-1ERKEN
- Seite 102 und 103: 98 1133 LET k$=k$+i$ 11 3ι1 INPUT
- Seite 104 und 105: 100 0 0 0 f 0 0 4 с' 0& ª 0 Du ha
- Seite 106 und 107: 102 427 IF N2 i> Q{ THEN GO TO 490
- Seite 108 und 109: 104 7 53 REM LET 6i = ι+5й ‚NV
- Seite 110 und 111: 106 50 PRINT "U-Boot fur se ε ten
- Seite 112 und 113: 108 59ς PRINT эlΣΡ 2i^л , a.л
- Seite 114 und 115: 110 2144 t,. IF R =8 THEN LET X$="
- Seite 116 und 117: 112 und Entfernung zum U-Boot an. Z
- Seite 118 und 119: 114 Dienstgrade in Abhängigkeit vo
- Seite 120 und 121: 116 33 3 G O TO 350 34 0 IF (,► (
- Seite 122 und 123: 118 9 7 З GO TO 1000 980 LET 8(R.'
- Seite 124 und 125: 120 YRINT ER— SCHEINT. DANN іλE
- Seite 128 und 129: 124 Wichtige Variablen: d$(3,2025)
- Seite 130 und 131: 126 10 EDROER 1: PAцEй 1: INK 7:
- Seite 132 und 133: 128 richtung, aus der Sie das Objek
- Seite 134 und 135: 130 55 LET z$=CHR$ 18+ С:Н $ +С
- Seite 136 und 137: 132 a+35Ø PRINT "N&Ch јi υf*zí
- Seite 138 und 139: 134 50 PRINT PT 21, 0 ; INK ь ; К
- Seite 140 und 141: 136 #############!3## ##τ1#####Σ:
- Seite 142 und 143: 138 Empfehlenswerte Literatur Rund
- Seite 144 und 145: NOTIZEN
- Seite 146 und 147: Elektronik Schaltungen, Hofacker Di
- Seite 148 und 149: IC Experimentier Handbuch -IC, •E
- Seite 150 und 151: 51 C.Loren z Praktische BASIC Progr
- Seite 152 und 153: Programmieren mit TRS-80, Stübs Da
- Seite 154 und 155: „ m uıιrв IEC Bus-Handbuch, M.
- Seite 156 und 157: ELCOMP-Bücher Englisch Care and Fe
- Seite 158 und 159: The Fifth Book OF t __ The Fifth Bo
- Seite 160 und 161: E1.Ø POSTKARTE Absender Bitte deut