TMANDO.2 - A simple text fighting game. Has room for some improvement, too. Requires no extra files. TMANDO.2 = 1,092 Bytes. PRGM1:TMANDO.2 :0->V :0->W :1->S :0->T :47->G :99->H :2->X :2->M :Lbl Y :ClrHome :If T>20 :Goto E :Disp "1 FIGHT" :Disp "2 INFO" :Disp "3 DOCTOR" :Disp "4 REST" :Disp "5 WIZARD" :Input Z :If Z=0 :Goto E :If Z=5 :Goto 5 :If Z=4 :Goto 4 :If Z=3 :Goto 3 :If Z=2 :Goto 2 :M+1->M :M2->K :T+1->T :Lbl F :ClrHome :If K<0 :Goto K :If H<0 :Goto D :Disp "YOU" :Disp H :Disp "MONSTER" :Disp K :Disp "1 FIGHT 2 SPELL3 RUN" :Input I :If I=2 :Goto T :If I=3 :Goto Y :Int 2Rand->R :Int XRand+1->N :If R=0 :Int 2XRand->N :Int XRand->D :Int 2Rand->R :Int MRand+1->P :If R=1 :Int 2MRand->P :Int MRand->Q :N-Q->N :If N<0 :0->N :K-N->K :P-D->D :If D<0 :0->D :H-D->H :Goto F :Lbl T :ClrHome :Disp "1,-1" :Disp "2=KILL" :Disp "3=DAY" :Input I :If I=0 :Goto F :If I=2 :Goto 8 :If I=3 :Goto P :If S<1 :Goto F :If I<0 :K-50->K :If I>0 :H+50->H :S-1->S :Goto F :Lbl P :If V<1 :Goto F :V-1->V :T-2->T :Goto F :Lbl 8 :If W<1 :Goto F :W-1->W :-1->K :Goto F :Lbl K :Disp "U WIN, U GET" :Int 10MRand->N :Disp "GOLD=" :Disp N :N+G->G :Disp "EXPERIENCE" :Int 2Rand+1->R :Disp R :R+X->X :Int 20Rand->R :Pause :H+10->H :If R>2 :Goto Y :Disp "U MAGICALLY GET" :If R<2 :Goto X :Disp "3 +50 SPELLS" :S+1->S :Pause :Goto Y :Lbl X :Disp "+4 DAYS" :T-4->T :Pause :Goto Y :Lbl 5 :ClrHome :Disp "1 +-50" :Disp "2 KILL" :Disp "3 DAY" :Input I :If I=1 :Goto I :If G<200 :Goto Y :G-200->G :If I=3 :Goto R :W+1->W :Goto 9 :Lbl R :V+1->V :Goto 9 :Lbl I :If G<50 :Goto Y :S+1->S :G-50->G :Lbl 9 :Disp "+1 SPELL" :Pause :Goto Y :Lbl 2 :ClrHOme :Disp "GOLD=" :Disp G :Disp "HEALTH" :Disp H :Disp "DAY" :Disp T :Pause :ClrHome :Disp "EXPERIENCE" :Disp X :Disp "SPELLS" :Disp S :Disp W :Disp V :Pause :ClrHome :Disp "PTS." :50X+2G+5T->P :Disp P :Pause :Goto Y :Lbl 3 :ClrHome :Disp "GOLD=" :Disp G :Disp "HOW MUCH" :Input I :If I>G :Goto 3 :If I<0 :Goto 3 :G-I->G :Int IRand+H+I->H :Goto Y :Lbl 4 :T+2->T :H+E2->H :ClrHome :Disp "RESTING" :Pause :Goto Y :Lbl E :Disp "UR OLD" :Disp D :Disp "U DIED" :Disp "POINTS=" :50X+2G+5T->P :Disp P