#AutoCommand() fontsize(30) ************************************ done! = 0 while ( done! == 0 ) { Clear Bitmap("FuseShop.jpg") #Text(3,4.5, "Copper Hammer") #Text(3,6, "Iron Hammer") #Text(3,7.5, "Steel Hammer") #Text(3,9, "Silver Arrow") #Text(3,10.5, "Gold Arrow") #Text(3,12, "Tribal Sword") #Text(5, 14.5, "1") #Text(7.5, 14.5, "2") cMap! = CreateCursorMap() CursorMapAdd( 55, 117, cMap! ) CursorMapAdd( 55, 163, cMap! ) CursorMapAdd( 55, 209, cMap! ) CursorMapAdd( 55, 254, cMap! ) CursorMapAdd( 55, 300, cMap! ) CursorMapAdd( 55, 345, cMap! ) CursorMapAdd( 66, 424, cMap! ) CursorMapAdd( 265, 424, cMap! ) CursorMapAdd( 430, 400, cMap! ) res! = CursorMapRun( cMap! ) KillCursorMap( cMap! ) if ( res! == 0 ) { item! = 1 run("MakeItem.prg") } if ( res! == 1 ) { item! = 2 run("MakeItem.prg") } if ( res! == 2 ) { item! = 3 run("MakeItem.prg") } if ( res! == 3 ) { item! = 4 run("MakeItem.prg") } if ( res! == 4 ) { item! = 5 run("MakeItem.prg") } if ( res! == 5 ) { item! = 6 run("MakeItem.prg") } if ( res! == 6 ) { } if ( res! == 7 ) { Run("Fuse2.prg") } if ( res! == 8 ) { done! = 1 end } } end