Oberty

USR(3494):POKE A,121:GOTO 12
IF A=4 THEN K-121:GOTO 12
IF A WC "" THEN ter 4 2 1 tGOT0 1 2
IFA S "D" TH E N V - - = Gt OOT0 1 2
IFA 4 1 WIH EN V.:IF:GOT0 1 2
IFAWE"THEN-57:001012
IFA 4 h2 " TH EN K 3 7 tGOTO1 2
IFA W X " T H E N Y E : G 0 1 0 1 2
ON H 6 0 1 0 2 1 , 2 1 , 5 0 , 3 0 4 4 6 f 4 6
USR(3494):POKE A,LA W
PEEK(A+40):L=PEEK(A)fi f(L=215)-1-(6=t221)1140459
IF(Me>457)*(14<)208)TH E N 6 7
IFW:67THEN17
USR(3494):POKE A,B:GOTO l i
SC=5C-4-1:POK EA 4-40,2081POK EW-39,216:POVEA 4-41,21-5