$ ***************************G * MINER *j * BY SEAN CASZATT * * DESIGNED AUGUST,1984 * *REVISED & D-BUGGED 1987 * *************************** **THIS IS A PUBLIC DOMAIN GAME**!  **IT'S YOURS TO DO WITH AS YOU**H *PLEASE AS LONG AS I GET CREDIT*o "":53281,5:53280,5:646,0:SC0 "MINER!" "BY" "SEAN CASZATT" "YOU'RE TO MINE AS MUCH GOLD AS POSSIBLE."0 #"YOU'VE GOT 15 CHARGES OF DYNAMITE."\ ("BE CAREFUL OF CAVE-INS AND SPRINGS!" )"IF YOU RUN OUT OF CHARGES, YOU HAVE 10" *"SECONDS TO GET OUT OF THE MINE." -"PRESS FIRE TO BEGIN" 2FR(56321)16 7FR050 <"":53281,9:S542721 ASL1024:PL1084:CH15< F50000l KCH0"GOLD= $";SC,"OUT OF CHARGES!":80 L" " M"GOLD= $";SC,"CHARGES=";CH PPL,90:PLS,3 Q1082,45:1083,62:1085,60:1086,45:T1082S1086S:T,3 R1 UJV(56321):FRJV16C VJV15(JV15)` W(1084)90FR0FR999{ ZJV1PLPL40:DPL40 _JV4PLPL1:DPL1 dJV8PLPL1:DPL1 iJV2PLPL40:DPL40 nJV0PLPL:DPL o(PL)45PLD sFR0CH0117 tFR040000:60000: u(PL)81SCSC10:60025r v(PL)102(PL)160(PL)4(PL)60(PL)62PLD wPL1084PL1943PLPLD xAS0CH0TI$"000000":AS400 yCH0TI$"000010""":DE2:61000 zCH0(1084)90VI1:61000{D075!|PL,90:PLS,3:D,32)~75I@DW102:(PL40)102DW32iEUP102:(PL40)102UP32JLF102:(PL1)102LF32KRG102:(PL1)102RG32OPL40,DW:PL40,UP:PL1,RG:PL1,LFTOÀPÁT11041983:T,160:TS,12:UÁT11041983:G((1)5)16ZËG3T,81:TS,7:B_ËG3fdÁT1104194440:T,102:TS,1:iÁT19441983:T,102:TS,1:nÁT11041143:T,102:TS,1:sÁT1143194340:T,102:TS,1:t×1123,32:1124,32:1125,32uÁT1124152440:T,32: xÎ*`S54272:ESS28:E,0:Qe54296, 15 :54277, 31 :54278, 17xj54276, 129 : 54273, 5 :54272,15oT1503:54296,T:X1100:X,TpCHCH1:CA((1)4)1qCA1T13:V((1)600)1104rCA1(V)102(V)81600174sCA1(V)90V,42:VS,8:VS,2:VS,8:61000OtCA1V,160:VS,11:zvCA2TPL1942:(T)32T,0:TS,14wCA2xyS54272:ESS28:E,0:z54296, 15 :54277, 31 :54278, 241~54276, 17 : 54273, 63 :54272, 75T1 100 ::54276, 16*ESS28:E,0:0oHVI1A$"YOU MADE IT OUT IN TIME":61020IDE2A$"YOU DIDN'T GET OUT IN TIME!"JS54272:ESS28:E,0:M54296, 15 :54277, 31 :54278, 255R54276, 129 : 54273, 10 :54272, 71@WT1 300 ::54276, 128:T1 100 :yZDE0"YOU WERE KILLED IN A CAVE-IN!"[DE0DE2"YOU LOST ALL YOUR GOLD!":SC0\A$^"GAME OVER!"_T1501:54296,T:a"YOUR FINAL SCORE WAS $";SCTbSCHSHSSC:"NEW HIGH SCORE! --> ";HSf"PRESS FIRE TO PLAY AGAIN"k198,0:198,1p10