Dear Booges..

Status
Not open for further replies.

Zimak

Arcade Addict
Joined
Aug 10, 2005
Messages
328
Reaction score
1
Points
0
Not wanting to pressure you or get spoon fed, So Im happy to proceed on my own with a few hints, but you reckon you could help me make up a Casino macro which;

Gives tokens 1 at a time then Auto destroys a list of junk, but keeps a gold ticket and ends macro when it gets one?

maybe /say OMG A GOLD TICKET!
so i can set audio trigger to it.

I reckon the muffin quest thing would work to a point, so I can cut a paste most of that, but Lost on the autodestroy/keep stuff.. was gonna cannibalize autoforage but then realised thats a plugin not a macro..

/boggle.
 
Here ya go, this will create a "Casino.ini" file and autokeep any new items, change to 0 to destroy, or change the variable I marked in macro to 0 to just autodestroy new items

- You can remove the /call Prepare function if you want to do all that on your own I just put it in there for another step of automation. If prepare errors its possibly because I dont' know if Shadow Knight has a space in it or not.
Let me know how it works for you I'm going to bed now, just worked 13hrs :(


Code:
|Casino v1.0 by Booges
|- Plugin Required: MQ2MoveUtils
|


Sub Main
/declare ItemSetting int local 
/declare NotFound int local 

   /call Prepare
:Loop
   /ctrl /itemnotify ${FindItem[=King's Court Token].InvSlot} leftmouseup
   /delay 10
   /click left target
   /delay 10 ${Window[GiveWnd].Open}
   /nomodkey /notify GiveWnd GVW_Give_Button leftmouseup
   /delay 10 !${Window[GiveWnd].Open}
   /nomodkey /notify GiveWnd GVW_Give_Button leftmouseup
   /delay 10
   /if (${Cursor.Name.Find[Gold]}) /call Ticket
   /varset NotFound -1
   /varset ItemSetting ${Ini[Casino.ini,Items,${Cursor.Name},${NotFound}]}
   /delay 5 
   /if (${ItemSetting}==${NotFound}) { 
      /ini "Casino.ini" "Items" "${Cursor.Name}" "1" 
|- Keeping item - set to 0 to autodestroy new items
|==================================================
      /varset ItemSetting 1 
   }
   /if (${ItemSetting}==1) { 
:LootIt
      /autoinventory 
      /delay 5 
      /if (${Cursor.ID}) /goto :LootIt
   } else { 
      /destroy 
   }
   /goto :Loop
/return

|- Like Lillanu said beep is easy enough or change this to text for audio trigger
|================================================================================
Sub Ticket
   /beep
   /beep
   /beep
   /endmacro
/return

Sub Prepare
   /declare i int local
   /if (${Me.Class.Name.Equal["Monk"]} || ${Me.Class.Name.Equal["Warrior"]} || ${Me.Class.Name.Equal["Rogue"]}) /target Therin Asakith
   /if (${Me.Class.Name.Equal["Shadow Knight"]} || ${Me.Class.Name.Equal["Ranger"]} || ${Me.Class.Name.Equal["Beastlord"]} || ${Me.Class.Name.Equal["Bard"]} || ${Me.Class.Name.Equal["Paladin"]}) /target Gralin Silvertooth
   /if (${Me.Class.Name.Equal["Druid"]} || ${Me.Class.Name.Equal["Shaman"]} || ${Me.Class.Name.Equal["Cleric"]}) /target Vuri Pandar
   /if (${Me.Class.Name.Equal["Wizard"]} || ${Me.Class.Name.Equal["Enchanter"]} || ${Me.Class.Name.Equal["Necromancer"]} || ${Me.Class.Name.Equal["Magician"]}) /target Tirac Goldbender
   /face target
   /delay 10
   /stick 13
   /for i 1 to 8
      /nomodkey /itemnotify pack${i} rightmouseup
      /delay 5
   /next i
   /squelch /stick off
/return
 
have my babies...

thankyou so much for all that work..

appreciate it very much
 
This may sound really dumb, but how do you get a macro to work?

EX: If I wanted to get this macro to work, what do I have to do with the above information and what commands do I need to use in the mq window?
 
still a little confused here....where do i go to put this macro into effect or is it part of Fry's compile....


also how do i declare which items i want to destroy.....tried reading through but i'm just not that good :(
 
Just copy everything inside the code:, open up notepad, then save it as casino.mac inside the macros folder in your MQ2 compile. Then just type "/macro casino" to run it.

Heres autodestroy commands. Load it with "/plugin mq2autodestroy"

Commands:

/autodestroy - Object held on the mouse cursor will be added to the INI file's [AutoDestroy] section
/autodestroy auto - Toggles automatic destruction of items listed in the [AutoDestroy] section of the INI file as they appear on the mouse cursor
/autokeep - Object held on the mouse cursor will be added to the INI file's [AutoKeep] section
/autokeep auto - Toggles automatic keeping of items listed in the [AutoKeep] section of the INI file as they appear on the mouse cursor
/handlecursor - Keep or destroy the item on the cursor, depending on which section of the INI file it appears in
 
i trying messing around with the script by casting and pasting as i dont know much about writting. Can anyone explain how u'd make it so it gave him 4 tokens at a time??:eek:
 
Code:
   /ctrl /itemnotify ${FindItem[=King's Court Token].InvSlot} leftmouseup
   /delay 10
   /click left target
   /delay 10 ${Window[GiveWnd].Open}

There are a number of ways, one of which is to simply repeat the first 3 lines of the above code 3 times in a row.

My personal preference is to wrap it in a for loop.
Code:
Sub Main
/declare ItemSetting int local 
/declare NotFound int local 
[COLOR="Lime"]/declare loopcount int local[/COLOR]

   /call Prepare

:Loop
 [COLOR="lime"]/for loopcount 1 to 4[/COLOR]
   /ctrl /itemnotify ${FindItem[=King's Court Token].InvSlot} leftmouseup
   /delay 10
   /click left target
   /delay 10 ${Window[GiveWnd].Open}
[COLOR="lime"] /next loopcount[/COLOR]
 
Status
Not open for further replies.