Page 1 of 1

Godly.mac

Posted: Fri Jan 01, 2016 7:32 pm
by moguay
A quick dev script for to avoid cramp.
- give your godly items, move to Lord Drizku and run /mac godly.mac

Code: Select all

Sub Main
    /declare strGodlyPoint string local Symbol of the Gods
    /declare i int local 0
   
    :GodlyTurn
   
    /if (${i} <= 0 || ${i} >= 4) {
        /if (${Window[GiveWnd].Open}) {
            /nomodkey /notify GiveWnd GVW_Give_Button leftmouseup
            /delay 1s (!${Window[GiveWnd].Open})
            /delay 5
        }
        /varset i 0   
    }
   
    /call openBags
   
    /call ClearCursor
   
    /if (!${Spawn[NPC =Lord Drizku].ID} && ${Spawn[NPC =Lord Drizku].Distance}>0 && ${Spawn[NPC =Lord Drizku].Distance}<15) {
        /echo Godly: exit, Lord Drizku not in range
        /return
    }
   
    /if (${FindItem[${strGodlyPoint}].InvSlot}) {
        /if (${Target.ID}!=${Spawn[NPC =Lord Drizku].ID}) /target id ${Spawn[NPC =Lord Drizku].ID}
        /delay 1s (${Target.ID}==${Spawn[NPC =Lord Drizku].ID})
       
        /ctrl /itemnotify ${InvSlot[${FindItem[${strGodlyPoint}].InvSlot}]} leftmouseup
       
        /if (${Target.ID}==${Spawn[NPC =Lord Drizku].ID}) {
            /nomodkey /click left target
            /delay 1s (!${Cursor.ID})
            /if (!${Cursor.ID}) {
                /varcalc i ${i} + 1
                /goto :GodlyTurn
            }
        }
        /echo Godly: >>>> Lag PROBLEM <<<<, use /endmac to exit
    } else {
        /echo Godly: exit, no more item to turn
        /return
    }
    /goto :GodlyTurn
/return

||||||||| FUNCTIONS

Sub openBags
   /declare i int local
   /declare retryTimer timer local
   /declare miscTimer timer local
   
   /for i 1 to 8
      
      /varset miscTimer 30
      /if (${Me.Inventory[pack${i}].Container}) {
         
      :openBag
         /if (!${Window[pack${i}].Open}) {
            /itemnotify pack${i} rightmouseup
            /delay 5 ${Window[pack${i}].Open} || ${Window[TradeSkillWnd].Open}
            /if (!${Window[pack${i}].Open} && !${Window[TradeSkillWnd].Open} && ${miscTimer}) /goto :openBag
            
            /if (${Window[TradeSkillWnd].Open}) {
               :openExperimentWnd
               /notify TradeSkillWnd ExperimentButton leftmouseup
               /delay 5 !${Window[TradeSkillWnd].Open}
               /if (${Window[TradeSkillWnd].Open} && ${miscTimer}) /goto :openExperimentWnd
            }
         }
      }
   /next i
/return

Sub ClearCursor
   :ClearCursor
   /if (${Cursor.ID}) {
      /autoinventory
      /delay 5 (!${Cursor.ID})
      /goto :ClearCursor
   }
/return

Re: Godly.mac

Posted: Fri Jan 01, 2016 9:56 pm
by Rude
You post this now, after Drizku has already cast his permanent Sapping Arthritis debuff on me :( lol

Re: Godly.mac

Posted: Fri Jan 01, 2016 10:40 pm
by moguay
I am sorry for you. So if you need some technical help, send me a PM

Image
1st RULE: You do not talk about FIGHT CLUB.
2nd RULE: You DO NOT talk about FIGHT CLUB.
3rd RULE: If someone says "stop" or goes limp, taps out the fight is over.
4th RULE: Only two guys to a fight.
5th RULE: One fight at a time.
6th RULE: No shirts, no shoes.
7th RULE: Fights will go on as long as they have to.
8th RULE: If this is your first night at FIGHT CLUB, you HAVE to fight.