You need a container that's safe to use and 5K gold. (It's possible to use a stackable item other than gold, but you're on your own with that, and you'll have to rewrite some code.) Gold is simple and it works well. By "container that's safe to use" I mean that you have to be careful that no one will saunter by and take your gold while you're training. The best choice is to train in your house, or in a house where you're friended and where you have access to a secure container.
There's not much more to say. Watching this script run is as exciting as watching paint dry, and it takes a while to get the gains. Good luck.
Code: Select all
;-- Simple stealing trainer 01 by Taelwrath
;-- Either set %srcContID to the ID of a secure container
; in your house or target the container you want to use
; each time you start the script...
;-- The script will pathfind you to your container, so
; don't be alarmed. (You need to be within 1 tile.)
;-- Make sure you have 5K or so gold in this container
; when you start up.
set %srcContID XX
set %gold POF
;
menu hideEUO
menu hide
;
if %srcContID <> XX
goto no_init
set #LOBJECTID X
display OK Open the box you want to use
init_loop:
if #LOBJECTID = X ; get the box ID
{
wait 10
goto init_loop
}
set %srcContID #LOBJECTID
set %opened #TRUE
no_init:
finditem %srcContID G_1
if #FINDCNT = 0
{
finditem %srcContID G
if #FINDCNT = 0
{
display ok Container not found
halt
}
event pathfind #FINDX #FINDY #FINDZ
}
if %opened = #TRUE
goto check_gold
set #LOBJECTID %srcContID
event macro 17
wait 20
check_gold:
finditem %gold C_ , %srcContID
if #FINDCNT = 0 || #FINDSTACK < 3000
{
display ok You need a stack of at least 3K gold$
+ in the source container
halt
}
set %targ #FINDID
event ExMsg #CHARID 3 256 What do you mean I look suspicious?
main:
finditem %gold C_ , #BACKPACKID
if #FINDSTACK > 2000
{
exevent drag #FINDID #FINDSTACK
wait 10
exevent dropc %srcContID
wait 10
}
event macro 13 33 ; stealing
target 7s
set #LTARGETID %targ
event macro 22
wait 10s
goto main