nameTable = { }; lastname = ""; counter = 1; print("\n Eggman1414's Mana Stone Production Script\n") print("What chracter do you want to start with?\n") local inc = math.ceil(#nameTable/4) for i = 1, inc do local val1 = nameTable[i] local val2 = nameTable[i + inc] local val3 = nameTable[i + inc*2] local val4 = nameTable[i + inc*3] if( not val1 ) then val1 = "" else val1 = i .. ": " .. val1 end if( not val2 ) then val2 = "" else val2 = i+inc .. ": " .. val2 end if( not val3 ) then val3 = "" else val3 = i+inc*2 .. ": " .. val3 end if( not val4 ) then val4 = "" else val4 = i+inc*3 .. ": " .. val4 end printf("[%s]\t[%s]\t[%s]\t[%s]\n",val1, val2, val3, val4) end counter = io.stdin:read(); counter = tonumber(counter); print("Did the Client Crash?") print("1. Yes 2. No") crash = io.stdin:read(); crash = tonumber(crash); while crash == 1 do print("Did it crash in Sarlo or Wailing Fjord?") print("1. Sarlo 2. Wailing Fjord") locationcrash = io.stdin:read(); locationcrash = tonumber(locationcrash); print("Did the client crash while going to the mailbox?") print("1. Yes 2. No") mailcrash = io.stdin:read(); mailcrash = tonumber(mailcrash); if mailcrash == 1 then break end print("Did the client crash while going to the shop?") print("1. Yes 2. No") shopcrash = io.stdin:read(); shopcrash = tonumber(shopcrash); if shopcrash == 1 then break end print("Did the client crash while sending mail?") print("1. Yes 2. No") sendcrash = io.stdin:read(); sendcrash = tonumber(sendcrash); if sendcrash == 1 then break end end if locationcrash == 1 then if mailcrash == 1 then start_range = __WPL:findWaypointTag("Start1"); end_Range = __WPL:findWaypointTag("End1"); __WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X, player.Z, player.Y, start_range, end_range)) elseif shopcrash == 1 then __WPL:setWaypointIndex(__WPL:findWaypointTag("To_Shop")) start_range = __WPL:findWaypointTag("Start2"); end_Range = __WPL:findWaypointTag("End2"); __WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X, player.Z, player.Y, start_range, end_range)) elseif sendcrash == 1 then __WPL:setWaypointIndex(33) start_range = __WPL:findWaypointTag("Start3"); end_Range = __WPL:findWaypointTag("End3"); __WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X, player.Z, player.Y, start_range, end_range)) end end if locationcrash == 2 then if mailcrash == 1 then start_range = __WPL:findWaypointTag("Wailing_Start2"); end_Range = __WPL:findWaypointTag("Wailing_End2"); __WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X, player.Z, player.Y, start_range, end_range)) elseif shopcrash == 1 then __WPL:setWaypointIndex(__WPL:findWaypointTag("Mailbox_To_Shop_Fjord")) start_range = __WPL:findWaypointTag("Wailing_Start3"); end_Range = __WPL:findWaypointTag("Wailing_End3"); __WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X, player.Z, player.Y, start_range, end_range)) elseif sendcrash == 1 then __WPL:setWaypointIndex(__WPL:findWaypointTag("Shop_To_Mailbox_Fjord")) start_range = __WPL:findWaypointTag("Wailing_Start2"); end_Range = __WPL:findWaypointTag("Wailing_End2"); __WPL:setWaypointIndex(__WPL:getNearestWaypoint(player.X, player.Z, player.Y, start_range, end_range)) end end function buyBelts() player:openStore("Cholman Hooktail") store:buyItem(228966, 10); yrest(1000); sendMacro("CloseAllWindows()"); end function buyBelts_Fjord() player:openStore("Didide Spiderfoot") store:buyItem(228966, 10); yrest(1000); sendMacro("CloseAllWindows()"); end function sendBelts() UMM_SendByNameOrId(nameTable[counter],228966); yrest(500); sendMacro("CloseAllWindows()"); counter = counter + 1; end if crash == 2 then print(" Do you want to buy belts from Sarlo or Wailing Fjord?") print("I recomend Wailing Fjord, the mailbox is closer.") print("1. Sarlo 2. Wailing Fjord") location = io.stdin:read(); location = tonumber(location); end if location == 1 then player:mount(); travelTo("Sarlo"); __WPL:setWaypointIndex(__WPL:findWaypointTag("To_Shop")); end if location == 2 then player:mount(); travelTo("WailingFjord"); __WPL:setWaypointIndex(__WPL:findWaypointTag("Wailing_Portal_To_Shop")); end if nameTable[counter] == lastname then UMM_SendByNameOrId(lastname,228966); print("Done mailing.") travelTo("VaranasWest") __WPL:setWaypointIndex(__WPL:findWaypointTag("Shop_Path")); else sendBelts(); end __WPL:setWaypointIndex(__WPL:findWaypointTag("Mailbox_To_Shop")); buyBelts(); __WPL:setWaypointIndex(__WPL:findWaypointTag("To_Mailbox")); buyBelts(); __WPL:setWaypointIndex(__WPL:findWaypointTag("To_Mailbox")); load_paths("Buy_Fusion.xml") buyBelts_Fjord(); __WPL:setWaypointIndex(__WPL:findWaypointTag("Shop_To_Mailbox_Fjord")); if nameTable[counter] == lastname then UMM_SendByNameOrId(lastname,228966); print("Done mailing.") travelTo("VaranasWest") __WPL:setWaypointIndex(__WPL:findWaypointTag("Shop_Path")); else sendBelts(); end __WPL:setWaypointIndex(__WPL:findWaypointTag("Mailbox_To_Shop_Fjord")); buyBelts_Fjord(); __WPL:setWaypointIndex(__WPL:findWaypointTag("Shop_To_Mailbox_Fjord"));