P ---------------------------- UFO /VZ 8530.01Vw VARIABILI E FLAGS} DA = 1: UFO DANNEGGIATO DI = 1: UFO DISTRUTTO X,Y = COORDINATE UFO (BR)  X1,Y1 = COORD. UFO PRECED. (BR)+ MX,MY = COORDINATE MISSILIm# OB = COORD.ORIZZ. OBIETTIVO RAGGIO UFO( VO = 1: SPOST. UFO VERSO DX -1: " " " SN - VV = 1: " " " BASSO -1: " " " ALTO62 =================================51 :S4 TABELLA COLORIY5:7 0: 14 AZZURRO 1: 1 NERO 2: 6 VERDE 3: 3 ROSSO9 4: 9 ARANCIOd ================================n ----------------- VIDEO PICTUREo:Oq 0,1: 1,2: 4,7,6: 1,1: ,12,5,"NUCLEAR DEFENSE"s ,160,130,30,,,,,120: 160,130: I0 359 120: 30;Iu 160,130: : ,14,20, "SVS SOFTWARE": I1 1000: x 0,14,5: 1,1: 2,6,4 : 3,3,6: 4,9,3 3,1I 2,0,150 30,130: 2 50 ,137: 2 90,120 2 110,140: 2 140,150 : 2 199,170: 2,158,158 4: 1,750,5: PU0: 1,1 ,24,"PUNTI: " 3,12,17,"": 1,12,16,"(" : ,25,16,"": ,8,16,"" PUNTI0:9 ------------------------- START?:WU$"ұ": U1$" "1VO(3(1)1)2: VO0 3052VV(3(1)1)2: VV0 3066X(37(1)): Y(10(1)2) : DISTR0: DANN0I:2J ------------------ LOOP CENTRALE .MT 1,X,Y,U$: X1X: Y1Y^ M$: M$"" 400 : M$"4" M$"0" 400e (M$)1 8500,8510,8520, 8530,8540: DISTR1 240XXVO: X37 X0 VOVO: 400YYVV: Y11 Y2 VVVV: 405; (15(1))5 8000T 1,X1,Y1,U1$: 340ZWX ------------- CENTRALE COLPITAYb 3,12,17," ",1: 1: 3 ,0,0: 3,50,3000l V1 7: T1 250: : V: : 3,12,17,""4q 3,0,0: V7 0 1: V: 3,600,5: 3,3,7V: }v 3,12,17," ": 3,12,16,"": 3,12,16," ": 3,11,15,"' : '" 3,11,15," ": 3,11,14, " ''": 3,11,14," " ,10,1,"ALTRA PARTITA (S/N)?": A$: A$"S" 7100 A$"N" 9010: 7050` I0 12: ,0,I," ": j 170p?@ -------------------- RAGGIO UFO .D 3: 1,970,10: OB(17 (1))44,J 3,X46,Y88 OB,137: 0,X46,Y88 OB,137_O OB51 OB53 : 5: 3,400,0vQ 3,400,15: 7000T DANN1 : 2: 3,900,1000: 3!4! -------------- PARAMETRI LANCIO .>!H!MX9: MY15: 8600/R!MX26: MY14: 86005\!;!! ---------------- LANCIO MISSILE .! MYMY 0 2! 3,MX,MY,"!": MXX2 MXX 8680: MYY1 8680! ! ----------------- BOOM PICTUREJ! I1 3: 3,X,Y,U$: 3 ,X,Y,U$,1: J1 20: J,Iy! 3,X,Y," * ": ((1)41 )4 8800! ,X,Y,U1$: ,X1,Y1,"": ,X1,Y1,"": ,X1,Y,""! ,X3,Y,"": ,X1,Y1," ": ,X1,Y1," ": ,X1,Y,""! ,X3,Y," "S! ,X1,Y2,"'": ,X2,Y,".": ,X1,Y2,".": ,X4,Y,"."! ,X1,Y2," ": ,X2,Y,"": ,X1,Y2,"": ,X4,Y," "! ,MX,MY,"": 8700: MY0: DISTR1: 8690! 3,MX,MY," "!: DISTR0 8695: PUPU2: 1,8,24,(PU)" ": Q! DANN1 PUNTIPUNTI1: PUNTIPUNTI2k! 1,8,24,(PU)" ": q!! ------------------ BOOM SOUND .! 3,0,0: V8 0 1: V: 3,400,5: : _""`" --------------- UFO DANNEGGIATO(a"<e" DANN1 8640j"DANN1: U1$" ": 2: 3, 900,4000: ,MX,MY,"": MY0o" ,X,Y,U1$: 8690(# A$2# 0<#