Download (7333kb, 52 pages) - The Sharp MZ-Series

\
\ ~ \
~
~
".(')
J ~
~' .,
~ :
..
~
~ ~~ ~e­
"'*' ­
~~ ~f
~ %> ~
~ .
~
~
~ . '""" I
~
t1 ~
\ ~ /
~~ ~:y
(S~
~ ~
~ :4
tr ~
r.n
ro
1-'.
M"
ro
t'J
t'J
:I>
I-'
I-'
ro
rJJ
"1"l
C
....,
r.n
::r
....,
Ol
'0
o
3
'0
C
M"
ro
....,
::r:
ro
"1"l
M"
I-"
I-"
188:"iOU"
~82:E=E+1
183:S=(E/2- INT (E/2»
i84:IF S.5 LET S=1:
GO TO "JOU"
186:5=6
288:IF B(1)=8 AND B(2)=8
AND B(3)=8 AND B(4)=
o AND B(5)=8 BEEP 1:
GOTO ¥TOU"
281:CURSOR 24: PAUSE "Ic
h bin dran."
202:D=8:G=0
204:FOR 0=6 TO 10
286:FOR P=5 TO 1 STEP -1
208:IF B(O)=l AND B(P)+P
=0 LET G=P
210:IF B(P)=l AND B(O)+O
-18=P LET D=P
212:NEXT P: NEXT 0
213:IF G8 THEN 'SI8"
214:IF D8 LET leD:
GOTO "TRI"
382:K=8:L=8:f'I=8
304:FOR P=1 TO 5
306:IF B(P)+P>9 LET ~=P
308:IF B(P)=l AND K9
LET L=P
310:IF B(P)=l AND K=0
LET K=P
312:NEXT P
313:IF ~0 LET I=M:
GOTO "TRIO
314:IF K8 AND B(K+l)=8
AND K5 THEN "SI2"
316:IF K0 LET I=K:
GOTO "TRI"
408:IF E=l LET 1= RND 3:
GO TO "TRI"
508: "DPN"S=0
502:FOR K=l TO 5
584:IF B(K)8 THEN "SIl
505 IF B(K)=8 L~T S=S+l
586 NEXT K
508 IF Y=8 THEN "TRIO
518 IF Y0 AND U=0 AND
S