(147)? "****************************************"p "* *" "* CAYONS OF ZELAZ *" "* *"  "* *"4  "* *"e  "* WRITTEN BY ERIK MOLDEN *"  "* *"  "* *"  "* *")  "****************************************"e <OF54272:500:900:TI$"000000":FF16:Y71: V1,Y:400 a********************************** b* MAIN PROGRAM LOOP * c********************************** dCS0:CP0: V31,0:J(56320), i(J16)(FU1)C19: AD,0: WA,0: 150k k54296,15:AD,88:SR,240:WA,129:FUFU3.5:C15.5:2040,14 nJ8X1X1.25:FUFU.5 pJ4X1X1.25:FUFU.5 qJ1FUFU1.75:C132 55296,2:55326,2:C264C1:V2V1.4.2C2:A2A2.1(V1V1):V1V2! CP(V31)1:CP0CR0J Y(222(A2D)):XXX1:Y55X1X12c X1X254Y45300 53279,0:V,X:V1,Y:(53279)1CRCR1:CR1CS1 H$P$P$P$(17)32)TI$:P$33)((FU))" " P$33)((A2))" ":TP$32)"V:"((V2))""# HV$(X13)" ":32)"H:"(HV$,5)> FF(V30)30:FF400Z (Y222V210)CS300~ 55296,7:55326,7:2040,15:100 ) ******************************** * * MISSION REPORT ROUTINE * + ********************************+,NH,2:NL,179:54296,15:AD,88:SR,240:WA,129:CK1@02040,11:V28,1i1380:V29,31:380:V23,1:380:3906AD,00:SR,00:WA,00;392:H$P$:32)"CRASHED"=V29,30:V23,0:V21,30:V28,30: 370^392: H$P$: 32)"ABORTED": 370h392:FCFC3:FC4FC4)j H$P$: 32)" "]k H$P$: 32)MR$(FC);73)"FLIGHT":J14000: JvrJ(56320):J16370sJ2 V21,0:: (147):w395:900:584:FF(V30):FF0:TI$"000000":|J125:Z(60(1))1: 705Z,J: : J704766:J,00: :8 H$: 32)R$"MISSION"72)R$"REPORT:":b H$P$: 32)" "72)" ":********************************** LANDER SPRITE/PAD ROUTINE ** COLLISION HANDELER ROUTINE **********************************V210(X1)1.5 3002FF16X210 300e H$P$: 32)"LANDED ": 2040,15: AD,0: WA,0~FF16495:Q1360FF16FUFU200YY1: V1,YCK H$P$: 32)"STANDBY":CK0J14:FF2J(V39J)5FUFU300: V39J,2:FCFC1 (V43),5< J:I11500: : H$P$P$: 34)FCm H$P$P$P$;(17)32)TI$P$: 33)((FU))" " P$33)((A2))" ": P$32)"V:"((V2))" "HV$(XI3)" ": 32)"H:"(HV$,5)(56320)2350(56320)16465V15:C12:X10:FF(V30):FF0:A2A24; H$P$: 32)"ACTIVE!":k((V40)5)((V41)5)((V42)5)Q1q********************************** SET UP SPRITE DATA AND SCREEN **********************************I1315:J062:A:(I64)J,A: J: IWMR$(4):MR$(1)"GREAT":MR$(2)"GOOD":MR$(3)"FAIR":MR$(4)"POOR"(147):53281,11:53280,12:J5529656295:J,I: JJ1055202340:J,160:JOF,4:J8,160:J8OF,4 :JJ10551062:J,160:JOF,4:J960,160:J960OF,4 :J=J12491252:J,160::J12891292:J,160::1288,95dJ1064198440:J,160:J30,160:1105,223:1145,105:1225,223:J1265124540:J,160:1024,81:1024OF,2:1054,81:1054OF,21105,223:1145,105:1225,223:J1265142540:J,160:F1465,105:1745,233:1785,160:1825,105:1905,223 ^ 1945,160:1946,223x J19842013:J,160:1093,233:J1133129340:J,160::1333,95:1413,233 J1453189340:J,160::1933,95:1973,2331172,2231352,223:1353,223:1391,223:1394,105TJ1392155240:J,160::J1393195340:J,160:s1431,95:1592,95:1672,951752,233:1792,160:1832,160:1872,95:1791,233:1831,951471,233:1511,160:1551,95:1510,223!1434,223:1474,160:1514,105:1554,223:1594,160B#1595,223:J1634195440:J,160:J1,160:x%1716,223:1717,223:1757,105:1797,223:1837,105&1876,105:1916,223:1956,105:J1756183640:J,160:*1442,223:1443,223:1444,223:1445,223:485,105,1481,95:X1482160240:X,160:4.J1483196340:J,160:J1,160:j0J1525196540:J,160::J1526160640:J,160:5J1766196640:J,160::1646,105:1726,22371486,233:1567,105:1807,223:1967,233:1968,233:1451,95:1452,160:1651,233:1691,95+=1492,233:J1492181240:J,160::1852,95g?1521,233:1561,95:1642,95:1723,95:1763,32:1803,233A1842,233:1882,95:1922,233HP$(17)(17)(17):H$(19):R$(18)IH$;(5 ):32)R$"MISSION"72)R$"STATUS:"KH$P$P$;(17):32)R$" TIME: ":P$32)R$" FUEL: "P$BO32)R$" ALT: "P$:32)R$" VEL: "]TH$P$P$32)R$"REFUELS"cU********************************** DEFINE AND ENABLE SPRITES ** 1 THRU 5 AND GAME VARIABLES **********************************=V53248:X219:Y70:D3:CR0:V31,0:FU0:A2456:V10:X10uV21,31:2040,15:V,X:V1,Y:V27,1:CK1:Q0:V202041,13:2042,13:2043,13:2044,13V2,48:V3,242:V4,124:V5,242:V6,215:V7,242V8,210:V9,90V39,15:V40,5:V41,5:V42,5:V43,25V29,30:V37,7:V38,2|J5427254296:J,0::WA54276:AD54277:SR54278:NL54272:NH54273NL,216:NH,12:FC0********************************** DATA FOR SPRITE DATA BLOCK ** 13, 14, AND 15 *6*********************************255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255,255255,255,255,255,255,255,2550,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,040,0,0,0,0,0,32,254,24,35,255,160,31,255,216,15,255,192,31,255,192~63,255,248,127,255,252,127,255,252,127,255,248,63,255,240,15,255,24019,255,152,38,56,68,120,124,62,64,254,2,64,210,2,64,169,265,85,2,194,51,131,0,0,0 0,0,0,32,254,24,35,255,160,31,255,216,15,255,192,31,255,192f 63,255,248,127,255,252,127,255,252,127,255,248,63,255,240,15,255,240 19,255,152,38,56,68,120,124,62,64,254,2,64,0,2,64,0,2 64,0,2,192,0,3,0,0,0