loading=[[ =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= Userfunction Lamkefyned Tools V2.0.000 =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= * . _ . * |\_|/__/| * \ / / \/ \ \ * \ /__|O||O|__ \ * \ |/_ \_/\_/ _\ | * | | (____) | || * \/\___/\__/ // * (_/ || * | || * | ||\ * \ //_/ * \______// * __ || __|| * (____(____) */ ]] -- ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -- -- GENERAL -- ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -- function LTU() cprintf(cli.lightblue,"Developer: Lamkefyned\n") cprintf(cli.lightblue,"Userfunction: Lamkefyned Tools Userfunction\n") cprintf(cli.lightblue,"Version: 2\n") cprintf(cli.lightblue,"Version Beta\n") end function LTU_Loading(arg1) LTU_Clear() cprintf(cli.lightblue,loading) yrest(arg1) LTU_Clear() end function LTU_Clear() local _, _, x, y = getConsoleAttributes(); for j = 1, y do printf(string.rep(' ', x)); end clearScreen(); end function LTU_Ireset() SlashCommand("ILG destroy") yrest(500) SlashCommand("ILG inv") yrest(1000) end -- ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -- -- HALL OF SURVIVORS -- ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -- function LTU_Hos_Menu(arg1) if player.Level >= arg1 then LTU_Hos_Buff() __WPL:setWaypointIndex(__WPL:findWaypointTag("MC")) else __WPL:setWaypointIndex(__WPL:findWaypointTag("CTL")) end end function LTU_Hos_Buff() player:update() if not player:hasBuff("506841") then inventory:useItem(202879); end end function LTU_Hos_Group() if(RoMScript("GetNumPartyMembers()") == 0)then repeat for k,v in pairs(invite) do if not RoMScript("InPartyByName ( '"..v.."' );")then RoMScript("InviteByName('"..v.."');"); end yrest(100) end yrest(60000) until RoMScript("GetNumPartyMembers()") ~= 0 end end function LTU_Hos_CheckGroup() if RoMScript("StaticPopup1:IsVisible()") then sendMacro('StaticPopup_OnClick(StaticPopup1, 1);') end if(RoMScript("GetNumPartyMembers()") == 0)then repeat yrest(1000) until RoMScript("GetNumPartyMembers()") ~= 0 end end function LTU_Hos_Ireset() SlashCommand("ILG destroy") yrest(500) LTU_Hos_Buff() end function LTU_Hos_CheckLevel(arg1) if( player.Level >= arg1 ) then LoginNextChar() end; end function LTU_Hos_EP(arg1) eventParty() repeat yrest(100) until checkEventParty() == arg1 eventParty("stop") end function LTU_Hos_SPC(arg1) sendPartyChat(arg1) end function LTU_Hos_Info() cprintf(cli.lightblue, "\n\n\n") cprintf(cli.lightblue, "Character Number: %s \n", getChar()) cprintf(cli.lightblue, "Character Account: %s \n", getAcc()) cprintf(cli.lightblue, "Character Level: %s \n", player.Level) cprintf(cli.lightblue, "\n\n\n") end -- ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -- -- CHECK REQUIREMENTS -- ------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- -- function LTU_Hos_CheckRequirements() if not SetCharList then error("This userfunction requires Rock5's 'fastLogin Revisited' userfunction which can be downloaded here.\n http://www.solarstrike.net/phpBB3/viewtopic.php?f=27&t=1245#downloads") end end