dJOTTO n 1100L x 2900T "ENTER A SECRET WORD " :2200 A$=K$ L=(A$):1200 "X=0:Y=6:1700 "TRY ";(L);"-LETTER WORDS " T=0 S=0 K$=A$ P=1 L 2600( V$(P)=P$ P RX=0:Y=8:1700:" ":1700:2200 (K$)L 260  T=T+1 "#X=0:Y=10 :1700 ," ";K$ 6X=0:Y=12 @ 1700 JK$=A$ 460 LP=1 L N 2600( PP$=V$(P) S=S+1 RP TP=1 L ^ 2600( hN=1 L rP$V$(N) 410 | S=S+1  V$(N)="*" N=L N P "SCORE ";(S);" " ::  200 1200:"CORRECT " :"YOU TOOK ";(T);" TURNS "  SPECTRUM SUBROUTINES L1W=32 :D=22:F=8:1200: :8,0;: R=(N*+1): xZ=1 200*T:Z: ""1500 =""1510 G$=: @K$=:  Y,X;:  (X);: l(11 );: (9 );: 42200:K=("0"+K$): K$="" !1500:(G$)=13 : ,(G$)12 K$=K$+G$:G$;:2210 (K$)=0 2210 @(8);" ";(8);:K$=K$( ̱(K$)-1):2210 : `.1}L,Z/10 -6: R$=(R+64@): ( P$=K$(P): 2600( :A=(P$): : TV$(26): W$(60<,26):  GG=(G$):