Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- |--------------------------------------------------------|
- |- Searches inventory, and banks, for indicated items. -|
- |--------------------------------------------------------|
- |- Use, /bc Find 'Name', or, /echo Find 'Name'. -|
- |--------------------------------------------------------|
- |#EVENT FindItemCount "[#1#] Find Item Count #2#"
- |#EVENT FindItemCount "<#1#> Find Item Count #2#"
- |#EVENT FindItemCount "<#1#> Find Item Count #2# |/|#*#"
- #EVENT FindItemCount "[#1#] Count Item #2#"
- |#EVENT FindItemCount "<#1#> Count Item #2#"
- |#EVENT FindItemCount "<#1#> Count Item #2#|/|#*#"
- #EVENT FindItemCount "<#1#> Count Item #2#"
- #EVENT FindItemCount "<#1#> Find Item Count #2#"
- |#EVENT FindItemCount "<#1#> Find Item Count #2# |/|#*#"
- SUB EVENT_FindItemCount(line, ChatSender, eventParams)
- /if (${Debug} || ${Debug_Count}) /echo |- EVENT_FindItemCount ==>
- /if (${Debug} || ${Debug_Count}) /echo line: ${line}
- /if (${Debug} || ${Debug_Count}) /echo ChatSender: ${ChatSender}
- /if (${Debug} || ${Debug_Count}) /echo eventParms: ${eventParams}
- | -Verify the event
- /call verifyEvent "${ChatSender}" "${line}"
- /if (${Defined[ChatSender]}) /varset ChatSender ${Macro.Return.Arg[1,_]}
- | |-----------Valid User----------| |--------Included Bot-----------|
- /if (${Bool[${Macro.Return.Arg[2,_]}]} && ${Bool[${Macro.Return.Arg[3,_]}]}) {
- | -Declare counting variables.
- /declare i int local
- /declare e int local
- /declare itemName string local
- /declare ItemToFind string local ${eventParams.Arg[1,-]}
- /declare OnlyInventory bool local FALSE
- /if (${line.Find[/Inventory]}) /varset OnlyInventory TRUE
- | Remove /only /not /otherthings if needed
- /if (${ItemToFind.Find[ /]}) /varset ItemToFind ${ItemToFind.Arg[1, /]}
- /if (${ItemToFind.Find[/]}) /varset ItemToFind ${ItemToFind.Arg[1,/]}
- /if (${Debug} || ${Debug_Count}) /echo ItemToFind: [${ItemToFind}] OnlyInventory: ${OnlyInventory}
- /if (${FindItemCount[${ItemToFind}]} && ${OnlyInventory} ) {
- /docommand ${ChatToggle} >>> Found (${Math.Calc[${FindItemCount[${ItemToFind}]}].Int}) examples of [${ItemToFind}] in the following slots ... <<<
- } else /if (${FindItemCount[${ItemToFind}]} || ${FindItemBankCount[${ItemToFind}]} || ${Cursor.Name.Equal[${ItemToFind}]}) {
- /docommand ${ChatToggle} >>> Found (${Math.Calc[${FindItemCount[${ItemToFind}]} + ${FindItemBankCount[${ItemToFind}]}].Int}) examples of [${ItemToFind}] in the following slots ... <<<
- }
- }
- /if (${Debug} || ${Debug_Count}) /echo <== EVENT_FindItems -|
- /RETURN
- |#event YourKill "You have slain #*#!"
- #event MyKill "You gain experience!!"
- |#event YourKill "You gain party experience!!"
- |#event YourKill "You gained raid experience!"
- SUB Event_MyKill
- /if (${Debug} || ${Debug_Basics}) /echo ==> Event_YourKill -|
- |/if (${Me.Pet.ID}) {
- | /pet hold
- |}
- /if ( !${Bool[${Group}]} ) {
- /bc I KSed the last mob
- }
- /if (${Debug} || ${Debug_Basics}) /echo <== Event_YourKill -|
- /RETURN
- |#EVENT NOLONGERIDLE "You are no longer idle."
- |SUB Event_NOLONGERIDLE
- | /removebuff Illusion: /ONLY|ME
- |/RETURN
- #EVENT raid_invite "#1# tells you, 'Raid Invite#2#'"
- SUB EVENT_raid_invite(line, ChatSender, eventParams)
- /if (${Debug}) /echo |- EVENT_raid_invite ==>
- | -Verify the event
- /call verifyEvent "${ChatSender}" "${line}"
- /varset ChatSender ${Macro.Return.Arg[1,_]}
- | |-----------Valid User----------| |--------Included Bot-----------| |-----------In Zone-------------| |------------In Range------------|
- |/if (${Bool[${Macro.Return.Arg[2,_]}]} && ${Bool[${Macro.Return.Arg[3,_]}]} && ${Bool[${Macro.Return.Arg[4,_]}]} && ${Bool[${Macro.Return.Arg[5,_]}]}) {
- |-----------In Zone-------------|
- /if ( ${Bool[${Macro.Return.Arg[4,_]}]} ) {
- /bc derp raid invite ${ChatSender}
- /raidinvite ${ChatSender}
- } else {
- /tell ${ChatSender} We aren't in the same zone.
- }
- /if (${Debug}) /echo <== EVENT_raid_invite -|
- /return
- #EVENT SERVER_REBOOT "#1#BROADCASTS, 'The server will be rebooting in 10 minutes. Please get to a safe location.#*#"
- SUB EVENT_SERVER_REBOOT(line, ChatSender, eventParms)
- /if (${Zone.ID} == 344 || ${Zone.ID} == 151 ) {
- /echo ${ChatSender} issued a server reboot. Camping toons out.
- /camp desk
- /end
- }
- /RETURN
- #event report_aas "#1# REPORT AAS#*#"
- sub event_report_aas(line, ChatSender, eventParms)
- | /declare myArray[26] local
- |/call #CreateArrays string outer CharInfoWithLesson[${counter}] CharInfoNoLesson[${Math.Calc[${ExpCharInfo.Size}-${counter}]}]
- |/call #CreateArrays string outer myArray[26]
- /call #CreateArrays string outer myArray[${Math.Calc[${NetBots.Client.Count[ ]}+1]}]
- /echo ${NetBots.Client}
- /echo ${Math.Calc[${NetBots.Client.Count[ ]}+1]}
- /declare i int
- /for i 1 to ${Math.Calc[1+${NetBots.Client.Count[ ]}]}
- |/echo ${NetBots.Client.Arg[${i}, ]}: ${NetBots[${NetBots.Client.Arg[${i}, ]}].TotalAA} - ${NetBots[${NetBots.Client.Arg[${i}, ]}].UsedAA} - ${NetBots[${NetBots.Client.Arg[${i}, ]}].UnusedAA}
- |/declare myArray[${i}]
- /varset myArray[${i}] ${NetBots.Client.Arg[${i}, ]}|${NetBots[${NetBots.Client.Arg[${i}, ]}].TotalAA}|${NetBots[${NetBots.Client.Arg[${i}, ]}].UsedAA}|${NetBots[${NetBots.Client.Arg[${i}, ]}].UnusedAA}
- /next i
- /call #QuickSort myArray 1 ${myArray.Size} .Arg[2,|]
- /for i ${myArray.Size} downto 1
- /echo ${myArray[${i}]}
- /next i
- /return
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement