Is this task repeatable? I tried the "Scouting Maiden's Grave" and I was not able to repeat the task, I have also heard you have to complete multiple tasks before the guy will give it to you again.
#Event Update "Your task 'Screw Loose' has been updated."
#Event Reward "You have successfully been granted your reward for: Screw Loose"
#include aa.inc
Sub Main
/declare sl int outer ${Param0}
/declare turnin string outer
/declare mytarget string outer
/declare checkt int outer
/declare times int outer
/declare Itemset int outer
/declare t int outer
/declare slt int outer
/declare repeatit int outer
/declare Updatecnt int outer
/declare got_reward bool outer false
/call getaaini
/call Screwloose
/return
Sub Screwloose
/for slt 1 to ${sl}
/echo round ${slt} of ${sl}
/target Tabazin
/call AAbuy
/call PCcheck
/call GM
/say Screw
:waitA
/if (!${Cursor.ID}) {
/delay 1s
/goto :waitA
}
/autoinv
/call Repeatit
/call turnin
/next slt
/call end
/return
Sub Repeatit
/varset Updatecnt 0
/varset repeatit 10
|/warp loc 1883 -1180.5 405.5
/delay 2s
:looptime
/for t 1 to ${repeatit}
/call PCcheck
/call GM
/Cast Item "Sonic Screwdriver"
:waitB
/if (!${Cursor.ID}) {
/delay 1s
/goto :waitB
}
/autoinv
/next t
/if (${FindItemCount[Support Bolt]}<10) {
/varcalc repeatit 10-${FindItemCount[Support Bolt]}
/goto :looptime
}
/return
Sub turnin
/varset turnin "Support Bolt"
/varset mytarget Tabazin
/varset Itemset 2
/varset times 4
|/warp loc 85 -1482 373.5
:itemloop
/delay 1s
/target ${mytarget}
/face nolook
/for t 1 to ${times}
/nomodkey /ctrl /itemnotify ${FindItem[${turnin}].InvSlot} leftmouseup
/click left target
/delay 1s
/next t
/nomodkey /notify GiveWnd GVW_Give_Button leftmouseup
/delay 1s
/doEvents Update
/varcalc Itemset ${Itemset}-1
/if (${Itemset}>0) /goto :itemloop
/if (${Itemset}==0) {
/varset times 2
/goto :itemloop
}
/if (${Updatecnt}<20) {
/varcalc times ${FindItemCount[Support Bolt]}
/goto :itemloop
}
/nomodkey /ctrl /itemnotify ${FindItem[sonic].InvSlot} leftmouseup
/click left target
/delay 1s
/nomodkey /notify GiveWnd GVW_Give_Button leftmouseup
/delay 1s
/doEvents Update
/varset got_reward false
:RewardLoop
/reward 1
/delay 1s
/doEvents Reward
/if (!${got_reward}) {
/delay 1s
/goto :RewardLoop
}
/return
Sub Event_Update
/varcalc Updatecnt ${Updatecnt}+1
/return
Sub Event_Reward
/varset got_reward true
/return
Sub End
/endmacro
/return
Sub PCcheck
:PCcheck
/echo Performing PC radius check for cast/hail
/if (${SpawnCount[pc radius 125]} > 1) {
/echo PC's within 125 units, pausing 30 seconds.
/delay 30s
/goto :PCcheck
}
/return
Sub GM
:GM
/echo Performing GM zone check.
/if (${Spawn[gm].ID}) {
/echo GM in zone, pausing macro.
/delay 300s
/goto :GM
}
/return
Sub AAbuy
/call GetAA
}
/return
heh I got a little over careless and left afk for a couple hours. Apparently, I got that little lag thing and was spamming for a few hours. Someone was nice enough to send me a tell and tell me to at least pretend to be nearby ;p
#Event Update "Your task 'Screw Loose' has been updated."
#Event Reward "You have successfully been granted your reward for: Screw Loose"
#include aa.inc
Sub Main
/declare sl int outer ${Param0}
/declare turnin string outer
/declare mytarget string outer
/declare checkt int outer
/declare times int outer
/declare Itemset int outer
/declare t int outer
/declare slt int outer
/declare repeatit int outer
/declare Updatecnt int outer
/declare got_reward bool outer false
/call getaaini
/call Screwloose
/return
Sub Screwloose
/for slt 1 to ${sl}
/echo round ${slt} of ${sl}
/target Tabazin
/call AAbuy
/call PCcheck
/call GM
/say Screw
:waitA
/if (!${Cursor.ID}) {
/delay 1s
/goto :waitA
}
| MODIFIED
/varset Updatecnt 0
/varset repeatit 10
| END MODIFIED
/autoinv
/call Repeatit
| MODIFIED
/doEvents Update
/call ChkUpd
| END MODIFIED
/call turnin
/next slt
/call end
/return
Sub Repeatit
|/warp loc 1883 -1180.5 405.5
/delay 2s
:looptime
/for t 1 to ${repeatit}
/call PCcheck
/call GM
/Cast Item "Sonic Screwdriver"
:waitB
/if (!${Cursor.ID}) {
/delay 1s
/goto :waitB
}
/autoinv
/next t
/if (${FindItemCount[Support Bolt]}<10) {
/varcalc repeatit 10-${FindItemCount[Support Bolt]}
/goto :looptime
}
/return
Sub ChkUpd
/if (${Updatecnt} < 10) {
/echo Repeating. Only received ${Updatecnt} of 10 updates.
/goto Repeatit
}
/if (${FindItemCount[Support Bolt]}>10) /goto End
/if (${FindItemCount[Support Bolt]}<10) /goto Repeatit
/return
Sub turnin
/varset turnin "Support Bolt"
/varset mytarget Tabazin
/varset Itemset 2
/varset times 4
|/warp loc 85 -1482 373.5
:itemloop
/delay 1s
/target ${mytarget}
/face nolook
/for t 1 to ${times}
/nomodkey /ctrl /itemnotify ${FindItem[${turnin}].InvSlot} leftmouseup
/click left target
/delay 1s
/next t
/nomodkey /notify GiveWnd GVW_Give_Button leftmouseup
/delay 1s
/doEvents Update
/varcalc Itemset ${Itemset}-1
/if (${Itemset}>0) /goto :itemloop
/if (${Itemset}==0) {
/varset times 2
/goto :itemloop
}
/if (${Updatecnt}<20) {
/varcalc times ${FindItemCount[Support Bolt]}
/goto :itemloop
}
/nomodkey /ctrl /itemnotify ${FindItem[sonic].InvSlot} leftmouseup
/click left target
/delay 1s
/nomodkey /notify GiveWnd GVW_Give_Button leftmouseup
/delay 1s
/doEvents Update
/varset got_reward false
:RewardLoop
/reward 1
/delay 1s
/doEvents Reward
/if (!${got_reward}) {
/delay 1s
/goto :RewardLoop
}
|### print progress
/varcalc aas (((${Me.AAPointsTotal} - ${start_aas}) * 100) + (${Me.PctAAExp} - ${start_aaexp})) / 100
/varcalc aas_hr ${aas} / (${Macro.RunTime} / 3600)
/echo Stats: AA Exp: ${aas} AA Per Hour: ${aas_hr}
/mqlog ${Time} Completed/Stats: AA Exp: ${aas} AA Per Hour: ${aas_hr}
/return
Sub Event_Update
/varcalc Updatecnt ${Updatecnt}+1
/return
Sub Event_Reward
/varset got_reward true
/return
Sub End
/endmacro
/return
Sub PCcheck
:PCcheck
/echo Performing PC radius check for cast/hail
/if (${SpawnCount[pc radius 125]} > 1) {
/echo PC's within 125 units, pausing 30 seconds.
/delay 30s
/goto :PCcheck
}
/return
Sub GM
:GM
/echo Performing GM zone check.
/if (${Spawn[gm].ID}) {
/echo GM in zone, pausing macro.
/delay 300s
/goto :GM
}
/return
Sub AAbuy
/call GetAA
}
/return
[Sun Jan 20 13:20:31 2008] Your Sonic Screwdriver begins to glow.
[Sun Jan 20 13:20:41 2008] Your task 'Screw Loose' has been updated.