Genie II Illithi script. on 11/08/2005 08:23 AM CST
Links-arrows 1
Reply Reply
Its an advanced script for Genie. All I have not completed is the auto accuse routines.

###################################### Stay Alive Triggers




#################################### Script Triggers

Action setvariable location Shard when Brickwell Tower, Dispatch
Action setvariable location Darkling when Darkling Wood, Trader Outpost
Action setvariable location steelclaw when SteelClaw Clan, Trader Outpost
Action setvariable location Fayrin when Marachek's Oak, Trader Outpost
Action put pu my contract in my case when The guild office
Action put drop my grass when That's too heavy to go in there

####################################### VAriables

setvariable getnew on
SetVariable Juggle Crabs
SetVariable jugglecontainer Spidersilk Backpack


setvariable Cost_of_Goods 0
setvariable Total_Cost_of_Goods 0
SetVariable Total_Gross_Profit 0
SetVariable Gross_Profit 0
setvariable Total_Net_Profit 0
setvariable Net_Profit 0
setvariable Total_Profit 0
setvariable Plat_Per_Hour 0
SetVariable hours 0
SetVariable minutes 0
SetVariable seconds 0

setvariable Contracts_to_Fay 0
setvariable Contracts_to_SCC 0
setvariable Contracts_to_Shard 0
setvariable Contracts_to_Darkling 0
setvariable Total_Contracts 0
Setvariable Steal_Attempts 0

Action SetVariable Cost_of_Goods 0 when You still have another contract
Action setvariable Cost_of_Goods $1 when owed to this guild, for a total of (\d+)
Action SetVariable Gross_Profit $1 when these goods are currently worth (\d+)

Action math Contracts_to_Fay add 1 when The guild office at Fayrin's Rest
Action math Contracts_to_SCC add 1 when The guild office at Steelclaw Clan
Action math Contracts_to_Shard add 1 when The guild office at Shard
Action math Contracts_to_Darkling add 1 when The guild office at Darkling Wood
Action math Total_Contracts add 1 when The minister plucks a contract from the hands of a passing clerk and hands it to you

action match Steal_Attempts add 1 when You glance down and catch (\w+) in the act of trying to pick your pocket
Action put #echo log3 Steal Attempt from $1 when You glance down and catch (\w+) in the act of trying to pick your pocket
Action match Steal_Attempts add 1 when your pouch seems suddenly heavier for a moment



timer clear
timer start

####################################### Script Body

put look
match Shard_North Brickwell Tower, Dispatch
match Darkling Darkling Wood, Trader Outpost
match SteelClaw_North Steelclaw Clan, Trader Outpost
match Fayrin Marachek's Oak, Trader Outpost
matchwait




Start:

Fayrin:
put #echo log4 Contracts to Fayrin's Rest = %Contracts_to_Fay
put #echo log4 Contracts to Steelclaw Clan = %Contracts_to_SCC
put #echo log4 Contracts to Shard = %Contracts_to_Shard
put #echo log4 Contracts to Darkling Wood = %Contracts_to_Darkling
put #echo log4

put #echo log4 Steal Attempts = %Steal_Attempts

gosub Business_Sub
#gosub Juggle_Sub
Gosub Fayrin_Steel_Sub

SteelClaw_South:
GoSub Business_Sub
GoSub Steel_Shard_Sub

Shard_South:
GoSub Business_Sub
GoSub Shard_Darkling_Sub

Darkling:
GoSub Business_Sub
GoSub Darkling_Shard_Sub

Shard_North:
GoSub Business_Sub
GoSub Shard_Steel_Sub

SteelClaw_North:
GoSub Business_Sub
GoSub SteelClaw_Fayrin_Sub


Goto Start
############################################# Business_sub


Business_sub:
Turn_In:
put get %location cont from my case
match Got_contract You get a
match not_contract What were you referring to
matchwait

Got_contract:
pause
put give clerk
waitfor your
pause
goto Turn_In

Not_Contract:
pause
put pay clerk
waitfor dues

if "%location" = Shard then move east
if "%location" = Shard then move go ebonwood door

if "%getnew" = "on" then put ask minister for contract

if "%location" = Shard then move out
if "%location" = Shard then move west


pause
put give clerk
waitfor your
pause
put pay clerk
waitfor dues
pause
put read my cont
pause 5

gosub Math_Sub



Return



Math_Sub:
put #echo Familiar

put #echo Familiar Cost Last Contract = %Cost_of_Goods
put #echo Familiar Value Last Contract = %Gross_Profit


Setvariable Net_Profit %Gross_Profit
Math Net_Profit subtract %Cost_of_Goods
put #echo Familiar Profit Last Contract = %Net_Profit
put #echo Familiar

Math Total_Cost_of_Goods add %Cost_of_Goods
put #echo Familiar Total acumulative Contract Cost = %Total_Cost_of_Goods

Math Total_Profit add %Gross_Profit
put #echo Familiar Total acumulative Gross Profit = %Total_Profit

Math Total_Net_Profit add %Net_Profit
put #echo Familiar Total acumulative Net Profit = %Total_Net_Profit
put #echo Familiar Total Number of Contracts = %Total_Contracts


gosub Profit_Hour_Sub


Setvariable Cost_of_Goods 0
Setvariable Gross_Profit 0
Setvariable Net_Profit 0


Return

Profit_Hour_Sub:
setvariable minutes %t
setvariable Plat_Per_Hour %Total_Net_Profit
math minutes divide 60
setvariable hours %t
math hours divide 3600
Math Plat_Per_Hour divide %hours
Math Plat_Per_Hour divide 10000
put #echo log3 %hours Hours
put #echo log3 %Plat_Per_Hour Plats per hour

setvariable Plat_Per_Hour 0
return

############################################# Fayrin_Steel_Sub
Fayrin_Steel_Sub:
echo 'Going to Steelclaw Clan
move out
put remove my feedbag
waitfor You sling a worn canvas feedbag
put give caravan
put wear my feedbag
waitfor You sling a worn canvas feedbag

put tell cara to follow
wait
put tell car to go fast
wait
put nw
WAITFOR , following you
put sw
WAITFOR , following you
put w
WAITFOR , following you
put sw
WAITFOR , following you
put s
WAITFOR , following you
put sw
WAITFOR , following you
put s
WAITFOR , following you
put sw
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put sw
WAITFOR , following you
put sw
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put sw
WAITFOR , following you
put sw
WAITFOR , following you
put s
WAITFOR , following you
put sw
WAITFOR , following you
put sw
WAITFOR , following you
put sw
WAITFOR , following you
put go path
WAITFOR , following you
put w
WAITFOR , following you
put go bridge
WAITFOR , following you
put e
WAITFOR , following you
put n
WAITFOR , following you
move go entr
pause
echo 'At Steelclaw Clan
Return

############################################# Steel_Shard_Sub
Steel_Shard_Sub:
echo 'Going to Shard
move out
put tell cara to follow
put s
WAITFOR , following you
put w
WAITFOR , following you
put go gate
WAITFOR , following you
put e
WAITFOR , following you
put go path
WAITFOR , following you
put s
WAITFOR , following you
put w
WAITFOR , following you
put w
WAITFOR , following you
put sw
WAITFOR , following you
put w
WAITFOR , following you
put w
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put se
WAITFOR , following you
put se
WAITFOR , following you
put sw
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put go gate
WAITFOR , following you
put e
WAITFOR , following you
put e
WAITFOR , following you
put se
WAITFOR , following you
put go tower
WAITFOR , following you
put open door
wait
move go door
wait
echo 'At Shard
Return


############################################# Shard_Darkling
Shard_Darkling_Sub:
echo 'Going to Darkling Wood
put open door
pause
move Go Door
put tell cara to follow
wait
put tell car to go fast
wait
pause 1
put remove my feedbag
waitfor You sling a worn canvas feedbag
put give caravan
put wear my feedbag
waitfor You sling a worn canvas feedbag
put out
WAITFOR , following you
put se
WAITFOR , following you
put se
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put sw
WAITFOR , following you
put sw
WAITFOR , following you
put sw
WAITFOR , following you
put w
WAITFOR , following you
put w
WAITFOR , following you
put go gate
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put se
WAITFOR , following you
put sw
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put se
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put se
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put se
WAITFOR , following you
put go path
WAITFOR , following you

put sw
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put sw
WAITFOR , following you
put sw
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put sw
WAITFOR , following you
put sw
WAITFOR , following you
put sw
WAITFOR , following you
put se
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put sw
WAITFOR , following you
put w
WAITFOR , following you
put w
WAITFOR , following you
pause

put sw
WAITFOR , following you
put sw
WAITFOR , following you
put s
WAITFOR , following you
put s
WAITFOR , following you
put go buil
pause
echo 'At Darkling Wood
Return

############################################# Darkling_Shard_Sub
Darkling_Shard_Sub:
echo 'Going to Shard
move out
put tell cara to follow
wait
put tell car to go fast
wait
put remove my feedbag
waitfor You sling a worn canvas feedbag
put give caravan
put wear my feedbag
waitfor You sling a worn canvas feedbag
put n
WAITFOR , following you
put n
WAITFOR , following you
put ne
WAITFOR , following you
put ne
WAITFOR , following you
put e
WAITFOR , following you
pause

put e
WAITFOR , following you
put ne
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put nw
WAITFOR , following you
put ne
WAITFOR , following you
put ne
WAITFOR , following you
put ne
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put ne
WAITFOR , following you
put ne
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put ne
WAITFOR , following you

put go path
WAITFOR , following you
put nw
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put nw
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put nw
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put ne
WAITFOR , following you
put nw
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you


put go gate
WAITFOR , following you
put e
WAITFOR , following you
put e
WAITFOR , following you
put ne
WAITFOR , following you
put ne
WAITFOR , following you
put ne
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put nw
WAITFOR , following you
put nw
WAITFOR , following you
put go tower
WAITFOR , following you
put open door
wait
move go door
wait
echo 'At Shard
Return

############################################# Shard_Steel_Sub

Shard_Steel_Sub:
echo 'Going to Steelclaw Clan
put open door
pause
move Go Door
put tell cara to follow
wait
put tell cara to go fast
wait
put remove my feedbag
waitfor You sling a worn canvas feedbag
put give caravan
put wear my feedbag
waitfor You sling a worn canvas feedbag
put out
WAITFOR , following you
put nw
WAITFOR , following you
put w
WAITFOR , following you
put w
WAITFOR , following you
put go gate
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put ne
WAITFOR , following you
put nw
WAITFOR , following you
put nw
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put e
WAITFOR , following you
put e
WAITFOR , following you
put ne
WAITFOR , following you
put e
WAITFOR , following you
put e
WAITFOR , following you
put n
WAITFOR , following you
put go path
WAITFOR , following you
put w
WAITFOR , following you
put go bridge
WAITFOR , following you
put e
WAITFOR , following you
put n
WAITFOR , following you
move go entr
pause
echo 'At Steelclaw Clan
Return



############################################# SteelClaw_Fayrin_Sub
SteelClaw_Fayrin_Sub:

echo 'Going to Fatrin's Rest
move out
wait
pause 2
put tell cara to follow
wait
put tell car to go fast
wait
put remove my feedbag
waitfor You sling a worn canvas feedbag
put give caravan
put wear my feedbag
waitfor You sling a worn canvas feedbag
put s
WAITFOR , following you
put w
WAITFOR , following you
put go gate
WAITFOR , following you
put e
WAITFOR , following you
put go path
WAITFOR , following you
put ne
WAITFOR , following you
put ne
WAITFOR , following you
put forag grass
waitfor Roundtime
pause
put put grass in my feedb
pause 2
x2:
put ne
WAITFOR , following you
put n
WAITFOR , following you
put ne
WAITFOR , following you
put ne
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put ne
WAITFOR , following you
put ne
WAITFOR , following you
put n
WAITFOR , following you
put n
WAITFOR , following you
put ne
WAITFOR , following you
put n
WAITFOR , following you
put ne
WAITFOR , following you
put n
WAITFOR , following you
put ne
WAITFOR , following you
put e
WAITFOR , following you
put ne
WAITFOR , following you
put se
WAITFOR , following you
move go outp
echo 'At Fayrin's Rest
Return




############################################# Juggle_sub
Juggle_sub:
put get my %Juggle
put juggle my %Juggle
waitfor Roundtime
pause

put juggle my %Juggle
waitfor Roundtime
pause

put juggle my %Juggle
waitfor Roundtime
pause

put juggle my %Juggle
waitfor Roundtime
pause

put juggle my %Juggle
waitfor Roundtime
pause

put juggle my %Juggle
waitfor Roundtime
pause

put juggle my %Juggle
waitfor Roundtime
pause

put juggle my %Juggle
waitfor Roundtime
pause

put juggle my %Juggle
waitfor Roundtime
pause

put juggle my %Juggle
waitfor Roundtime
pause

put put my %Juggle in my %jugglecontainer
waitfor You put
pause
Return





"All animals are equal but some animals are more equal than others." ~~ G.O.


Reply Reply
Re: Genie II Illithi script. on 05/21/2006 03:26 PM CDT
Links-arrows 2
Reply Reply
Gossford,

I'm really interested in your trader script for Ilithi primarily because of its ability to keep up with how much profit it makes per hour. I tested it out however, and I can't figure out how to get it to work. I do have Genie, and while it will work the trading part, i have failed to figure out how to make it recieve the imputs into the Match part. If you would contact me I'd be greatly appreciated.

Nlia Malem.
Reply Reply
Re: Genie II Illithi script. on 05/25/2006 10:33 AM CDT
Links-arrows 3
Reply Reply
script was written well over 6 months ago some game messaging may have changed

Action SetVariable Cost_of_Goods 0 when You still have another contract
Action setvariable Cost_of_Goods $1 when owed to this guild, for a total of (\d+) (from minister when you get a contract)
Action SetVariable Gross_Profit $1 when these goods are currently worth (\d+) (when you read a contract)


that is how the script fill some of the variables when you get a contract from minister or read a contract
Reply Reply
Re: Genie II Illithi script. on 05/25/2006 10:50 AM CDT
Links-arrows 4
Reply Reply
Actually I don't use matches at all in this script. they end up making things comlicated and make sub routines confusing

This

action match Steal_Attempts add 1 when You glance down and catch (\w+) in the act of trying to pick your pocket
Action put #echo log3 Steal Attempt from $1 when You glance down and catch (\w+) in the act of trying to pick your pocket
Action match Steal_Attempts add 1 when your pouch seems suddenly heavier for a moment

should be

action math Steal_Attempts add 1 when You glance down and catch (\w+) in the act of trying to pick your pocket
Action put #echo log3 Steal Attempt from $1 when You glance down and catch (\w+) in the act of trying to pick your pocket
Action math Steal_Attempts add 1 when your pouch seems suddenly heavier for a moment
Reply Reply
Re: Genie II Illithi script. on 05/25/2006 10:52 AM CDT
Links-arrows 5
Reply Reply
may also want to run it in debug mode a while. Select script -> debug. I would recomend some pc horsepower for debug mode on this script.
Reply Reply
Re: Genie II Illithi script. on 05/25/2006 10:55 AM CDT
Links-arrows 6
Reply Reply
script was written well over 6 months ago some game messaging may have changed
Action SetVariable Cost_of_Goods 0 when You still have another contract
Action setvariable Cost_of_Goods $1 when owed to this guild, for a total of (\d+) (from minister when you get a contract)
Action SetVariable Gross_Profit $1 when these goods are currently worth (\d+) (when you read a contract)
that is how the script fill some of the variables when you get a contract from minister or read a contract
[\table]
Wouldn't you then have to do a math function?
action put #math Gross_Profit subtract %Cost_of_Goods when these goods are currently worth
Strangeguard Prayermaster
Reply Reply
Re: Genie II Illithi script. on 05/25/2006 11:06 AM CDT
Links-arrows 7
Reply Reply
most of the math is done in subroutines with the variables that are filled with the Action triggers.

Math_Sub:
put #echo Familiar

put #echo Familiar Cost Last Contract = %Cost_of_Goods
put #echo Familiar Value Last Contract = %Gross_Profit


Setvariable Net_Profit %Gross_Profit
Math Net_Profit subtract %Cost_of_Goods
put #echo Familiar Profit Last Contract = %Net_Profit
put #echo Familiar

Math Total_Cost_of_Goods add %Cost_of_Goods
put #echo Familiar Total acumulative Contract Cost = %Total_Cost_of_Goods

Math Total_Profit add %Gross_Profit
put #echo Familiar Total acumulative Gross Profit = %Total_Profit

Math Total_Net_Profit add %Net_Profit
put #echo Familiar Total acumulative Net Profit = %Total_Net_Profit
put #echo Familiar Total Number of Contracts = %Total_Contracts


gosub Profit_Hour_Sub


Setvariable Cost_of_Goods 0
Setvariable Gross_Profit 0
Setvariable Net_Profit 0


Return

Profit_Hour_Sub:
setvariable minutes %t
setvariable Plat_Per_Hour %Total_Net_Profit
math minutes divide 60
setvariable hours %t
math hours divide 3600
Math Plat_Per_Hour divide %hours
Math Plat_Per_Hour divide 10000
put #echo log3 %hours Hours
put #echo log3 %Plat_Per_Hour Plats per hour

setvariable Plat_Per_Hour 0
return
Reply Reply
Re: Genie II Illithi script. on 05/25/2006 11:56 AM CDT
Links-arrows 8
Reply Reply
It works for me.

[12:59] 28.2374999999999 Plats per hour
[13:05] 0.175277777777778 Hours
[13:05] 28.3732488114104 Plats per hour
[13:07] 0.194444444444444 Hours
[13:07] 26.5119428571429 Plats per hour

Cost Last Contract = 909
Value Last Contract = 2472
Profit Last Contract = 1563

Total acumulative Contract Cost = 22496
Total acumulative Gross Profit = 75610
Total acumulative Net Profit = 53114
Total Number of Contracts = 6


[13:09] Contracts to Fayrin's Rest = 3
[13:09] Contracts to Steelclaw Clan = 1
[13:09] Contracts to Shard = 0
[13:09] Contracts to Darkling Wood = 2
[13:09]

[13:09] Steal Attempts = 0
Reply Reply
Re: Genie II Illithi script. on 05/25/2006 10:17 PM CDT
Links-arrows 9
Reply Reply
Got it working Gossford thanks a bunch! Very nice script.

Nlia
Reply Reply