Julian EP,
I'm afraid that's not possible; major sections are still missing from the source. However, I have taken the time to try to clean it up a bit, so am positing what I have now.
A few comments for Jacava;
1. First, there is little point to using more than one RANDOMIZE during the course of a game, as the random number generator will run quite well by itself. It is usual to randomize it at first and then let it run, rather than re-seeding it over and over.
2. This may be a matter of style but I prefer the IF...ENDIF structure, using the IF...THEN only for short, simple statements. The reason I mention this particularly is because in your monster selection routines you have exceeded the possible line length, meaning the last values to be set epoisonimmunity$="1" for example, followed by the : goto last_chance, appeared on the next line beneath the IF...THEN. According to my understanding of the flow of BASIC, this means that your first selection will be your only selection, because the rest of the IFs are not processed. See the code I'm posting for an example.
3. In your input loops you have made a call to the subroutine "bad_choice" but have not allowed that this may be the input, meaning that after calling the bad_choice the code falls through to your first option beneath the input selection. In the code I'm posting I'm including the proper style to correct this error, using the label of "loop1." You need to do this for most of your input choices.
4. The sections of Use_skill, use_special, monster_turn, and vicotry, are all missing, which again, "fall into" other parts of the code. Labels are good but you must remember to get out of each sub-loop, which might explain your confusion at trying to test this. (I know it confused me when I tried to battle a Monkey and wound up in the shop trying to buy something!) I have tried to catch a few of these places, but can't promise I've caught them all.
Over all, it looks good... just needs more work.
Good Luck!
S.
Any truly great code should be indisguishable from magic.