Toto ridotto Toto riduzione segni - Giornalista IT · ift>3thentm=9 1330 t(0)=t
Transcript of Toto ridotto Toto riduzione segni - Giornalista IT · ift>3thentm=9 1330 t(0)=t
cura di Tommaso Pantuso
!"6022 GOT0100613313GOSUB9100:PRINT"St1ASH ! TH1KLE !"6031 I=I-l:L(7)=SET:L(2)=SET6034 GOT010061013 IFSET=10THEt16200
Macchina del tempoNel numero 38 (febbraio),alcune lineedel programma "Macchina del tempo" sono risultateillegibili.Le ripubblichiamo qui sotto scusandoci con i lettori.1060 L$="SEI NELLA RADURA. ~lEL MEZZO C'E' LA MACCHINADEL TEMPO SENZA ENER-1061 L$=L$+"GIA. L'USCITA E' A EST"1070 EA=3:RETURN1090 L$=" SE I ~IELLA FORESTA. C'E' UN SENTI ERO ~lELLA Il! REZ I O~IE EST-OVEST. "1100 1,IE=3: EA:E: : RETURN1120 L$="SEI NELLA FORESTA. DA U~lA RADURA A NORD PUOIVEDERE U~l LAGO. I SEN-"1121 L$=L$+" TI ERI PUNTANCi A EST E A OVEST. C'E' UNA GROTTA A SUD."1122 EA= 12: ~,IE=5: SO:~: PETURH:150 Lt="':;EI Hl UWl PICC:)LA CFt-·..•EPtlA. LA LUCE VIEtlE DO tlOF:D. C"E' UtlA PIC-"
61300 IFBtO''''THUl6010613132GOSUB9100:PRINTRt" COSA ??": INF'UTEt60133 GOTO 6130060113 IF(B$O" IL CRISTALLO" )Ft~m<BtO"LO SCRIGflO" )OR(SET01S)THEN49861320 IFL(2)=OTHEN61330 .6021 GOSUB91~113:PRHlT "tlON PUOI DIRMI "At" IL CRISTALLO SE NOH HO NULLR PER FARLO
1x1x12
del 12.5% di ritrovare lo stesso 13nel grup-po di colonne estratte dal sistema di par-tenza.
Nell'esempio proposto le colonne risul-tanti sarebbero:
11111111 xxxxxxxx1x1x1x1x 1x1x1x1x11221122 112211221111xxxx 1111xxxx12211221 2112211211111111 1111111111111111 111111112x2xx2x2 x2x22x2x11111111 11111111xxxxxxxx xxxxxxxx22222222 2222222211111111 1111111122xxxx22 xx2222xxSupponiamo ora che il sistema integrale
realizzi il 13 con la seguente sequenza:1x2x11121x21xÈ facile verificare che ritroveremo un 12
nell'ottava delle sedici colonne risultatedalla riduzione.
Con la riduzione implementata dal se-
a chi non è molto esperto di sistemi. Par-tendo da un certo numero di colonne svi-luppate da un sistema integrale, il primoprogramma ne estrae un gruppo che ga-rantisce il 12 nel caso venga realizzato un13con il sistema intero. Inoltre rimane uncerto numero di probabilità di ritrovare lostesso 13 anche tra le colonne del sistemaridotto. Facciamo un esempio d'uso diquesto primo programma.
Supponiamo di voler giocare il seguentesistema:
x1121
12x1
x21x2
Si tratta di 7 doppie quindi il sistemaproposto è l'equivalente di
27 = 128 colonneche, a 350 lire ciascuna, ci costerebbero44.800 lire. Riducendo il sistema "oppor-tunamente" di un fattore 8, mantenendoun 12 in caso di 13 sul sistema integrale,avremo solo 16colonne, per un costo com-plessivo di 5.000 lire, con una probabilità
2) Toto riduzione segniQuest'altro programma riduce un siste-
ma in base ad un certo numero di informa-zioni, da noi fornite, che tendono ad elimi-nare gli eventi meno probabili.
All'inizio bisogna introdurre i pronosti-ci dopodiché il computer fa una propostadi giocata e, se si vuole modificarla, bastabattere "S" e rispondere alle domande suc-cessive. AI termine, dopo una breve attesa,il computer avrà immagazzinato nella suamemoria le prime IOcolonne del sistemaridotto (o meno se non si raggiunge talenumero) e chiede se si vuoi vederle. Essevengono visualizzate premendo "S" men-tre, premendo "N", si passa alla elabora-zione delle altre colonne. Tra una scherma-ta e l'altra il computer elabora le colonneperciò bisognerà attendere un certo tempo:quando la macchina sarà pronta verremoavvertiti dalla scritta "Premi un tasto".
CommentiAnche in questo caso non sono state
sprecate molte parole per illustrare i pro-grammi per cui daremo qualche ulterioredelucidazione per permetterne l'uso anche
l) Toto ridottoElaborando le nostre indicazioni, que-
sto primo tipo di riduzione ci garantisce il12sul sistema ridotto in caso di 13su quel-lo integrale.
Viene chiesto di introdurre i pronosticie, terminata tale operazione preliminare, ilprogramma riassume quante doppie, tripleo fisse compongono il nostro sistema inte-grale. Veniamo inoltre informati sul nume-ro di colonne che esso sviluppa (integral-mente) e quante invece ne vengono rese peravere la certezza del 12 in caso di 13 sulsistema integrale. Dopo tutto ciò, inizia lascrittura sullo schermo delle prime 16 co-lonne e, per proseguire, basterà premere untasto.
IToto ridottoToto riduzione segnidi Marco Mastri - S. Marcello (AN)I programmi che vi propongo effettuano
due tipi diversi di riduzione su un sistemacompilato integralmente. Vediamone bre-vemente il funzionamento.
132 MCmicrocomputer n. 40 - aprile 1985
:1"'
GOT0
330
1lo
tori
dott
o
a a ~ (1)
2 1050
IFYY
=0TH
Et4D
M=lt
4T(1
6"'3
~T)'
GOTO
I080
1060
IFT=
3THE
NDM=
5'GO
TOI0
8010
70DM
=INT
(31'
(T-2
»10
80D(
0)=0
(0)+
110
90IF
D(0)
<=DM
"'(D
-7)A
t4DY
Y=0T
HEtH
150
1100
IFO(
0)<=
DM"'
OANO
YY=I
THEN
I150
1110
D(0)
=I'D
(I)=
D(I)
+111
20FO
RW=1
T010
1130
IFD(
W»2T
HEt4
D(W)
=I'D
(W+I
)=D(
W+I)
+111
40Il
EXTW
1150
PP$(
J)=D
$(D(
DD),
J)'O
OTOI
410
1161
3RE
M11
70t4
T=NT
+l11
80IF
NT=I
THEI
lREA
DT$
1190
IFLE
t~(T
$»3T
HENR
ESTO
RE'
GOT0
1180
1200
QQ$=
MID$
(T$,
NT,I
)12
10PP
$(J)
=QQ$
'GOT
OI41
012
213
REM
1230
t4T=
t4T+
l'IF
t4T)
4THE
t4TT
=tH-
4'GO
T013
1012
40IF
NT=I
THEN
READ
T$12
50IF
LEt4
(T$)
<4TH
ENI2
4012
60IF
LEN(
T$»4
THEN
REST
ORE'
GOTO
I240
1270
Z$=M
ID$(
T$,N
T,I)
1280
PP$(
J)=Z
$'GO
TOI4
1012
90T$
="IX
2"13
00TT
=TT+
l13
10IF
YY=0
THEN
TM=1
6'GO
TOI3
3013
20IF
T>3T
HENT
M=9
1330
T(0)
=T<0
)+1
1340
IFT(
0)<-
TM"'
(T-4
)AND
T>3T
HENI
400
1350
IFT(
0)<=
(TM"
'T)A
NDT<
3THE
NI40
013
60T(
0)=I
'T(I
)=T(
I)+1
1370
FORf
lfl=l
TOl0
1380
IFT<
flfO
>3TH
EtH(
flfl
)=I'
T<fU
'I+·l)
=T(f
lfl+
l)+1
1390
NEXT
flW
1400
REM
1405
PP$(
J)=M
ID$(
T$,T
(TT)
,I)
1410
P$=P
$+PP
$(J)
1420
t4EX
TJ14
30IF
D$="
~<XX
XXXX
"THE
t4RE
STOR
E14
40Il
D=0'
NT=0
'DD=
0'TT
=0'G
OSU8
1640
1450
IFC=
SRTH
Et4P
RItH
'PRl
NTEN
D14
60NE
XTC
1470
EllO
1480
REM
1490
FORK
=lT0
22'
PRIt
H"_"
;'N
EXT'
RETU
Rt~
1500
RE~l
1510
GETW
$'IF
W$="
"THE
t415
1015
20W=
ASC(
W$)'
RETU
RN15
30PR
ltH"
:'JM
ETTI
A'IO
It~C
HIAR
OlO
t40N
LAVO
ROPE
RME
tmDI
ALME
NO7
OOPP
IE"
.J5,
:::5
PPTN
T"n
nT_~
TRTP
L.E"
1540
FORD
=IT0
5000
'NEX
TD15
50GO
T011
016
00FO
RK=I
TOI3
'IFV
(K)=
10RV
(K)=
3THE
NI63
016
20D$
(I,K
)=LE
FT$(
R$(K
),I)
'D$(
2,K)
=RIG
HT$(
R$(K
),I)
1630
t~EX
T'RE
TURN
1640
PRIt
H"l:
l:l
SVIL
UPPO
COLO
t~t~
E16
513
IFt~
=OOR
Il=8
THEt
lN=0
'CV=
CV+
l'GR
=GR+
l'GO
TO16
8016
60t4
=N+l
'CC=
CC+l
1670
GOT0
1710
1680
IFC"
/)2T
HEt~
CV=l
'CC=
0'P
RIt
H"l:
l~,PR
EMI
Ut~
TAST
O~"
,GOS
U815
00'P
RIN
T":'
]"16
90PR
INT"
~!!I
l!1"
"=~l
!W.1
l!l"
SPC(
CV"'
9-8)
":U
R."G
R"~"
1700
GOT0
1660
1710
FORR
=ITO
I317
20P$
(R,C
C)=M
ID$(
P$,R
,I)
1730
PRIN
TX$(
R)SP
C<tH
CV"'
9-8)
P$(R
,CC
)17
40NE
XT17
'50
RETU
Rt4
1770
0ATA
X21,
21X,
2X2,
112,
lXX,
1111
,XXX
1,22
21,l
X21
1780
OATA
X21X
,21X
X,12
X2,X
122.
2X12
1790
DATA
l111
111,
lXII
XXl,
1l)(
lXl>
:.,IX
XIIX
X,lI
IXIX
X,lX
IXXI
X18
00OA
TAII
XXXX
I,IX
XXII
I,XI
11XX
X,XX
IIII
X,XI
XIIX
I,XX
XIXI
I18
10DA
TAXI
IXXI
I,XX
IXIX
I,XI
XXII
X,XX
XXXX
X
:1"'
GOT0
330
SON
O"S
R"
:1"'
GOT0
330
:1'Gr
330
:1"'
GOT0
330
l00
RE~l
----
TOTO
RIDO
TTO
----
105
RE
M11
0PR
INT"
:']'
"CLR
120
8=7
13
0L
=3
~0
140D
IMPP
$(13
),P$
(13,
16),
D$(2
,13)
,R$(
13),
X$(1
3),V
(13)
150
FORK
=ITO
I0'D
(K)=
I'T(
K)=I
'NEX
T16
0X
$="~
ttl!l~
~"17
0FO
RK=I
TOI3
'X$(
K)=L
EFT$
(X$,
K+4)
'NEX
T28
0PR
INT"
PREM
IUN
TAST
O"'G
OSUB
I500
300
PRIN
T":,
]~AT
TII
PRot
~OST
ICI"
310
GOSU
B14
8032
0PR
INT'
FORK
=ITO
I333
0IF
K<10
THEN
PRIN
T"34
0PR
INTK
;".
INCO
NTRO
-";
345
INPU
TR$(
K)35
0V(
K)-L
EN(R
$(iO
)'IF
V(K»
3THE
t~PR
INT"
:136
0FO
RJ-I
TOV(
K)'E
(J)=
ASC(
MID$
(R$(
K),J
,I»
370
IFE(
J)<>
49AN
DE(J
)<>5
0At~
DE(J
)<>8
8THE
NPR
INT"
:138
0NE
XT39
0IF
E(I)
-E(2
>THE
t4PR
INT"
:140
0IF
V(K)
=3AN
DE(2
)=E(
3>TH
ENPR
INT"
:141
0IF
E(l)
=E(3
)THE
NPRI
NT''
:142
0E(
I)-0
'E(2
)=0'
E(3)
=043
0IF
V(K)
-ITH
ENF=
F+l
440
IFV(
K)-2
THEN
D=D+
l45
0IF
V(K)
-3TH
ENT=
T+l
460
lFK=
30RK
=60R
K=9T
HEt4
PRlt
4T"-
----
----
----
----
----
"47
0NE
XT'G
OSUB
I480
480
PRIN
T":U
K~TR
IPLE
="T"
DOPP
IE="
D;49
0PR
INT"
FISS
E="F
500
PRIt
H"~R
EMI
UNTA
STO~
",GO
SUB
1500
520
SC=I
NT<3
'tT"
'2ID
)'P
RINT
":l.
..OSV
ILUP
POCO
~lPL
ETO
DEL
SIST
EMA
SARE
BBE
DI"S
C"'L
550
IFT=
OAND
D<7T
HEtI
1530
560
IFT=
0THE
NSR=
INT<
16"'
2't(
D-7»
570
IFT-
IAND
O<7T
HENI
530
58('1
1FT
=!T
HE
NS
R=l
t..J
T(4
S*2
1'(D
-7»
590
IFT-
2At~
DD<7
THEN
I530
6013
IFT-
2THE
t~SR
=It
H(14
4"'2
't(D-
7))
610
IFT=
3THE
NSR=
INT(
5"'2
1O)
620
IFT>
3THE
NSR-
INT(
3't(T
-2)"
'2't
e:>
630
PRIl
'T":
.1'l
EtHR
ECOI'
ILSI
STEM
ARI
DOTT
OLE
COLO
Nt4E
660
PRIN
T"PA
RIA
LIRE
"SR"
'L67
13GO
SUBI
480'
PRIN
T":.
lIL
RAPP
ORTO
DIRI
DUZI
ONE
E"'l
tH(S
C/SR
+.5)
710
PRIN
T"PR
08AL
ITA'
DIFA
RE13
"INT
<l/
INT<
SC/S
R+.
5)"'
1013
13+.
1)/10
";{
"73
0PR
ItH"
moo~
REM
IUt
4TAS
TO~'
"GO
SUB
1500
750
PRlt
4T":
']"
760
PRIt
H"IN
IZIO
ELA8
0RAZ
lot~
E"78
0IF
D>0T
HENG
OSUB
I6ee
790
IFT
>2T
HE
Wr'
Y=
181
30FO
RC=
lTOS
R'P
$='''o
810
FORJ
=lTO
I382
0IF
V(J)
=ITH
Et4P
P$(J
)-R$
(J)'
GOTO
I410
830
IFV
(J)=
2At~
DT<3
THE1
l8ge
840
IFV(
J)=2
THEI
l103
085
13IF
T<3T
HENI
2ge
860
IFT-
3THE
NI16
087
0GO
T012
2089
13IF
Y'~-
1THE
t41e
30.
•::I
~1là
NU
=t-l[
)+l:
IF-t
-lD.>
71H
EN
OO
=t..J
O-?
:GO
lu10
5091
13IF
t4D=
ITHE
NREA
DD$
9213
IFLE
N(D$
)<>7
THEN
91e
9313
Q$=M
ID$(
D$,N
D,I)
9413
IFD$
(I,J
)="I
"At4
DD$(
2,J)
="X"
THEt
4PP$
(J)=
Q$·G
OTOI
41e
9513
IFD$
(I,J
)="X
"AND
D$(2
,J)=
"I"T
HENP
P$(J
)=Q$
'GOT
OI41
096
0IF
D$(I
,J)=
"2"A
IlDD
$(2,
J)="
I"AN
DQ$=
"I"T
HENP
P$(J
)=Q$
'GOT
O141
097
13IF
D$(I
,J)=
"I"A
NDD$
(2,J
)="2
"At4
0Q$=
"I"T
HENP
P$(J
)=Q$
'GOT
O141
098
0IF
D$(I
,J)=
"2"A
t4DD
$(2,
J)="
I"AN
DQ$=
"X"T
HENP
P$(J
)="2
"'GO
T014
1099
0IF
D$(I
,J)=
"I"A
NDD$
(2,J
)="2
"AND
Q$="
X"TH
ENPP
$(J)
="2"
'GOT
0141
010
1313
IFD$
(I,J
)="X
"AND
D$(2
,J)=
"2"A
t4DQ
$="I
"THE
NPP$
(J)=
"2"'
GOT0
1410
J010
IFD$
(I,J
)="2
"AND
D$(2
,J)=
"X"A
NDQ$
="I"
THEN
PP$(
J)="
2"'G
OT01
410
1021
3PP
$(J)
=Q$'
GOTO
I410
1030
F,EM
1134
13DD
=DD+
l
? .l>-
o ...•. ~...•. ~~ () 3 O' o C'l o 3 "Cl C ~ Il> -g. èii
~ w .j>. ~ () 3 Ci o (
) o 3 -o c ~ ::::l .j>. o Ol -g. ro <O Cl
>(J
l
TaIo
riduz
ione
segn
i
1RE
M--
TOTO
RIDU
ZION
ESE
GtH
2R
E~
l~
U=l
leB$
=""'
C$="
"'SP
$="
15DI
MV(1
3,3)
,Z(2
),T(
13),
W$(1
3,3)
,TT(
13),
P(2)
,C(5
),P$
(2),
Q$(1
0)21
3FO
RI=1
T013
'T(I
)=1'
NEXT
I23
FORI
=lT0
13'F
ORJ=
1T03
'W$(
I,J)
="";
t~EX
TJ,
I27
PRIt
H";"
]INT
RODU
CII
DATI
"31
3,FO
RI=
lT01
33~
PRIt
HI;
TAB(
3);
'INP
UT"
~<,1
;2!!
";A$
413
TT(I
)=LE
N(A$
)4~
IFTT
<I)
<1OR
TT(I
»3TH
ENPR
INT"
;"]"+
SP$+
":l"
,GOT
035
~eFO
RJ=l
TOTT
(I)
613
B$=M
ID$(
A$,J
,l)
713
IFB$
="X"
THEN
V(I,
J)=e
'~l
$(I,
J)="
~:"
'GOT
010e
813
IFB$
="1"
THEN
V(I,
J)=1
'W$(
I,J)
-"1"
'GOT
01ee
913
IFB$
="2"
THEN
V(I,
J)=
2'
~l$(
I,J)
="2
'"OO
TOle
e95
TT(I
)=e'
W$(I
,l)=
""'
W$(I
,2)=
""'
W$(I
,3)=
""'
GOT0
4511
313R
EM11
13NE
XTJ,
I22
13PR
INT"
ILNU
MERO
MAX.
DI~!
!E'
8E
DI~!
!CQ
t'1S
ECUT
IVI
E'3"
225
PRIN
T23
13PR
ItH"
ILNU
MERO
MAX.
DI:l
1!!E
'8
EDI
:l1!
!CON
SECU
TIVI
E'3"
23~
PRIN
T24
13PR
INT"
ILNU
MERO
MAX.
DI:l
2!!
E'3
EDI
:l2!
!CO
NSEC
UTIV
IE'
2"25
13PR
INT"
VUOI
CAMB
IARE
TALI
:PA
RAME
TRI?
S,,'
N"26
13GE
TC$
2713
IFC$
="S"
00T0
3ee
27~
IFC$
<)"N
"00T
026e
277
C(e)
=4'C
<1)=
4'C(
2)=3
'C(3
)=14
-C(e
)'C(
4)-1
4-C(
1)'C
(5)=
14-C
(2)
2813
p(e)
=8,p
(1)=
8'P(
2)=3
'P$(
0)="
XXXX
"'P$
(1)=
"111
1"'P
$(2)
="22
2"28
800
T05e
e31
313P
RINT
";"]
"31
13PR
INT"
ILNU
MERO
MAX.
DIlX
2E'
TRA
eE
13"
3213
INPU
T"N.
MAX.
DI~!
!?"
,:p(e
),IF
P(e)
<eOR
P(e»
13TH
Et~A
;~",
1'0
0T04
3533
13IN
PUT"
t~,
MAX.
oI
;IIl
!!?",:p
(1)
,IFP
(1)<
eORP
(1»
13TH
Et~A
%=2
'GOT
0435
3413
INPU
T"t~
.MA
X.o
I:l
2!!?
",:p(2
),I
FP(2
)<0
0RP
(2»
13TH
Et~A
%=3
'00T
0435
3613
PRIN
T"IL
t~UM
ERO
DI~1
2!!
CONS
ECU
TIVI
E'CO
MPRE
SOTR
A1
E13
"37
13IN
PUT"
N.MA
X.DI
~!!
CONS
.";
c(e)
,c(e
)=C(
0)+1
'C(3
)=14
-C(e
)37
3IF
C(e)
<20R
C(e»
14TH
ENA%
=4'0
0T04
3537
5FO
RI=l
TOC(
e),p
$(e)
=p$(
e)+"
X"'N
EXT
3813
INPU
T"N.
MAX.
DI;1
11!!C
ONS.
";C(
1)'C
(1)=
C(1)
+1'C
(4)=
14-C
(1)
383
IFC(
1)<2
0RC(
1»14
THEN
A%=5
'GOT
0435
385
FORI
=1TO
C(1)
'P$(
1)=P
$(1)
+"1"
'NEX
T39
13IN
PUT"
N.MA
X.DI
:l2!
!CO
NS.
";C(
2)'C
(2)=
,C(2
)+1
'O(5
)=14
-C(2
)39
3IF
C(2)
<20R
C(2»
14TH
ENA%
=6'0
0T04
3539
5FO
RI-I
TOC(
2),P
$(2)
=P$(
2)+"
2"'N
EXT
4131
3GOT
05ee
"43
5PR
INT"
:l"+
SP$+
":l"
4413
ONA%
'GOT
0320
,33e
,34e
,37e
,38e
,3ge
~ee
PRIN
T";"
];Il
O.K.!!
"51
13Z(
V(l,
T(l»
)=Z(
V(l,
T(l»
)+U
5213
Z(V(
2,T(
2»)=
Z(V(
2,T(
2»)+
U53
13Z(
V(3,
T(3»
)=Z(
V(3,
T(3»
)+U
5413
Z(V(
4,T(
4»)=
Z(V(
4,T(
4»)+
U55
13Z(
V(5,
T(5»
)=Z(
V(5,
T(5»
)+U
5613
Z(V(
6,T(
6»)=
Z(V(
6,T(
6»)+
U57
13Z(
V(7,
T(7»
)-Z(
V(7,
T(7»
)+U
-59
"Z
'(V(S
;-T
f8)')
)='Z
c',,1
(B,
-,u
j»)
)+U
5913
Z(V(
9,T(
9»)-
Z(V(
9,T(
9»)+
U61
313Z
(V(l
e,T(
le»)
=Z(V
(le,
T(le
»)+u
6113
Z(V(
11,T
(11»
)-Z(
V(11
,T(1
1»)+
U62
13Z(
V(12
,T(1
2»)=
Z(V(
12,T
(12»
)+U
2 1132
13IF
T(1)
<TT(
1)TH
ENT(
1)=T
(1)+
U'GO
T051
e11
3313
T<l)
=U11
3413
IFTT
(2)=
UGOT
0107
e11
3513
IFT(
2)<T
T(2)
THEN
T(2)
=T(2
)+U'
GOT0
5113
1136
13T(
2)=U
1137
13IF
TT(3
)=UG
OTOl
lee
1138
13IF
T(3)
<TT(
3)TH
ENT(
3)=T
(3)+
U'GO
T051
e11
3913
T(3)
=U11
1313
IFTT
(4)=
LIGO
TOl1
3e11
113
IFT(
4)<T
T(4)
THEN
T(4)
=T(4
)+U'
GOT0
51e
1121
3T(
4)=U
1131
3IF
TT(5
)=UG
OTOl
16e
1141
3IF
T(5)
<TT(
5)TH
ENT(
5)=T
(5)+
U'GO
T051
e11
513
T(5)
=U11
613
IFTT
(6)=
UGOT
011g
e11
713
IFT(
6)<T
T(~)
THEN
T(6)
=T(6
)+U'
GOT0
51e
1181
3T(
6)=U
1191
3IF
TT(7
)=UG
OT01
22e
1213
13IF
T(7)
<TT(
7)TH
ENT(
7)=T
(7)+
U'GO
T051
e12
113
T(7)
=U12
213
IFTT
(8)=
UGOT
0125
e12
313
IFT(
8)<T
T(8)
THEN
T(8)
=T(8
)+U'
GOT0
5113
1241
3T(
8)=U
1251
3IF
TT(9
)=UG
OT01
28e
1261
3IF
T(9)
<TT(
9)TH
ENT(
9)=T
(9)+
U'GO
T051
e12
713
T(9)
=U12
813
IFTT
(le)
=UGO
T013
1e12
913
IFT(
le)<
TT(l
e)TH
ENT(
le)=
T(le
)+U'
GOT0
51e
1313
13T(
le)=
u13
113
IFTT
(11)
=UGO
T013
4e13
213
IFT(
11)<
TT(1
1)TH
ENT(
11)=
T(11
)+U'
GOT0
51e
1331
3T<
ll)=
U13
413
IFTT
(12)
=UGO
T013
7e13
513
IFT(
12)<
TT(1
2)TH
ENT(
12)=
T(12
)+U'
GOT0
51e
1361
3T<
12)=
U13
713
IFTT
(13)
=UGO
T013
ge13
813
IFT(
13)<
TT(1
3)TH
ENt(
13)=
T(13
)+U'
GOT0
51e
1391
3GO
SUB3
ee5
1395
IFC$
="N"
GOT0
147e
1411
3Hl
=H2'
GOT0
145e
1421
3PR
INT"
ATTE
NZIO
NE"
1431
3P-
.HIN
T"N.
COL.
STAM
P.":
H214
413
PRIN
T"N.
COL.
CALC
O.";
H1'G
OT01
46e
1451
3PR
INT"
N.TO
TALE
COL.
";Hl
1470
GOSU
B333
e'PR
INT"
:lFI
NE!!
1513
13EN
D31
3131
3REM
3131
35H1
=Hl+
H31
3113
IFs=
eGOT
03e3
1331
315
PRIN
T":l
:lPR
EmUN
TAST
O31
317
GETC
$'IF
C$='
'''T
HEN3
017
3132
13PR
INT"
;"]I
LPR
OGRA
MMA
NQt~
HAAN
CORA
FINI
TO"
3132
4PR
INT"
ILt1
U~1E
RODE
LLE
COLO
NNE
INME
MOR
IAE'
";H
3132
6PR
INT"
LE'/
UOI
STAM
PARE
(S,,
'N)
"'PR
INT'
GOT0
3e41
331
3313
PRIN
T";"
]IL
PROG
RAMM
AHA
FItH
TODI
SELE
ZION
ARE
"30
32PR
INT"
TUTT
ELE
COLO
NNE.
"30
34PR
INT"
ILNU
MERO
DELL
ECO
LON
NEIN
MEMO
RIA
E'";
H31
336
PRIN
T"LE
VUOI
STAM
PARE
(S,,
'N)"
3037
GOT0
3e40
'313
38PR
INT"
ILNU
MERO
TOTA
LEDE
LLE
COLO
NNE
E'";
H1;"
."31
3413
GETC
$31
3513
IFC$
="N"
GOT0
3245
3136
0IF
C$<)
"S"G
OT03
04e
In castellodi Marco PieruccettiS. Maria a Colle (Lucca)
Il programma che vi propongo è un di-vertente "adventure game" per il Vic conespansione di 16 K.
Il gioco si presenta abbastanza comples-so anche perché ho inserito nel programmaalcuni particolari che permettono al com-puter di fornire delle risposte non sempreuguali, ma che variano a seconda dellasituazione. Il luogo in cui l'azione si svolgeè un antico castello, di cui non sappiamoassolutamente nulla. Ma procediamo conordine.
Durante un volo in elicottero, il tempo siè messo al brutto e ci ha costretto ad unatterraggio di fortuna. Siamo riusciti adatterrare vicino ad un antico castello, ma,purtroppo, quando il tempo si è rimesso, ilnostro elicottero non vuole più sapeme diripartire: il serbatoio si è rotto in seguitoall'atterraggio ed il carburante è fuoriusci-to completamente. Inoltre la radio è fuoriuso e non possiamo comunicare con nessu-no, anche perché non sapremmo cosa dir-gli: non conosciamo, geograficamente, ilposto in cui siamo atterrati!
Scopo del gioco è quello di trovare degliattrezzi per riparare la radio e una mappadel luogo per conoscere il punto esattodell'atterraggio. Non ci resta perciò nientealtro da fare se non esplorare il castello allaricerca del necessario.Come operare
Per giocare correttamente bisogna tenerpresente che:
l) il gioco si svolge in terza persona, cioèsiamo noi a comandare il computer ed essoesegue l'azione indicandone i risultati.
2) Durante l'esecuzione del gioco, ilcomputer pone la domanda "che cosa devofare?"; ad essa si può rispondere indicandol'azione che si vuoi far compiere alla mac-china.
3) Per andare in una certa direzione bi-sogna scrivere l'iniziale del punto cardinale(N,S,O,E) verso cui bisogna spostarsi.
4) Quando si vuoi andare in una direzio-ne intermedia, ad esempio Nord-Est, biso-gna scrivere per intero la frase "vai a Nord-Est".
5) Per far eseguire un'azione specifica,bisogna scrivere la frase nel seguente for-mato: "VERBO + ARTICOLO + COM-PLEMENTO OGGETTO". Nel caso incui l'articolo abbia l'apostrofo, bisognaobbligatoriamente inserire uno spazio tral'apostrofo e il complemento.
6) Usando il verbo "saltare", è necessa-rio specificare la direzione (es. salta a N).
7) Se la macchina non capisce una frase,provate a ripeterla, magari cambiandolaleggermente.
8) È possibile portare con sé, avendoliraccolti lungo il cammino, quattro oggetti.Per conoscere quelli di cui siamo in posses-
~=:r::rI I Ir-.I"'. r-.~..-t(\lv ....~~J
uljU
~Il~
il
vUIl~
~~,')
~. -~ vI() f-vf- (').~-LIÌ""''''''-O'l*\O\v331-++ • ~•.•..•.•.(1) .••.•••~vN'1"\0\-....' 3. vf-+f-- "v· (\Iv O) .•..•
!SI ~ •••••••v~ 31-*ISI + .. 3:::r ::r.•••• l'''. 00 + Il IlC•. "' r". IL 1.1.I- M*.,....,o v::::..-t..-t ::r ::r 111t.=.. I- +...... I I I \SI,... .•...•......v:X:: ~ ~ \SI('\J (f) /'\. I- Il Il Il (")
IV v~ ... ~ ~ ~ 00~~ ~~: ~ ~ w ~""""."". + ...v I I I CI1"'.(\1 l'''.~* I- I- I- D~N N*~ ~ : ~ ~_~ _31"'."'" V ...., 11111-0 1-+1"'. ~ * * ffiLL
.•• l'''. .•• ,,,", ISI a. a.. Q.. z\Y).... (\f l'''. .•••• Il Il Il W G'_v v~v l'''. l'''. l'''. Iliva.. * 1- l'''.G l'''. ......• 1-1"'.>t\ 3.1- -. ~~ ..-t0 (,d~ 1S.('.JlS/VI"'. + ...(1) vG "-'!SI ""-/SI ...-tvVN..-t _~_ u- UG U~ IlN0Il V'V -·0 I··..-t/"\N .•..•** -I- -o -o LLGO-o::: "-'33 ..o ...1- .. I- H 111--o 1-++;-.. 0--0--0 ""-"'0MI"'. ··_,....(')~::rv~~li.,:::ic:1 r-·_O•...•~ _~~ __ lIv_::r_v::r ~_::r_v vvvU*l.1.U*lIU*1I -NII1-0.. ***OOLLOG1.1.00LL •.. 1"'.
...A 300I-v-I--LLl-vl.1. O~ •...•MI"'. 1I1I1l::'.··::'*-=-*- Il11-.....~~---"O-"O·· "o··_--~_v+~~~ __ ~_-~_-~+i~~>N~vvv~EX~~X~ZXIvv~v~II***O~WO~WO~WII*N~N-~aOG~-z~-Z~-ZIG
G~~~~~NV~~~~~~~~~~~~-M~OO~~~~-NMv~~~OO~~G~~~~~~~oo~oooooooooooooo~~--
----------- s,oftwarecondo programma, si tende invece ad e-scludere tutte quelle colonne che, a nostroavviso, propongono un evento possibile,ma poco probabile. Ad esempio, non èconsueto che su una colonna che realizzaun tredici siano presenti cinque segni "2" eche tre di essi siano consecutivi: si tenderàquindi ad escludere eventi del genere risul-tanti da un sistema integrale.
Impostato il sistema, la macchina sele-ziona tutte quelle colonne che contengono:un massimo di otto segni "x" con non piùdi tre "x" consecutive; un massimo di ottosegni" l" con non più di 3 di questi segniconsecutivi; un massimo di tre "2" con nonpiù di due "2" consecutivi. Dato il < Run >ed introdotti i pronostici, ci verrà comun-que chiesto se vogliamo modificare talicondizioni di default e, in caso affermati-vo, ci verranno poste le opportune doman-de utili alla modifica. Facciamo un esem-pIO.
Supponiamo di giocare il seguente siste-ma che, per semplicità, contenga una va-riante tripla e 12 fisse:
1x2 1x21 1111 1111 111x xxxx xxxx xxxx equivalente a: xxx2 2222 2222 2222 2222 222Tra le colonne risultanti (indicate in
questo caso a fianco del sistema, di cui ingenerale non conosciamo lo sviluppo) eli-miniamo tutte quelle che contengono piùdi cinque segni "x", più di quattro segni"l" e più di cinque segni "2" (nel program-ma risponderemo alle prime tre domandeimpostando rispettivamente i nUineri 5,4 e5) .
Imponiamo inoltre (secondo gruppo didomande formulate dalla macchina) che,su ciascuna colonna, non debbano compa-rire più di quattro "x" consecutive, più ditre" l" consecutivi e più di cinque "2" con-secutivi.
Non è difficile constatare che, in basealle condizioni imposte, sarà prescelta solola colonna centrale della tema risultante.Non è difficile dedurre che quanto più re-strittive saranno le condizioni imposte,tanto minore sarà il numero di colonneselezionate (che questa volta vengono im-presse sullo schermo in orizzontale).
Terminiamo aggiungendo che è necessa-ria una certa coerenza nella compilazionedelle condizioni di lavoro, pena la non ela-borazione dei dati. Se, infatti, imponiamodi selezionare tutte le colonne contenentiun massimo di cinque segni" l'', non potre-mo imporre, poi, la presenza di sei segni''l'' consecutivi!
Aggiungiamo, come nota, che i due pro-grammi illustrati girano anche su C 64.
MCmicrocomputer n. 40 - aprile 1985 135
ADDO
SSO!
1
Que
sto
prog
ram
ma
èdi
poni
bile
suca
sset
tapr
esso
lare
dazi
one.
Ved
ere
l'ele
nco
deip
ro-
gram
mi
disp
onib
ilie
leis
truzi
oni
per
l'ac-
quis
toa
pago
155.
...•. (.,) O) s:: () 3 o' (3 C'l o 3 u c ~ ? ~ o tu -g. m ...•. ffi
1 1RE
M••
••••
••••
••••
•2
REM
••
3RE
M."
ILCA
STEL
LO".
4RE
M•
•:5
REM
•01
•.6
REM
•PI
ERUC
CETT
I•
7RE
M•
MARC
O•
BRE
M•
•9
REM
••••
••••
••••
•••
lBPO
KE36
B79.
2:5·
PRIH
TCHR
$(14
4)11
PRIN
T"•••
•••Dd
'IIIll
MiG
ILCA
STEL
LO"
12DI
MC$(
21),
CP$(
3),P
(21)
·SI=
RHD(
0)'S
2-RH
D(0)
·S3=
RHD(
0)·P
C=0·
L=1
13FO
RT-I
TOI3
:5·R
EADP
$·HE
XT1:
5FOR
T-IT
021'
READ
P$,R
EADL
E·C$
(T)=
P$·P
(T)=
LE·H
EXT
16FO
RT-I
TOIB
BB'H
EXT·
PRIH
TCHR
$(14
7)·T
I$="
00B0
00"
2BLE
,,0'
P$·"
"·RE
STOR
E4B
READ
D$'I
FVAL
(D$)
=LAH
DVAL
(RIG
HT$(
D$.I
))<>
BTHE
HLE=
I42
IFLE
-ITH
EHGO
T04:
5.
4300
T04B
4:5R
EADD
$'P$
·D$'
READ
D$·P
$=P$
+D$
60PR
IHTP
$'00
SUB7
BBB
63IF
L-22
AHDS
2>.
:5TH
EHPR
IHT"
C'E'
UHCA
t~CE
LLO
CHEB
LOCC
AIL
PASS
AOGI
O..
",64
·IFL
-24A
NDCD
-ITH
EHPR
IHr"
VEDO
LACO
RDA
CHE"
·PRI
HT"S
VEHT
OLA
GIU'
DALL
ATO
RRE"
6:5
IFL-
19AH
OSA-
ITHE
HGOS
UB67
:5B
66IF
L-26
AHDP
C-BT
HEHP
RIHT
"1CA
HISO
HOAR
RABB
IATI
EVO
GLIO
HOSA
LTAR
MI67
IFL-
6AHD
SU-I
THEH
GOSU
B6BB
B6B
IFL-
2IAN
DS2>
.:5T
HEHP
RIHT
"PUR
TROP
POIO
l'OH
POSS
OCOH
TIHU
ARE
·C'E
'UH
CAHC
ELLO
'" 69IF
L-27
ANOC
D-l
THEH
PRIH
T"C'
E'LA
CORD
ACH
E,",
PRIH
T"LE
GATA
AUt
~MER
LO".
PRIH
T"PE
HCE
DALL
ATO
RRE"
7BIF
AT-I
ANDO
I-IA
HDG2
=IAH
DL=I
THEH
OOT0
2000
072
AP.·
A$'A
$-·
•••'P
RIHT
")l[
;OSA
DEVO
FARE
"·IH
PUTA
$7:
5IF
A$-"
"THE
H70
BB00
SUBB
0B9B
IFL.
IBAH
O(A.
<>"A
CCEH
DIIL
CAHD
ELIE
RE"A
HDA$
<>"A
CCEH
DILE
CAHD
ELE"
lTHE
t~90
0093
IFB.
·"AC
CEHO
I"TH
EHI6
BB9:
5IF
L-24
AHDB
$·"H
"THE
H9:5
B097
IFL.
IAHD
LV.I
AHOS
.="H
"THE
HPRI
HT"H
OHPO
SSO·
ILPO
HTE
E'CR
OLLA
TO!"
·GOT
070
9BIF
L.IA
HDB$
-"H"
THEH
PRIH
T"::
I:RA
SHII
!"'P
RIHT
"EHT
RAHD
OHO
FATT
O"·P
RIHT
"CRO
LLAR
EIL
POtl
TE"'
PRIH
T"LE
VATO
IO"·
LV=1
lBB
IFB.
·"OU
AROA
"THE
H60
111:
5IFL
.E;A
HDB•
•"0"
AHDS
U=IT
HEHL
=9'0
0T02
0ll
BIF
B••"
L.IS
TA"T
HEHO
OTOI
100
120
IFB.
·"AI
UTO"
THEH
ooTO
I3B0
13B
IFB•
•"SA
LTA"
THEH
20B0
14B
IFA.
-"VA
IA
SUD-
OVES
T"AH
DL=1
4.TH
EHL-
I:5·
00T0
2014
:5IF
L.16
AHDR
HD(
ln.
6:5T
HEt~
PRIH
T"AI
UUTO
OOOO
••."
.PRI
HT"P
REEC
IIP
IITO
OOO
..",
PRIH
T":l
ISB
OUM
'."'
00T0
2B24
B1:
50IF
B$-"
SCEH
DI"T
HEH2
100
16B
IFB.
-"SA
LI"T
HEH3
B00
17B
IFB$
-"AP
RI"T
HEH4
000
IB0
IFB$
."CH
IUDI
"THE
H4:5
0019
0IF
B••"
EHTR
A"TH
EH:5
000
2B0
IFB.
·"ES
CI"T
HEH:
5:50
021
BIF
A$."
VAI
AHO
RD-E
ST"A
HDL=
I:5T
HEHL
=14'
GOT0
2022
0IF
B.·"
PREH
DI"O
RB.-
"PIG
LIA"
THEH
6000
230
IFB.
·"PO
SA"O
RB$=
"LAS
CIA"
ORB.
="BU
TTA"
THEH
6:50
024
0IF
B••
_'~
~·.
Q?
~~
l:.q
'~n
:IE
H6
.6a
a._
2:50
IFL.
19AH
DSA.
IAHD
B.="
0"TH
EHL=
21'G
OT02
026
BIF
L.21
ANDS
A-IA
HDB$
="E"
THEH
L=19
·00T
020
270
IFB$
·"AR
RAMP
ICAT
I"TH
EH67
0020
BIF
L.II
AHD(
B.="
E"OR
B.="
S"lT
HEHP
RIHT
"lIO
O:l
I::R
ASH!
!!"·
PRIH
T"IL
PAVI
MEHT
OE'
''·P
RIH
T"CR
OLLA
TO!"
'00T
0202
4029
BIF
B$·"
ROMP
I"TH
EH1:
500
3BB
IFL.
26AH
DRHD
(B)<
'BAH
DPC=
BTHE
HPRI
HT"A
IUTO
OI
ICA
HIm
....
AAAH
!..
"'PR
It~T
"BUF
,BA
RF!
••OH
AM"
'00T
0202
4B31
BIF
L.6A
HDB$
."E"
THEH
PRIH
T"LA
PORT
AE'
CHIU
SA..
•"·G
OT07
e32
0IF
B$·"
USA"
THEH
I70B
33B
IFB$
-"LE
OOI"
THEH
IBee
340
IFB$
-"LE
OA"T
HEHI
200
3:50
IFL.
2IAH
DS2>
.:5A
HDB$
-"S"
THEH
PRIH
T"HO
DETT
OCH
EC'
E'IL
CAHC
ELLO
!I!
"·00
T070
360
IFL.
22AH
DS2>
.:5A
HDB$
="H"
THEH
PRIH
T"MA
SEC'
E'IL
CAHC
ELLO
•..
!"·G
OT07
078
0IF
B$="
H"OR
B.·"
E"OR
B$="
0"OR
B$="
S"TH
EHGO
TOle
007B
:5IF
RHD(
0».:
5THE
HPRI
HT"l
ltlO
HPO
SSO
..•"
·GOT
070
79B
PRIH
T"~O
HDI
REST
UPID
AGGI
HI!)
ll"'
00T0
7BB0
0B$
=""'
C$·"
",E$
=""·
S=0·
FORT
-ITO
LEH(
A$)
81B
IFMI
D$(A
$,T,
I)·"
"AHD
S=0T
HEHS
=I'0
0TOB
6082
0IF
MID$
(A$.
T.I)
=""A
HDS=
ITHE
HS-2
·GOT
OB60
83B
IFS.
0THE
HB$·
B$+M
ID$(
A$,T
,I)
B4B
IFS.
ITHE
HE$·
E$+M
ID$(
A$,T
.I)
8:50
IFS.
2THE
HC$·
C$+M
ID$(
A$,T
,I)
B6B
HEXT
·RET
URH
2 2e98
IFRt
~D(e
n.:5
THEH
PRIH
T"ll
tlOH
HOBE
HCA
PITO
DOVE
DEBB
ASA
LTAR
E.E"
·PRI
HT"P
ERCH
E'.
.:.1"
:G
OT0
702e
99PR
IHT"
lltl
O,HO
HSA
LTO
!)ll
"·GO
T07e
2100
IFL=
15TH
EHL=
16·G
OT02
021
10IF
L=16
THEH
L=17
'GOT
02e
2115
IFL=
27AH
DE$+
C$="
DALL
ACOR
OA"A
HDCO
=ITH
EHPR
IHT"
OK!"
'IFS
2<=.
STHE
HPRI
HT"L
ACO
ROA
SIE'
ROTT
AA"·
GOT0
2024
e21
16IF
L=27
At~D
E$+C
$="
DALL
ACOR
DA"
THEH
L=24
•GOT
02e
2120
IFL=
27TH
ENL=
I:5'
00T0
2e21
313
IFL=
2THE
NL=:
5'00
T020
214e
IFL=
5THE
NL=2
6·00
T02e
2151
3IF
L=II
THEN
L=4'
00T0
2e21
60IF
L=4T
HENL
=2·G
OT02
e21
7eIF
L=24
ANOE
$+C$
="NE
LPOZ
ZO"T
HENP
RINT
"UFF
..CH
EFA
TICA
CCIA
•.•U
UUH
!:a
sPLA
SH.
l"·L
=23·
GOT0
2e21
98IF
RHO(
e».:
5THE
HPRI
NT")
llE
LASC
ALA
PER
SCEN
DERE
?)ll
"'GO
T07B
2199
PRIl
'T":.
t'lAO
OVE
•SCU
SA..
.?)l
l"•GOT
07e
3000
IFL=
1?TH
ENL=
16IOO
T020
3ele
IFL=
16TH
ENL=
I:5'
00T0
2030
2eIF
L=I:
5THE
NL=2
7·GO
T02e
303e
IFL=
2THE
NL=4
·GOT
020
3e4e
IFL=
4THE
NL=I
I·GO
T020
3e5e
IFL=
26TH
ENL=
~·GO
T020
:.:c
Ub
~j
H-L
=51
Ht:
.NL=
"!'
UIJ
Iu..:'
u30
98IF
RHD(
0n.:
5THE
HPRI
NT"M
ADO
VEVU
OICH
ESA
LGA,
SUL
SOFF
ITTO
?",o
oT07
B3e
99PR
INT"
NON
POSS
OSA
LIRE
SENZ
ASCA
LE!"
·GOT
07e
4eee
IFE$
+C$=
"LAG
ABBI
A"AN
DL=1
7THE
t~GA
=1'P
RINT
":-F
ATTO
!"•G
OT07
04e
leIF
E$+C
$="L
APOR
TA"A
NDL=
6THE
NPRI
NT"E
COME
.SE
E'CH
IUSA
ACH
IAVE
..1"
'00T
07B
4e2e
IFL=
13AN
DE$+
C$="
VARM
ADIO
"At~
Dop=
eTHE
NPRI
tH"A
IUTO
l'''P
RINT
"DAL
L'AR
MADI
OE'
CAS
CATO
UNMU
CCHI
O"4e
21IF
L=13
ANDE
$+C$
="VA
RMAD
IO"A
t~DO
P=0T
HEHP
RINT
"DI
FOGL
I!"
'ME.
·"DE
IFO
OLI"
'OP.
1·G
OSUB
Igee
·GOT
070
4e25
IFL=
13At
~OE$
+C$=
"L'A
RMAD
IO"A
NDOP
=1TH
EHPR
ItH"
VHO
APER
TOGI
A'PR
IMA'
"00
T070
403e
IFE$
+C$=
"LE
BOCC
ETTE
"THE
NGOS
UB19
50·
IFOK
=lT
HENP
RIH
T"..
•SOH
OVU
OTE;
'.!"
'00T
07B
4e31
IFE$
+C$=
"LEB
OCCE
TTE"
THEN
OOSU
BI95
0·IF
OK=0
THEH
PRIH
T"MA
NON
LEHO
•.1"
·00T
07B
4e40
IFE$
+C$=
"LAB
OTTI
OLIA
"THE
HGOS
UBI9
se·
IFOK
=ITH
ENPR
INT"
MMH!
.••C
'E'D
ENTR
OUH
OTTI
MOPI
NOT
!",0
0T07
e4e
41IF
E$+C
$="L
ABOT
TIOL
IA"T
HEt~
GOSU
BI95
e,IF
OK=0
THEN
PRIt
H"MA
HON
VHO
COH
MEl'
''00
T0
70
405e
IFL=
13AN
DE$+
C$-"
ILBA
ULE"
THEN
PRm:
r':E
'VU
OTO
.••"
'00T
07B
4055
IFE$
+C$=
"ILC
ESTI
NO"T
HENG
OSUB
I950
·IFO
K=IA
NDS3
>.:5
THEH
PRIN
T"C'
E'UH
AVl
PERA
••M
IHA
MORS
O!"·
GOT0
2e24
040
56IF
E$+C
$="
ILCE
STIH
O"TH
ENOO
SUBI
9:5e
·IF
OK=I
AND'
S3<'
:5TH
EHPR
IHT"
C'E'
UHFO
OLIO
'"00
T0
70
4e57
IFE$
+C$=
"ILC
ESTI
NO"T
HEHG
OSUB
I9S0
·IFO
K=eT
HEHP
RIHT
"NON
HONE
SSUN
CEST
IHO
1"·0
0T
070
4098
IFRH
D(0n
.:5
THEN
PRIt
H"HO
HVE
DOHI
EHTE
CHE
IOPO
SSA
APRI
RE•.
•"·G
OT07
040
99PR
IHr"
'COS
ADO
VREI
APRI
RE??
"·GO
T07e
45ee
IFE$
+C$=
"LAO
ABBI
A"AN
DL=I
:5TH
EHGA
=0·P
RIHT
")ll
JK.•
•."·
GOT0
7045
98IF
RHD(
el>.
:5TH
EHPR
ItH
"jOC
HIUD
ICH
ECO
SA??
?".
GOT0
7B45
99PR
IHT"
U1A
NON
POSS
OCH
ILID
ERE
NIEN
TE,
NON
VEDI
?",o
oT07
050
00IF
L=I7
ANDE
$+C$
="NE
LLAG
ABBI
A"AN
DGA=
0THE
NPRI
NT"M
AE'
CHIU
SA••
l''·
GOT0
7050
10IF
L=17
'ANO
E:S+
C$."
NELL
AOAB
BIA"
RNOG
A=lT
HENL
-25rG
OT02
051
98IF
RND(
0n.S
THEN
PRIN
T"ID
OVE
DOVR
EIEN
TRAR
E?"
·00T
070
5199
PRIH
T")l
lIO
NOI'
ENTR
O";
E$'P
RINT
C$;"
!"'G
OT07
055
e0IF
L=2:
5AND
E$+C
$=""
THEN
:559
95510
IFL=
2:~A
NDE$
+C$"
""OA
LLAG
ABBI
A"TH
ENL.
17;G
OT02
055
98IF
RND(
0n.:
5THE
NPRI
NT"M
AST
AIZi
TTO.
....
COME
FACC
IOAD
USCI
RE"
·PRI
NTE$
;·"
"C$;
"?
":O
OT
07'0
'55
99PR
IHT"
DADO
VEDO
VREI
USCI
RE.S
CUSA
...?
"'00
T070
6000
IFC$
=""T
HEN6
050
6003
P=0·
TR=0
·FO
RT=1
T04·
IFCP
$(T-
l)=
""TH
EHP=
T60
05t~
EXT·
IFP=
0THE
NPRI
HT"n
~Ot~
POSS
OPO
RTAR
EAL
TRO
•.•.
.!"
,GOT
070
6006
·IFL
=6AN
OC$=
"SCU
LTUR
A"AH
DS1<
=.3:
5mID
SU=0
THEN
SU-l
'PRI
NT"E
HI!
SIE'
"·P
RINT
"SPO
STAT
OLO
SCAF
FALE
!"60
e7IF
L=6A
NDC$
="S
PADA
"At'
IDSl<
.7AN
DS1>
.3:5
ANOS
U=0T
HEt~
SU-l
'PRI
NT"A
IUTO
!SI
E""
PRIN
T"SP
OSTA
TOLO
SCAF
FALE
"60
e8IF
L=6A
NDC$
="FU
CILE
"AHD
su=e
ANOS
I>=.
7THE
NSU=
1'P
RINT
"LO
SCAF
FALE
••"·
PRIH
T''6
1E
./...
AIU
TO
!Il
6ee9
IFC$
="FO
OLlO
"THE
NC$-
"CES
TINO
"·00
SUBI
9se,
IFOK
=ITH
EHME
$."
ILFO
GLlO
"·oo
SUBI
900
•C$=
"FOO
LlO"
6131
13IF
C$="
FOGL
lO"A
NDOK
=0TH
EHPR
INT"
QUAL
EFO
GLIO
•.?"
'GOT
070
6e2e
FORT
=IT0
2160
313
IFRI
OHT$
(C$(
T),L
EH(C
$))=
C$AN
DP(T
)=LT
HENC
P$(P
-l)-
E$+"
"+C$
'C$(
T)."
'"·P
RINT
'"B
ENE
....
'"'TR
=I60
413
NEXT
6041
IFC$
="AT
TREZ
ZI"A
NOTR
=lTH
ENAT
=160
5eIF
C$="
FOGL
I"A
t~OT
R=1T
HENG
2=1
6061
3IF
C$="
CART
E"AN
DTR=
1THE
NOlz
l64
eeIF
TR=I
THEH
7e64
38IF
RI~O
(en.
5THE
NPRI
NT"Q
~ON
VEDO
"E$"
"C$"
...•
•SEI
IMPA
ZZIT
O?)
ll".GO
T070
6439
PRIN
T")l
lCOS
AOO
VREI
PREN
OERE
?"·0
0T07
eh!
')f.U
:liP
=A
,F
m?
T=
1T
n4
'T
Fr'
:PS
(T-1
')=
FS
+"
"+r'
:ST
HF
NP
=T
.(co
ntin
uaa
pagi
na/3
8)
1024
0DA
TAI2
,"S
ONO
INUN
ACA
MERA
.IL
GRAN
DELE
TTO
COL
8ALD
ACCH
INO
RISA
LTA
SUBI
TO"
102S
0DA
TA"N
ELVA
RRED
AMEN
-TO
DELL
AST
ANZA
.VED
OUHA
PORT
AA
SUD
EDUN
AAD
OVES
T",1
3S,1
10,'
"
G
VUSC
ITA"
,3
UN
PO
ZZ
O",
2N.,
2
CURA
.AD
OVES
TED
EST
V
UNA
STRN
ZR,A
SUO
DELL
ESCA
L
PORT
A,E
ASU
OVE
DOIL
CORR
ID
NORD
VEDO
DUE
PORT
E·A
SUD
C'E'
C'E'
ILNO
STRO
ELIC
OT-
TERO
,EA
OVES
TVE
DO
ALCE
NTRO
DEL
CORR
I00I
O•A
tmRD
EDES
TCI
SOt~
ODU
EPO
RTE
..IN
FOND
OA
SUD
VEDO
L'US
CITA
.•,8E
,6N,
2S••
••EN
TRAT
ONE
LSA
Lot~
EPR
INCI
PALE
·SP
ICCA
t~EL
MURO
At~
ORDU
1023
0DA
TA"P
AVIM
ENTO
E'PE
RICO
-LA
NTE
!AD
EST
VEDO
E",'"
9010
PRIN
T"LA
NOST
RAAV
VENT
URA
FINI
SCE
QUA.
"·GO
T02e
240
9S00
PRIN
T":f
flAA
AAAA
AAAH
HH"!".
PRlt
n"ff
lot~
OPR
ECIP
ITAT
OIN
UN8U
RRO'
~E",
GOT0
2024
010
000
DATA
I,"S
ONO
INUN
ARA
DURA
INME
ZZO
AOUN
80SC
O.A
NORD
C'E'
L'IH
GRES
SODI
IJN
CAST
ELLO
"10
010
DATA
",A
DEST
RA40
,.10
020
DATA
2,"S
ONO
INUN
CORR
IDOI
OAM
PIO,
ARRE
DATO
CON
ISO
NO.•
1003
0DA
TA"D
UESC
ALIN
ATE;
VERS
ON,
40,S
E,.
1004
0DAT
A3,"
SONO
100S
0OA
TA"M
ENTR
E10
060D
ATA6
,"SO
NON
.•10
070
DATA
"GRO
SSO
CAMI
NO'N
ELMU
ROA
EST
C'E'
UHA
DI0"
,3S,
'"10
080
'DAT
A8,"
SONO
INCU
CINA
;DAL
LEAM
PIE
FINE
STRE
ENTR
AMO
LTA
LUCE
;C'E
'Ut
~RA
NDE
.•10
090
DATA
"TAV
OLO
ANO
RD.
ADOV
EST
VEDO
ILCO
RRID
OIO"
,30
,'"
1010
0DA
TA4,
"SON
OA
META
'DI
UNA
SCAL
INAT
A'AD
EST
LESC
ALE
SCEN
DONO
,MEN
TRE
ANO
RD.•
1011
0'DA
TA"S
ALGO
NO.
LEPA
RETI
SONO
TAPP
EZZA
TEDA
ENOR
MIST
ENOA
RDI"
,ll
t~,2E
,>l'
1020
0O
AT
As.
-n-s
ON
OA
"l'IE
ìfi'
Lll:
.lL
H::
>L
:HL
INA
IA-
E.S
l'-H
uV
E::
.~IL
l:.
~L
:HL
I::.
:::H
U,i0
t"'u
,f1
NOR
O••
1021
0DA
TA"
INVE
CESC
ENDO
NO.
QUA
It~C
OMIN
CIA
AFA
REUN
PO··
FRED
DO..
.",2
0,26
'1,"
1022
0DA
TAll
,"SO
NONE
LLA
SALA
DEI
TROF
EI.Q
UEST
AST
ANZA
E'MO
LTO
MALA
NOAT
A..
IL
6510
t~EX
T6:
120
IFP=
0THE
~IPR
ltn"
IONO
NHO
",E.
""C
.;•P
RINT
"00
,•••
GOT0
706S
22IF
L=26
ANDE
.+C.
=.•L
ACAR
NE.•T
HENP
RINT
..AUF
...•
IHO
FERM
ATO
ICA
NI"'
PC-l
'GOS
UBI9
:l0'
CP.C
LC)=
.•..'G
OT07
06:
130
OK=0
'FOR
T=lT
020
.65.
40IF
C':$
"(T
)~'!'
AN
DO
t'::'Z
0TH
Et~
C:f
(T)=
CP-
;f(-
P-1
)-:G
P.<
'P-t
-)1I
I:ll~
""1
p(:R
-at
.Pfi'
-ttfl'
-"'1
"It(
••-t-
-rl"
It('w
t6S
S0NE
XT6S
S1IF
C••"
ATTR
EZZI
"THE
NAT-
06S
S2IF
C••"
FOGL
I"TH
ENG2
-06S
S3IF
C.-"
CART
E"TH
ENG1
.06S
S4GO
T070
6600
IFC•
•.."
THEN
6699
6601
IFL-
19AN
DC.-
"ARM
ADIO
"Atm
SA=0
THEN
PRI!
n"AC
C..
.COM
EPE
SA!"
'PRI
tH"Q
UADI
ETRO
C'E
'UN
•."'
SA=1
'GOT
070
6610
IFL-
19AN
DC.-
"ARM
ADIO
"AND
S=1
THEN
PRIN
T"..
.FAT
TO..
...•S
A=0·
GOT0
70<
6620
IFL-
6AND
C.="
SCUL
TURA
"AND
SI(=
.35A
NDSU
=0TH
ENPR
INT"
MA..
.COS
ASU
CCED
E.:.
?"'S
U=I
'GOT
070
6631
3IF
L-6A
NDC$
-"SP
ADA"
ANDS
I<.7
ANDS
l:>.
3SAN
DSU-
0THE
NPR
ItH"
EHlo
.COS
ASU
CCED
E..
?",S
U-l:
GOT0
7066
40IF
L.6A
NDC.
-"FU
CILE
"AND
su-e
ANDS
D-.
7THE
NPRI
NT''
'EHI
,MA
E'FA
NTAS
TICO
'''.S
U-I'
GDT
070
66S0
IFRN
D(0)
(.3T
HENP
RINT
"EOR
A,CO
SACR
EDI
DIAV
ERE
RISO
LTO
?"'G
OT07
066
98IF
RND(
0):>
.7TH
ENPR
INT"
COME
.SC
USA
7"·G
OT07
066
99PR
INTB
."CH
ECO
SA7"
,GDT
D7e
6700
IFEJ
Il+C
.-""
THEN
6749
6710
IFL-
23AN
DE.+
C.-"
ALLE
PARE
TI"T
HENP
RINT
"DEV
Orl
ETTE
RMI
ADI
ETA'
SALG
OMt
ìLE.
.'-2
4'GO
T02e
6720
IFL-
24AN
DCD-
IAND
E.+C
.-"A
LLAC
ORDA
"THE
NPRI
NT"U
UFF
..CH
EME
STIE
RACC
IO..
.,"
'L·
'OOT
D20
6748
IFRN
D(0)
:>.S
THEN
PRIN
T''P
ERCH
E'DO
VREI
"·P
RINT
"ARR
ArlP
ICAR
rlI
.•'PR
INTE
.""C
."7
GOTD
7067
49PR
INT"
ACO
SAMI
DOVR
EI"'
PRIN
T"AR
RAMP
ICAR
E7"
'GOT
070
67S0
PRIN
T"VE
RSO
OVES
TVE
DO•.
.•..
UNPA
SSAG
GIO
SEGR
ETO
'''·
RETU
RN68
00PR
INT"
ADOV
EST
C'E'
UN"·
PRIN
T"PA
SSAG
GIO
...C
'E''
''PR
INT'
'UW
ALTR
AST
ANZA
''''
"ET
URN
7000
FORT
-lT0
2170
10IF
P(T)
-LTH
ENGO
SUB7
080
7020
NEXT
'RET
URN
7080
IFC.
(T>=
""TH
ENRE
TURN
7100
IFRN
DC0>
:>.5
THEN
PRIN
T"'~
EDO
.••G
OT07
13e
7111
3PR
INT"
NOTO
";71
30PR
INTC
.CT>
7140
I-RN
D(0)
'IFI
:>.8
THEN
PRIN
T"A
SINI
STRA
..•·R
ETUR
N71
S0IF
I:>.
6THE
NPRI
NT"D
AVAN
TIA
ME..
.•RET
URN
7161
3IF
I:>.
4THE
NPRI
NT"Q
UIVI
CINO
.'"
RETU
RN71
"70
IFI:
>.2T
HENP
RINT
"ADE
STRA
...·R
ETUR
N71
80PR
INT"
ACCA
NTO
AME
"·RE
TURN
9131
30PR
INT"
OOOP
SI
:lEl
OUM'
!!"'
PRIN
T":f
flLBU
IOHO
mCIA
MPAT
OE
HOBA
TTUT
OLA
TEST
A.
1832
IFE.
+C$=
"IF
OGLI
"THE
N70
1841
3IF
E.+C
.="I
Ll8R
I"TH
ENPR
INT"
VISO
NOVA
RITI
TOLI
'DI
VINA
COMM
EDIA
,I
TRE
MOSC
HET
TIER
I•.
•"18
:10
IFE$
+C.=
"ILl
BRI"
THEN
PRIN
T"IN
OLTR
E·GU
ERRA
EPA
CE,
IPR
OMES
SISP
OSI
.•"'
GOT0
7018
60IF
E.+C
.="I
LLlB
RO"T
HENP
RINT
"NON
CICA
PISC
ONI
ENTE
·E'T
UTTO
INLA
TINO
''''
00T0
713 18
70IF
EJIl
+C.=
"ILF
OGLl
O"TH
ENPR
INT"
lOC'
E'SC
RITT
OOI
"·PR
INT"
CHIE
DERE
AIUT
OAL
"'PR
INT"
PAPP
AGAL
LO..
7"·G
OT07
e18
98IF
RND(
0):>
.5TH
ENPR
INT'
'LEG
GICO
SA•.
.7"'
GOT0
7018
99PR
INT"
MIRI
FIUT
O01
LEGG
ERE,
SENO
NPA
RLI
CHIA
RO''
''GO
T070
1913
0OK=
0·FO
RT=I
T021
1910
IFC$
CT7=
""AN
DOK=
eTHE
NC.(
T)=M
E.·P
(T)=
L·OK
-119
213N
EXT·
RETU
RN19
:10O
K=e·
FORT
=eT0
319
60IF
CP$(
T>=(
EJIl
+""+
C.>T
HENO
K=l·
LC=T
1970
NEXT
·RET
URN
2000
IFL=
11AN
DC.=
"E"T
HENL
-12·
GOT0
2021
320
IFL=
11AN
DC$=
"S"T
HEt~
L-4·
GOT0
20
900
IFB.
·"O"
THEN
PRIN
T"OV
EST"
910
IFB.
·.•E
.•THE
NPRI
NT.•E
ST.•
920
IFB•
•·'N"
THEN
PRII
n"NO
RD"
930
IFB•
•.•S
.•THE
NPRI
NT.•S
UD.•
940
GOT0
2010
00RE
ADM.
1010
IFM•
•"."
THEN
PRIN
T"NO
NPO
SSO,
NON
C'E'
ALCU
NPA
Ssfl
GGIO
VERS
O";
'GOT
0900
1020
IFRI
GHT.
(M.,
I)-B
.THE
NLaV
AL(M
.)·G
OT02
010
30GO
T010
0011
00IF
CP.(
0).·
.•·AN
OCP.
(1)
a""A
NDCP
.(2)
=""A
NDCP
.(3)
.""T
HENP
RINT
"NON
HONI
ENTE
CON
ME1"
'GOT
070
110S
PRIN
T"GL
IOG
GETT
ICH
EHO
CONM
ESO
NO·
1110
FORT
=0T0
3'PR
INTC
P.(T
)·NE
XT·G
OT07
012
00IF
C.·"
"THE
NI29
912
10GO
SUBI
9S0'
IFOK
-0TH
ENPR
INT"
MANO
NHO
"E.'
PRIN
TC."
..,"
'GOT
070
1220
IFL=
27AN
OC.-
.•COR
OA.•T
HENI
NPUT
.•OOV
E...
•;OV.
1221
IFOV
.="A
UNME
RLO"
THEN
CO-l
'PRI
NT"F
ATTO
1"'G
OT07
012
30PR
INT"
MACH
ECO
SAST
AI"'
PRIN
T"OI
CENO
O..
'7"'
GOT0
7012
99PR
INT"
SPIE
GATI
MEGL
IO''
',GOT
070
1300
IFL-
2STH
ENI3
3013
10IF
RNO(
0):>
.STH
ENPR
INT'
'MA
SEST
AIAN
DAND
OBE
NiSS
IMO
....
.•,!'
'''G
OT07
013
28PR
INT"
ECA
VATE
LADA
SOLO
UNA
BUON
AVO
LTA,
ACCI
OEtn
l1"
'GOT
070
1330
PRIN
T"ll
lCR
ACR
A.•
.•13
40PR
INT"
lllI
OSON
OQU
A,PA
PPAG
ALLO
PARL
ANTE
,"13
S0PR
INT"
ESE
MIAS
COLT
ISA
RO'
ILTU
OAI
IJTA
NTE"
1360
PRIN
T"ll
lTRO
VARE
LACH
IAVE
E'UN
ARO
VINA
7"13
70PR
INT"
IOTI
CONS
IGLI
OCE
RCA
INCA
NTIN
A,.
•13
80PR
INT"
lllI
NOLT
REST
AIAT
TENT
O"13
90PR
INT"
ALLE
PARE
TI'"
1400
PRIN
T"ES
SENA
SCON
OON
PASS
AGGI
SEGR
ETI
'''.G
OT07
0IS
00IF
C.-
•.••TH
EN1S
99IS
10OK
-0·
GOSU
BI9S
0'IF
OK-0
THEt
H597
ISIS
CP.(
LC)-
""IS
20IF
C.•-"
BOTT
IGLl
A"TH
ENPR
INT"
:lIS
CRAA
SH'!
!"'PR
INT"
ODH
..CH
ESO
RPRE
SA''
',ME
.-"U
t~A
CHIA
VE"'
GOSU
BI90
0'00
T070
IS40
PRIN
T"E
ORA:
J"'G
OT07
0IS
97IF
RNO(
0):>
.STH
Et~P
RINT
"MA
NON
HO"·
PRIN
TE."
"C.'
PRIN
T"Co
t~ME
l""!
"·GO
T020
IS98
PRIN
T"SE
NON
TENE
SEI"
·PRI
NT"A
CCOR
TO,O
EVO
AVVI
SART
ICHE
NON"
'PRI
NT"P
OSSE
GGO
"E."
"C.'
GOT0
70IS
99PR
INT"
TISA
REI
GRAT
OSE
MISP
ECIF
ICAS
SICO
SADO
VREI
ROMP
ERE
....
..••
GOTO
70 1~1F
C$~
"-rH
tNP
~CO
S:A
.·.-
.:??
?*'!"
"'GU
1U7"
0-16
10IF
C.="
CANO
ELE"
THEN
C.="
CANO
ELIE
RE"'
E.="
IL"
1620
IFC$
·"CA
NOEL
IERE
"THE
NGOS
UBI9
50'I
FOK=
IANO
L-18
THEN
L-28
'GOT
020
1698
IFOK
=lT
HENP
RIN
T"A
COSA
E'SE
RVIT
O,SC
USA
..7"
•GOT
070
1699
PRIN
T"MA
COME
FACC
IOAD
ACCE
NDER
E"E
.".•C
•.•.
.7.•·
GOT0
7017
00IF
C.=
.•..TH
ENI7
9917
10IF
C.-"
CHIA
VE"A
t~OL
-6TH
ENGO
SU81
950·
IFOK
-IAN
OAP.
·.•A
PRI
LAPO
RTA"
THEN
PRIN
T"RI
USC
ITO
!",
L=7
:G
OT
020
1720
IFC.
="CH
IAVE
"ANO
L=6A
NOOK
-ITH
ENPR
INT"
PER
COSA
,SCU
SA.•
...•
·GOT
070
1798
IFRN
O(0)
:>.5
THEN
PRIN
T''P
REGO
...7
''·G
OT07
017
99PR
INT"
COSA
DOVR
EIUS
ARE
7"·G
OT07
018
00IF
C.=
.•.•TH
ENI8
9918
e~GO
SUB1
950:
IFOK
-0TH
ENPR
INT"
NON
HO"E
$""C
."1"
'00T
07'0
1810
IFE$
+C.=
"LEC
ARTE
"THE
NPRI
NT"A
LLOR
A..
CISO
NODE
LLE
LETT
ERE.
.NON
CILE
GGO·
"18
11IF
E*+C
.="L
ECAR
TE"T
HENP
RINT
"SON
OSB
IADI
TE.E
HIMA
UNO
OIQU
ESTI
FOOL
IE'
META
'01
Ut~A
CART
A"18
12IF
E*+C
.="L
ECAR
TE"T
HEt~
PRIN
T"GE
DGRA
FICA
...'
"PRI
NT"C
HEDE
SCRI
VEQU
ESTA
ZONA
''''
IFG2
=0TH
EN70
1814
IFE.
+C$=
"LEC
ARTE
"THE
t~PR
INT"
ORA
ABBI
AMO
LACA
RTA
COMP
LETA
'"'0
0T07
018
20IF
E.+C
.="I
LQUA
OERN
O"TH
ENPR
INT"
E'PI
ENO
01AP
PUNT
IE
01FO
RMUL
ECH
IMIC
HE.•
"•G
OT07
018
30IF
E$+C
$="I
FOGL
I"TH
ENPR
INT"
HOTR
OVAT
OUN
PEZZ
ODI
CART
AGE
OGRA
FICA
"'PR
INT"
EWIV
A!"
1831
IFE$
+C$=
"IFD
GLI"
ANDG
I-IT
HENP
RI!n
"ORA
ABBI
At10
LACA
RTA
GEOG
RAFI
CACO
MPLE
TA.
...•. (.o) -..j~ (Jl
:J ~ o~ () 3 O' o () o 3 "O C 1i w -g. ro
MARM
O'LA
STAN
ZAE'
PIE-
HADI
LI8R
I'AO
OVES
TC'
E'LA
PORT
A
GABB
IACO
NTEN
ENTE
NOVE
MERL
l-DU
ECI
VETT
EE
UNPA
PPAG
ALLO
"
SONO
MOLT
ICA
NIDI
VARI
ERA
ZZE.
••••
•"
OVES
TC'
E'UN
APO
RTA"
•.•~S
.18
0.li
<UN
MERL
OE
L'AL
TRO
POSS
OVE
DERE
TUTT
ALA
! ~ I •••'N
EXT .•.•..•.•...
.;.
";
.";
ATTR
EZZI
.9
.."
LABO
RATO
RIO
SEGR
ETO
!It
~QU
ESTA
STAt
~ZA
C'E'
U4 le
~70
DATA
9."S
ONO
ENTR
ATO
NEL
NPO
'D
I"
1~80
DATA
"TUT
TO••
.E
UNGR
ANDE
DISO
RDIN
E.A
EST
VEDO
ILPA
SSAG
GIO.
".6E
.O'
1~90
DATA
UNQU
ADRO
,311
3613
13DAT
AUNA
SCUL
TURA
,6,U
NCA
NDEL
IERE
,6,U
NASP
ADA.
6.UN
FUCI
LE.6
1136
10DA
TAAL
CUNE
CART
E.7.
UNQU
ADER
NO,7
1136
213D
ATAD
ELLA
CARN
E,S.
UNA
SEDI
A.8
1136
313D
ATAD
ELLE
BOCC
ETTE
,9,U
NACA
SSET
TADI
MEDI
CINA
LI,9
,GLI
1064
13DA
TAAL
CUNI
VEST
ITI,
12,D
EIGI
OIEL
LI,1
2lB
6SB
DATA
DEI
LIBR
I,13
,UN
CEST
INO,
1311
3661
3DAT
AUN
LIBR
O,14
1136
713D
ATAU
NA80
TTIG
LIA,
19lB
6SB
DATA
UNBA
STON
E,26
.UN
ACO
RDA
1136
90DA
TA26
",20
0131
3PO
KE36
879,
~7'P
RINT
":I"
'RES
TORE
2B00
SFO
RT=0
T08'
PRIN
T"~"
TAB(
220'
T>"1
1:1
2013
136
PRIN
T"•.
.20
010
PRIN
T'PR
INT"
"••
•••
2002
0PR
INT"
••••
••••
••••
••"
20030
PR
INT
....
••••
•"
2130
40PR
INT"
"i".
....
....
••••
•••1
200S
BPR
INT"
"i.•
•r"
.••r""
2006
0PR
INT"
~"..
....
....
.••
••••
••••
••••••
••••
•••
1••
••••
••••
•1
••••
••••
•••
120
070
PRIN
T"••
••••
••••
•••.21
3080
PRIN
T·_
••••
••••
••I
••••
••••
••••
•••
••••
••••
2013
90PR
INT"
••••
••••
•••
I••
••••
••••
•••
••••
••••
••20
100
PRIN
T"••
••••
••••
•I
••••
••••
••••
•••
••••
••••
2011
13PR
INT"
__••
••••
••••
•••
a••
••••
•••1••
••••
••••
••••
••••
••••
••••
••••
•1
••••
••••";
2012
0PR
INT
·Ja
Q••
••••
••••
••••
••••
••••
••••
••••
••••
I••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••••
••20
130
PRIN
T•.:
Tn••
••••
•:l
l:r.
ll.r
.::F
llIl••
•r.
::.-
~l"I
I:oI
d.'
_l"
O";
2013
SPR
INT·
·!9*
Il••
••I-
-r-t
••••
I";
2014
0PR
INT·
__••
••••
••••
••••
••••
••••
••••
•""
:1••
••••
••••
••••
••••
••••
••••
••••
••••
~";
201~
BPO
KE36
878,
1~'F
ORT=
BTOI
77'R
EADD
$'NE
XT20
1S~
PRIN
T·••
••••
••••
aCOM
PLI
MENT
I!••
•;
2131
613
FORT
=BT0
6B'R
EADN
.D'P
OKE3
687~
,N'F
ORL=
ITOD
lI<1
0e'N
EXT'
POKE
3687
~,0'
NEXT
2017
0DA
TA01
3120
1111
2011
3120
1,l,
215,
4,21
5,4,
219,
4,21
9,4,
228,
6,22
3,2,
215,
2,0,
1,21
5.1.
223,
320
180
DATA
215.
l-20
7.4,
22~,
4.22
~.4,
219.
3.20
9,1,
21~,
8,21
~.2.
e.2.
21~,
3,21
9,1.
223,
6,22
3.2.
223.
420
190
DATA
225.
3.22
3,1.
223.
4.21
9.6.
0.2.
219,
3.22
3,1,
22~.
6,22
~.2,
22~,
3,22
~,1.
228,
3.22
5,1
"'2
0200
DATA
223.
10.0
.1.2
28,3
,228
.1.2
2S.4
.223
.3.2
1~.1
,228
,4,2
23,3
,21~
,1.2
01,8
,0,3
.201.1
2021
0DA
TA20
1.3,
201.
1.21
9.8.
22~.
~.21
9,2,
211,
2,21
~.8
2022
0PR
IHT·
:IOt
SEI
RIUS
CITO
A"'P
RINT
"'I:
OMPL
ETAR
ELA
NOST
Rfl"
'PRI
NT"A
VVEN
TURA
.IN"
2023
0PR
INT·
•••L
EFT$
(TI$
.2>
•.OR
E."M
IO.(
TI.,
3.2>
"MI
NUTI
E'"
PRIN
T"""
RIOH
T.(T
I$,
2>"
SECO
NOI·
2024
0PR
INT
•.---
----
----
·20
250
PRIH
T"\I
UOI
GIOC
ARE
ANCO
RA?"
2026
0GE
TA.'
IFA.
=•.
•.OR(A
.<>
•.S..A
HDA.
<>..N
••>TH
EN20
260
2027
0IF
A$=·
S·TH
EHPR
INT"
:I"'
POKE
3687
9,2~
'RUN
ARC
MEVE
llO
UCCE
LLI
HANN
OSM
ESSO
SCAL
INI
SONO
INPA
RTE
CORR
IDOI
OVA
DANO
RD
SONO
RUGO
SE.
DIPI
ETRA
.••
MOLT
OAL
TA.
DIET
RODI
LEPA
RETI
GAB8
IA.T
UTTI
QUES
TI
C'E'
UNA
PORT
AE
NELL
OAN
GOLO
SUD-
OVES
TUN
A
3(s
egue
dapa
gina
/37)
1026
0DA
TAI3
,"SD
NDIN
UNA
CAME
RETT
A'TR
AUN
ARMA
DIO
EDUN
ASP
ECCH
IERA
C'E'
UNBA
ULE.
"10
270
DATA
"DI
QUA
VEDO
DUE
STAN
ZE'U
NAA
NORD
EDUN
AAD
OVES
T",
12N.
140,
0'10
280
DATA
I4."
QUES
TADE
VEES
SERE
LABI
BLIO
TECA
'DEC
INE
DIPO
LVER
OSI
SCAF
FALI
1029
0DA
TA"C
OPRO
NOI
MURI
'AES
TAT
A",1
3E.l
I<10
300
DATA
1~,"
SONO
NELL
ATO
RRE'
DALL
OARC
OA
NORD
-EST
VEDO
LABI
BLIO
TECA
'C'
E'UN
ASC
ALA
"10
310
DATA
"ACH
IOCC
IOLA
CHE
SCEN
DE.
EUN
ACH
ESA
LE",
O'10
3;11
3DAT
A16,
"SON
OFE
RMO
SULL
ESC
ALED
ELLA
TORR
E'GL
IRO
TTI
ED"
1033
0DA
TA"H
OPA
URA
DICA
DERE
.SC
ENDO
OSA
LGO?
",lI
<10
340
DATA
17,"
SONO
ARRI
VATO
INFO
NDOA
LLA
TORR
E'DI
ETRO
AME
CISO
NOLE
SCAL
E,E
DAVA
NTI
"10
3~0
DATA
"HO
UNEN
ORME
,li<
1036
0DA
TA2~
."SO
NOEN
TRAT
ONE
LLA
DI
••10
370
DATA
"CAN
TARE
NEL
MOME
NTO
INCU
IHO
APER
TOLA
GAB8
IA.D
AVAN
TIA
MEHO
ILPA
PPA
GALL
O".O
'-1
03S0
DATA
26,"
SONO
INCA
NTIN
A'CI
"10
390
DATA
"ASU
DVED
OLE
SCAL
E,E
A10
400
bATA
27,"
SONO
SULL
ATO
RRE;
TRA
ZONA
"10
40~
DATA
"CIR
COST
ANTE
,ANC
HESE
LATO
RRE
NON
E'LE
SCAL
E",l
I<10
410
DATA
1S,"
SONO
ENTR
ATO
INUN
AST
ANZA
BUIA
'NO
NVE
DONI
ENTE
,••
1042
13DA
TA"H
OPE
RSO
L'OR
IEN
TAME
NTO
'AIU
TO!"
.li
<10
430
DATA
2S."
ECCO
,ORA
DIST
INGU
OPE
RFET
TAME
NTE
QUES
TAST
ANZA
'E'
PIEN
ADI
PIET
RE"
1044
0DA
TA"P
ERTE
RRA
••.
AOeS
TE
ANO
RDVE
DODU
EPOR
TE..
.•I9
N,26
E.lI
<10
4~e
DATA
19."
ECCO
LACA
NTIN
AVE
RAE
PROP
RIA'
VISO
NOLU
NGHI
SCAF
FALI
..10
460
DATA
"VUO
Ti;
ASU
DVE
DOLA
PORT
A.E
VERS
OOV
EST
VEDO
UNAR
MADI
O·.I
SS.
li<
1047
13DA
TA21
,"ST
OPE
RCOR
REND
OUN
OST
RETT
OCO
RRID
OIO'
NON
VIE'
BUIO
QUA
DENT
ROPO
ICHE
'•
1048
13DA
TA·L
ALU
CEVI
ENE
DASU
D".2
2S,0
'11
3491
3DAT
A22,
"SON
OIN
UNCO
RRID
OIO
UMID
ISSI
MO'
QUES
TOA
SUD.
•10
~0e
DATA
"DOV
EVE
DOUN
ALU
CEPI
Ll'
INTE
NpA"
.23S
,21N
,lI<
.le
~10
DATA
23,"
SONO
INFO
NDO
ADUN
POZZ
O••
.'
L'AC
QUA
MIAR
RIVA
ALLE
GINO
CCHI
A.E
ANO
RD..
1~20
DATA
·C'E
·UN
PIC-
COLO
PASS
AGGI
O'".
22N.
lI<
1~30
DATA
24.
"SON
OAC
CANT
OAL
POZZ
ODE
LL'A
CQUA
.IN
MEZZ
OAL
80SC
O;CI
SONO
DUE
•1~
4~DA
TA·
SENT
IERI
CHE
PASS
ANO
TRA
GLI
AL8E
RIE
VANN
OANO
RDE
ADES
T.·.
IE.
li<
10~~
~DA
TA7,
"SON
ONE
LLO
STUD
IO;
LALU
CECH
EEN
TRA
DALL
AFI
NEST
RARI
SCHI
ARA
UNAE
NORM
ESC
R"10
560
DATA
·IVA
NIA
DI.·
.60.
lI<
...•. ~
oP)c
n~Fg
.~::s
e:9:
~~'
8'9
.~~
8.~~
g•.•
I»I»
P.I»
_.
(") 9
~ () 3 o' o Cl o 3 -o c ~ ::J .l>- o O) -g. ro <D (Xl c.n
Z3
ft~
~3
IV~
:g.
~9:
l!9.
a·g.::
s~
nI§
~::s
ri~
~.c
;;;::~
~g
g::s
E.g.
a-g.
'g~:
:I.
~g.
~::;>
~=0
-:el
~C
i"~:::
oI:
lI»
::rI»
>8
::r2.
<Il:=
O"j
;it:)
§<I
l&i'
2.;:;
"CI]
g::I
ZeO
Qo
p.
5.CI
>~
::s_.
_.o
::t.C
I>o
=:=~o
..•'O
~"t
l'O::s
~~
t"'"o
!:!1"c:
l.-
?5"
j;3;:;
'~I»
o9:
o::I
gI»
O"o
<Il~
'I»
::sc
OQ
2.•
.•~
<IlC
••::I
oo
=-:R
I»::s
ftN
C9.
!!l.~
39~
I»o
I»•.•
<IlC
ftI»
_.I»
~H
Clg
o3
I»~.
9.if
~~
0::1[g:~
~o'
l;g
~::t
.~~
1»3~
<Il~~!
g'O
a-~-9
~9:
a·~,3
~'O
Z<I
l<!::l
:::;.:
:;>~
~~
'§aI
»N::s"'3
SoI»
j;io>
e:I»
§~Il
;jo.
;:;"•.•'O
o-I»
<Il-
•.•I»
-::s
CI>
I:l
I»•.•
n~
-:l'
''«'
lIO
Q"
-("
).-
nO
c'o'
"I»
O-i
-i_.("
).-
-•.
•••i"_
.::s
O-~
::rI»
~3
~j;i
n,::I
.~~
;:;"o
·O
~~
S'~:
::t.
n•.•
~~
~::q
~O
IVÒ
.:s.o-
~g
~("
)l;~
»»
~2.
~a...
.<I»
>-l~
~.c
~.g
o_.
oI»
<C
o-
8.'~
o::I
.l!9.
g.=
6p.
<9:
~.~
::t.j;
ig:
S_.
n-.
l1»
3I».g
~5.
OI»
~:"
I»I»
nO
::sE.
g.>
~!"
'OC
'O_.
::s-:
:si?
g.n
;>~
::s_.
I»~
~g
n~
O:;;
.g;i:
:l.g.
CO-
n8.
1»,
O8
Ci"
::S~
!!l.>
3li
,i:l~
;:;-::1
.g.
g~
;.;O
::I.•
~O
~~~
~'§~~
r[~~~.
g.~
~gi
~~~
~~j;.
8g-~
~·fg
·s~-g~
~~~g
~f~g
.~~~e
j:~i~
·~~
g~~
~ri
0.00g
'O,n
~.~'
''gI»
::r[
;.3 0
9.~32
CI>
I»C
i"g
ag'g
~ii>
~0-
-9':
~wl
i-;.,-
,,;~!!.
~l;3
~g:
~~r
~:.
eo'
2.C
i"~
_.j;3
_.p.
•.•o
I»I»
,::I
--'
Qn
O"
O_
.•.•
_.-
I»••
•..•
--
nOQ
--
••••
-••
-...
9:•.•
c_.
n~
e.o
O:iC
i;;:
8e:
~~
5";.-0
!i6·
~~
_.~
~~
t:gii
rR~
~[~
~~
~eD
~~~
.~
5~
~:5
~~~.
~~
g:~
o;;;
.g<;
;'::1
.08
33~
'g
3'O
o::t
.2.3
!!l.
go
~&i
'5'~p
.~
gn'
::I.!
!l.I»
lS::;
9a.
~~
C~
Èf;l'=
~O"§
1»-(:
l'.:s.
~5
~a.~
lie:
§~.g
~::s
ga;
s'n-
g.o
s'Efs
'n3
2.~
~~
~g-
~~9:
~("
)'g::!!
.p.eS
'o[5
1"("
)!::l
.-g
el~
li2.
ZS'
::SS
~I»
ri5
'ft~
o03
ft~
iir9:
3n
-g'g
~S'
ii>tl
ID9
p.
Oli
CI>
.:s.g3
'~c
liO
8"n
~-g
lig
~~.
.::I
nI»
I».,.
..1»
'•.•
3::t
IDCI
>ID
n::s
::sp.
I»-
(")n
n•.•
.OCD
Oc.
..("
)(")
I»_
I»-
::I::s
Z•.•
O'O
~!!
l.-
O-O
;:;"(
").•.•
::I.(
")::s
~-
~g
8c
OID
n::r
~::S
~_
,40
::;>:
:sn
::rO
::sn
3li
(")
OO
•.•O
:::I..
.I»
3I»
'OO
OO
O<
~n'
l»p.
n(;
)_.
p.
3<
=.0
~n
_.n
O::s
•0_
l»I»
P.n
•.•p.~
nO
,::s
E.":
:;~~
Ci"
'O::S
9:~
gp.'g
3<;;
'lSj;3
::t.~
~O
!!l.
Sin
gID
[ID
l;O-
Ci"
::sc
~-
!!l.
(")
~S'
a·On
Sa·3
3<
3•.•
•.•-
I»O
(")..
.ID
...•.•
n::I
CI]
n..•
..•CI
>-
i:lO
Q'
:::p.
3N
P.O
n0.
'0<:
:sO
CI»
Il»1!
'n~
O1»
3S·
::t.
~9:
g:g
I»("
)2.!"
'OC
i"~3
<'c:
:!ID
OE.
j;iID
nC
"tll
»n
n•.•
~I»
9:<
o'O
1!'!!.
p.
;:;'8.
•.•::s
On
(")•
.••.•
OQC
•••__
•OQ
_.n"
-::s
_.O
n-
l»_
•.•::l
I»I»
::S'"
-n
I»p)
eD•
Ie:
.n
c»p)
n('D
..O
•_.
O•
c..•
::3..
Iti:'
()..o
eD.•~
s»•
::ss»
•""1
sn_
o.s»
If
••I
neD
_I
O
I»òo
~3lS
Q3(
JQ•.•
\OI»
-(,)
I»O
"---
::SCI
>8.'
9.:-:
.Zg-
_._.
!!.
:'g(J
Q=-:
o·_.
CI>
o"'c
(")
I»CI
>o
~I»
...•
n·~
'O_.
o::s
1!l.3
O"
I»_.
::sCi
"n'
s::•••
CI>
I»I»
P.
~::;"
_.~
CI>
•••n
I»(J
Q C n g.
STAMPANTI Epson.una scelta prestigiosa, senza compromessi
Le migliori prestazioni da stampanti,semplici, versatili, silenziose e velocicon 100 caratteri al secondo. 128 tipi dicaratteri selezionabili e 11 set interna-zionali. 80 o 132colonne. 6 diverse posi-bilità grafiche. Tutti i tipi di carta, modu-lo continuo, foglio singolo. Inseritori au-tomatici di fogli singoli.
RX-BOI RX-l00
Scegliere unastampante è facile?
C'è una sola regola, pretenderesempre il massimo delle prestazioni,senza compromessi: materiali e compo-nenti di prima qualità, disegno elegan-te, grande affidabilità, robustezza, faci-lità e flessibilità d'impiego, prezzo ade-guato e la garanzia di un grande costrut-tore leader mondiale.
Così, con Epson, la scelta è facile esicura.Epson il più grande costruttore al mon-do di stampanti vi offre una gamma diprodotti prestigiosi che soddisfano ognivostra necessità. Epson, una soluzioneraffinata, in esclusiva per il vostro com-puter.
Epson dunque, senza compromessi.
FX-BOIndispensabile nelle applicazioni in
cui la versatilità e la qualità di stampasono un imperativo.
Possibilità di creare qualsiasi carat-tere su una matrice di llx9 punti. Memo-ria RAM da 4 Kbyte. 256 tipi di caratteridefinibili dall'utente. 136tipi di caratteria corredo. Alta velocità di stampa a 160caratteri al secondo su 80 colonne. Ben9 modi di stampa grafica punto a puntoselezionabili sulla stessa riga contem-poraneamente.Inseritori autç>maticidi fogli singoli a sin-gola e doppia vaschetta.
FX-l00Con 132 colonne e 160ca-
ratteri al secondo, la FX-looè la stampante ideale perdata processing e tabula-ti, specialmente in uffi-cio grazie anche allapossibilità di accettarefogli singoli e modulicontinui di qualsiasiformato. La matrice di puti llx9 consente prestaziofiche e la formazione di una grsima varietà di tipi di carattere, fin256, definibili anche dall'utente e me-morizzati nei 3 kbyte di RAMinterna. LaFX-loo non teme la fatica: la testina distampa è garantita per oltre 100 milionidi caratteri ed è facilmente sostituibile.Inseritori automatici di fogli singoli.
EPSON EPSON COIlPOIlATIONHEAD OFflCE:80 Hirooka. StHOJlrI.stll. N.q_no.399·07 JAPAN
EPSON, computer e periferiche seg.- SERVIZIsono prodotti distribuiti, CENERAUPER
assistiti e garantiti L:N=arIIATJCAda SEGI S.p.A .. Milano Via Timavo. 12 - ,----