SET,6,26
LEVEL,1,2
TILEPUT,36,4,18
ENDLEVEL
SET,6,27
MAPWARP,"TOWN.MAP",29,1,23,1
SET,36,4
MSGBOX,"YOU SEE A SWORD STUCK IN A ROCK!"
MSGBOX,"DO YOU WANT TO PULL IT OUT?"
OPTIONMENU
IFOPTIONYES
TILEPUT,38,4,17
MSGBOX,"*I am the keeper of this sword"
MSGBOX," This sword was given against evil"
MSGBOX," Only a hero of good,"
MSGBOX," Shall be able to inquire..."
MSGBOX," This sword of power..."
MSGBOX,"*Many have come to taketh it"
MSGBOX," But they fail the test I giveth"
MSGBOX," You wanteth the swordeth"
MSGBOX,"*Then bringeth it on, baby"
BATTLEGUY,"WOOD.SCE",2,1,1
WEAPONCHANGE,1,1,2
WEAPONCHANGE,1,3,100
LEVELPUT,1,3
TILEPUT,36,4,19
TILEPUT,38,4,1
ENDOPTION

