just set your characters in changeCHAR macro
the default number of char is 5, just edit the macro if you want to add
this code is not mine, thanks to the persons who make the code you know who you are if you are reading this.
i just added change character
Code: Select all
######AUTOMACROS#########
automacro MOVEtoALBERTA {
location not alberta
call {
do move alberta
}
timeout 60
}
#START THE QUEST
automacro STARTQUEST {
console /Your Coordinates:/
location alberta
call PORTNPC
timeout 5
}
#END TALKING TO MIMIC
automacro ENDmimic1 {
console /before it changes its mind/
call PORTNPC
timeout 5
}
automacro ENDmimic2 {
console /have already moved/
call PORTNPC
timeout 5
}
# TALK TO MIMIC AGAIN
automacro RETALKmimic {
location alberta
console /Deadly Cargo (.*) That/
call retalkMIMIC
timeout 0
}
#go to mimic
automacro MIMIC1-a {
console /recognize the first crate/
call {
$mimic = first
call talkMIMIC
}
timeout 5
}
automacro MIMIC1-b {
console /get me the first crate/
call {
$mimic = first
call talkMIMIC
}
timeout 5
}
automacro MIMIC2-a {
console /retrieve the second crate/
call {
$mimic = second
call talkMIMIC
}
timeout 5
}
automacro MIMIC2-b {
console /get me the second crate/
call {
$mimic = second
call talkMIMIC
}
timeout 5
}
automacro MIMIC3-a {
console /third crate should be with/
call {
$mimic = third
call talkMIMIC
}
timeout 5
}
automacro MIMIC4-a {
console /get me the fourth crate/
call {
$mimic = fourth
call talkMIMIC
}
timeout 5
}
automacro MIMIC5-a {
console /find the fifth crate/
call {
$mimic = fifth
call talkMIMIC
}
timeout 5
}
automacro MIMIC6-a {
console /sixth create has been found/
call {
$mimic = sixth
call talkMIMIC
}
timeout 5
}
automacro MIMIC6-b {
console /our wounded scouts have reported/
call {
$mimic = sixth
call talkMIMIC
}
timeout 5
}
#QUEST FINISH CHANGING CONFIG
automacro FINISHa {
console /already did work for today/
call changeCHAR
timeout 5
}
automacro FINISHb {
console /come back 20 hours/
call changeCHAR
timeout 5
}
#######MACROS###########
macro PORTNPC {
$x = @random ("94","95","96","97","98")
$y = @random ("60","61","62","63","64")
do move alberta $x $y
do talknpc 90 62 c r0 n
}
macro talkMIMIC {
if ($mimic == first) goto mimic1
if ($mimic == second) goto mimic2
if ($mimic == third) goto mimic3
if ($mimic == fourth) goto mimic4
if ($mimic == fifth) goto mimic5
if ($mimic == sixth) goto mimic6
stop
:mimic1
$x = @random ("187","188","189","190","191")
$y = @random ("164","165","166","167","168")
do move $x $y
do talknpc 188 173 c n
stop
:mimic2
$x = @random ("224","225","226","227","228")
$y = @random ("102","103","104","105","106")
do move $x $y
do talknpc 232 104 c n
stop
:mimic3
$x = @random ("238","239","240","241","242")
$y = @random ("88","89","90","91","92")
do move $x $y
do talknpc 246 87 c n
stop
:mimic4
$x = @random ("238","239","240","241","242")
$y = @random ("64","65","66","67","68")
do move $x $y
do talknpc 245 67 c n
stop
:mimic5
$x = @random ("235","236","237","238","239")
$y = @random ("40","41","42","43","44")
do move $x $y
do talknpc 243 43 c n
stop
:mimic6
$x = @random ("114","115","116","117","118")
$y = @random ("215","216","217","218","219")
do move $x $y
do talknpc 123 221 c n
stop
}
macro retalkMIMIC {
$num = $.lastMatch1
goto mimic
stop
:mimic
if ($num == [1]#:) goto retalk1
if ($num == [2]#:) goto retalk2
if ($num == [3]#:) goto retalk3
if ($num == [4]#:) goto retalk4
if ($num == [5]#:) goto retalk5
stop
:retalk1
do talknpc 188 173 c n
stop
:retalk2
do talknpc 232 104 c n
stop
:retalk3
do talknpc 246 87 c n
stop
:retalk4
do talknpc 245 67 c n
stop
:retalk5
do talknpc 243 43 c n
stop
:retalk6
do talknpc 123 221 c n
stop
}
macro changeCHAR {
$uname1 = yourusername
$pword1 = yourpassword
$slot1 = yourcharslot#
$uname2 = yourusername
$pword2 = yourpassword
$slot2 = yourcharslot#
$uname3 = yourusername
$pword3 = yourpassword
$slot3 = yourcharslot#
$uname4 = yourusername
$pword4 = yourpassword
$slot4 = yourcharslot#
$uname5 = yourusername
$pword5 = yourpassword
$slot5 = yourcharslot#
goto char
stop
:char
if (($uname1 == @config(username)) && ($pword1 == @config(password)) && ($slot1 == @config(char))) goto secondchar
if (($uname2 == @config(username)) && ($pword2 == @config(password)) && ($slot2 == @config(char))) goto thirdchar
if (($uname3 == @config(username)) && ($pword3 == @config(password)) && ($slot3 == @config(char))) goto fourthchar
if (($uname4 == @config(username)) && ($pword4 == @config(password)) && ($slot4 == @config(char))) goto fifthchar
if (($uname5 == @config(username)) && ($pword5 == @config(password)) && ($slot5 == @config(char))) goto firstchar
stop
:secondchar
do conf username $uname2
do conf password $pword2
do conf char $slot2
do relog 5
stop
:thirdchar
do conf username $uname3
do conf password $pword3
do conf char $slot3
do relog 5
stop
:fourthchar
do conf username $uname4
do conf password $pword4
do conf char $slot4
do relog 5
stop
:fifthchar
do conf username $uname5
do conf password $pword5
do conf char $slot5
do relog 5
stop
:firstchar
do conf username $uname1
do conf password $pword1
do conf char $slot1
do relog 5
stop
}
this one is for single account but multiple char
Code: Select all
macro changeCHAR {
$slot0 = 0
$slot1 = 1
$slot2 = 2
$slot3 = 3
goto char
stop
:char
if ($slot0 == @config(char)) goto char2
if ($slot1 == @config(char)) goto char3
if ($slot2 == @config(char)) goto char4
if ($slot3 == @config(char)) goto char1
stop
:char2
do conf char $slot1
do autostorage
stop
:char3
do conf char $slot2
do autostorage
stop
:char4
do conf char $slot3
do autostorage
stop
:char1
do conf char $slot0
do autostorage
stop
}