it works on me ... is there any risk when using it ? because when i tried, it always fail 3-4 times until it got the right one ...glennlevi wrote:Rejoice! I have found out what was wrong with mortimal's code!
automacro XYY{
console /.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+and\s+.?(tên|elêvên|twêlve|thïrtêên|föûrtêên|fïftêên|sïxtêên|sêvêntêên|eïghtêên|nïnêtêên|ten|eleven|twelve|thirteen|fourteen|fifteen|sixteen|seventeen|eighteen|nineteen).?\s*$/i
call XYY
}
macro XYY{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$pt = @eval({"ten" => 10,"eleven" => 11,"twelve" => 12,"thirteen" => 13,"fourteen" => 14,"fifteen" => 15,"sixteen" => 16,"seventeen" => 17,"eighteen" => 18,"nineteen" => 19,"tên" => 10,"elêvên" => 11,"twêlve" => 12,"thïrtêên" => 13,"föûrtêên" => 14,"fïftêên" => 15,"sïxtêên" => 16,"sêvêntêên" => 17,"eïghtêên" => 18,"nïnêtêên" => 19}->{"$.lastMatch2"})
$res = @eval($h + $pt)
log $res
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro XXX{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+and\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call XXX
}
macro XXX{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch2"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch3"})
$res = @eval($h + $t + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X0X{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+and\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call X0X
}
macro X0X{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch2"})
$res = @eval($h + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro XX0{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+and\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s*$/i
call XX0
}
macro XX0{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch2"})
$res = @eval($h + $t)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X00{
console /^^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred(\s+and)?\s*$/i
call X00
}
macro X00{
[
$res = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
do talk num $res
}
automacro XX{
console /^.*:\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call XX
}
macro XX{
[
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch1"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch2"})
$res = @eval($t + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro YY{
console /^.*:\s+.?(tên|elêvên|twêlve|thïrtêên|föûrtêên|fïftêên|sïxtêên|sêvêntêên|eïghtêên|nïnêtêên|ten|eleven|twelve|thirteen|fourteen|fifteen|sixteen|seventeen|eighteen|nineteen).?\s*$/i
call YY
}
macro YY{
[
$res = @eval({"ten" => 10,"eleven" => 11,"twelve" => 12,"thirteen" => 13,"fourteen" => 14,"fifteen" => 15,"sixteen" => 16,"seventeen" => 17,"eighteen" => 18,"nineteen" => 19,"tên" => 10,"elêvên" => 11,"twêlve" => 12,"thïrtêên" => 13,"föûrtêên" => 14,"fïftêên" => 15,"sïxtêên" => 16,"sêvêntêên" => 17,"eïghtêên" => 18,"nïnêtêên" => 19}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X0{
console /^.*:\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s*$/i
call X0
}
macro X0{
[
$res = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call X
}
macro X{
[
$res = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
It cannot answer numbers in hundreds because of "\s+and" << this line. When the police asks you the question, it says (one hundred forty five, two hundred sixty one, etc.) and not (one hundred and forty five, two hundred and sixty one, etc). So just remove the quoted line above and then the macro will work ^_^
Also, here's the monster talk if you havent found it yet:
automacro antiBotMonTalk {
console /^\[Guild\] .*: .*\s(\d+)\s.*$/
overrideAI 1
priority 1
call aBMT
}
macro aBMT {
pause 5
do talk num $.lastMatch1
release all
}
So for everyone out there with 3 botkillers (monster talk, word numbers, image numbers), we only got one thing left to fix>> image numbers or botkillerASCII. (this is the hardest method actually, since you need to manually input numbers, and your server can have as many diff type of numbers they want, or they can even change it periodically.
Ok so next up,... does anyone know how to make a macro that automatically types a set number when botkillerASCII is asked? Im trying but I dont know what conditions I can put for this to trigger. Thanks.
responseOnASCIInumber.pl #for response BotKiller(ASCII)
Moderators: Moderators, Documentation Writers
-
alksl23
- Noob
- Posts: 5
- Joined: 12 Apr 2012, 17:39
- Noob?: No
Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)
-
glennlevi
- Plain Yogurt
- Posts: 58
- Joined: 19 May 2011, 00:40
- Noob?: Yes
Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)
Which one, the monster talk or the word numbers?
Did you do as I said and removed the quoted line?
Here it is if you havent removed it yet:
automacro XYY{
console /.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(tên|elêvên|twêlve|thïrtêên|föûrtêên|fïftêên|sïxtêên|sêvêntêên|eïghtêên|nïnêtêên|ten|eleven|twelve|thirteen|fourteen|fifteen|sixteen|seventeen|eighteen|nineteen).?\s*$/i
call XYY
}
macro XYY{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$pt = @eval({"ten" => 10,"eleven" => 11,"twelve" => 12,"thirteen" => 13,"fourteen" => 14,"fifteen" => 15,"sixteen" => 16,"seventeen" => 17,"eighteen" => 18,"nineteen" => 19,"tên" => 10,"elêvên" => 11,"twêlve" => 12,"thïrtêên" => 13,"föûrtêên" => 14,"fïftêên" => 15,"sïxtêên" => 16,"sêvêntêên" => 17,"eïghtêên" => 18,"nïnêtêên" => 19}->{"$.lastMatch2"})
$res = @eval($h + $pt)
log $res
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro XXX{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call XXX
}
macro XXX{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch2"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch3"})
$res = @eval($h + $t + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X0X{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call X0X
}
macro X0X{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch2"})
$res = @eval($h + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro XX0{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s*$/i
call XX0
}
macro XX0{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch2"})
$res = @eval($h + $t)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X00{
console /^^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?(\s+Hundred)?\s*$/i
call X00
}
macro X00{
[
$res = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
do talk num $res
}
automacro XX{
console /^.*:\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call XX
}
macro XX{
[
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch1"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch2"})
$res = @eval($t + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro YY{
console /^.*:\s+.?(tên|elêvên|twêlve|thïrtêên|föûrtêên|fïftêên|sïxtêên|sêvêntêên|eïghtêên|nïnêtêên|ten|eleven|twelve|thirteen|fourteen|fifteen|sixteen|seventeen|eighteen|nineteen).?\s*$/i
call YY
}
macro YY{
[
$res = @eval({"ten" => 10,"eleven" => 11,"twelve" => 12,"thirteen" => 13,"fourteen" => 14,"fifteen" => 15,"sixteen" => 16,"seventeen" => 17,"eighteen" => 18,"nineteen" => 19,"tên" => 10,"elêvên" => 11,"twêlve" => 12,"thïrtêên" => 13,"föûrtêên" => 14,"fïftêên" => 15,"sïxtêên" => 16,"sêvêntêên" => 17,"eïghtêên" => 18,"nïnêtêên" => 19}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X0{
console /^.*:\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s*$/i
call X0
}
macro X0{
[
$res = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call X
}
macro X{
[
$res = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
Also, try observing the question that the police asks you... Is it like:
yone hundred sêvênty nïne
or
yone hundred and sêvênty nïne
If it's the one with "and", then you dont need to remove the quoted part I mentioned earlier.
If your having troubles with monster talk, then I dont know whats wrong because the macro for that is working 100% on mine.
If your talking about the image numbers, well, only way to get pass that is having all the input numbers from server with the plugin given in this thread. If you dont have your server numbers, naturally it wont type anything.
Did you do as I said and removed the quoted line?
Here it is if you havent removed it yet:
automacro XYY{
console /.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(tên|elêvên|twêlve|thïrtêên|föûrtêên|fïftêên|sïxtêên|sêvêntêên|eïghtêên|nïnêtêên|ten|eleven|twelve|thirteen|fourteen|fifteen|sixteen|seventeen|eighteen|nineteen).?\s*$/i
call XYY
}
macro XYY{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$pt = @eval({"ten" => 10,"eleven" => 11,"twelve" => 12,"thirteen" => 13,"fourteen" => 14,"fifteen" => 15,"sixteen" => 16,"seventeen" => 17,"eighteen" => 18,"nineteen" => 19,"tên" => 10,"elêvên" => 11,"twêlve" => 12,"thïrtêên" => 13,"föûrtêên" => 14,"fïftêên" => 15,"sïxtêên" => 16,"sêvêntêên" => 17,"eïghtêên" => 18,"nïnêtêên" => 19}->{"$.lastMatch2"})
$res = @eval($h + $pt)
log $res
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro XXX{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call XXX
}
macro XXX{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch2"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch3"})
$res = @eval($h + $t + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X0X{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call X0X
}
macro X0X{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch2"})
$res = @eval($h + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro XX0{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s*$/i
call XX0
}
macro XX0{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch2"})
$res = @eval($h + $t)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X00{
console /^^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?(\s+Hundred)?\s*$/i
call X00
}
macro X00{
[
$res = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
do talk num $res
}
automacro XX{
console /^.*:\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call XX
}
macro XX{
[
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch1"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch2"})
$res = @eval($t + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro YY{
console /^.*:\s+.?(tên|elêvên|twêlve|thïrtêên|föûrtêên|fïftêên|sïxtêên|sêvêntêên|eïghtêên|nïnêtêên|ten|eleven|twelve|thirteen|fourteen|fifteen|sixteen|seventeen|eighteen|nineteen).?\s*$/i
call YY
}
macro YY{
[
$res = @eval({"ten" => 10,"eleven" => 11,"twelve" => 12,"thirteen" => 13,"fourteen" => 14,"fifteen" => 15,"sixteen" => 16,"seventeen" => 17,"eighteen" => 18,"nineteen" => 19,"tên" => 10,"elêvên" => 11,"twêlve" => 12,"thïrtêên" => 13,"föûrtêên" => 14,"fïftêên" => 15,"sïxtêên" => 16,"sêvêntêên" => 17,"eïghtêên" => 18,"nïnêtêên" => 19}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X0{
console /^.*:\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s*$/i
call X0
}
macro X0{
[
$res = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call X
}
macro X{
[
$res = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
Also, try observing the question that the police asks you... Is it like:
yone hundred sêvênty nïne
or
yone hundred and sêvênty nïne
If it's the one with "and", then you dont need to remove the quoted part I mentioned earlier.
If your having troubles with monster talk, then I dont know whats wrong because the macro for that is working 100% on mine.
If your talking about the image numbers, well, only way to get pass that is having all the input numbers from server with the plugin given in this thread. If you dont have your server numbers, naturally it wont type anything.
-
alksl23
- Noob
- Posts: 5
- Joined: 12 Apr 2012, 17:39
- Noob?: No
Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)
@glennlevi nice .. it works on monster talk and word numbers ... so is there a way to skip the image numbers question ?
-
glennlevi
- Plain Yogurt
- Posts: 58
- Joined: 19 May 2011, 00:40
- Noob?: Yes
Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)
Idk, I still cant figure out how to trigger automacro...alksl23 wrote:@glennlevi nice .. it works on monster talk and word numbers ... so is there a way to skip the image numbers question ?
It should go something like this:
automacro typeRandomNum {
(IDK what condition to put)
call type332
timeout 5
}
macro type332 {
do talk num 332
}
BTW, do any of you guys have a macro to reenter gold room when pk'd?
Our goldroom has a fakename antibot, already got passed that but my problem is I cant figure out what npctalk sequence is needed for it to talk resp 0.
I already tried talk npc (x) (y) c r0 n
But it doesnt work...
I forgot to ask, what server do you play?
-
alksl23
- Noob
- Posts: 5
- Joined: 12 Apr 2012, 17:39
- Noob?: No
Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)
@glennlevi my current server is zetaRO ... i'm not really good on triggering macro's , i'm just searching a way to bot on zetaRO ... and btw.. i noticed that on word numbers sometimes it gives a wrong answer ...
-
glennlevi
- Plain Yogurt
- Posts: 58
- Joined: 19 May 2011, 00:40
- Noob?: Yes
Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)
I bot on zeta too. XD.alksl23 wrote:@glennlevi my current server is zetaRO ... i'm not really good on triggering macro's , i'm just searching a way to bot on zetaRO ... and btw.. i noticed that on word numbers sometimes it gives a wrong answer ...
For me both are working perfectly.
Right now though I made a macro to play an alert sound everytime the police pops out. Then I just input the numbers manually when I hear the alert XD.
BTW do you use wiz char to bot? I set my auto teleport to chat command, but most of the time my character still teleports while the police is asking it questions. I just got my main account banned for 12 hours last night XD
-
alksl23
- Noob
- Posts: 5
- Joined: 12 Apr 2012, 17:39
- Noob?: No
Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)
@glennlevi oh.. i don't use chat commands on teleport ... i prefer using creamy card to use teleport skill so i can still manage to teleport even i get hit or hit someone ... Can i copy your macro that makes an alert sound when the police bot appear 
-
bahuka
- Noob
- Posts: 2
- Joined: 18 Oct 2010, 05:54
- Noob?: Yes
Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)
can you share your bot sir??? T_T
-
nicko1234
- Noob
- Posts: 1
- Joined: 31 Mar 2012, 06:42
- Noob?: Yes
Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)
Sir i am Zeta RO player to i have some question where will i put this?
automacro XYY{
console /.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(tên|elêvên|twêlve|thïrtêên|föûrtêên|fïftêên|sïxtêên|sêvêntêên|eïghtêên|nïnêtêên|ten|eleven|twelve|thirteen|fourteen|fifteen|sixteen|seventeen|eighteen|nineteen).?\s*$/i
call XYY
}
macro XYY{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$pt = @eval({"ten" => 10,"eleven" => 11,"twelve" => 12,"thirteen" => 13,"fourteen" => 14,"fifteen" => 15,"sixteen" => 16,"seventeen" => 17,"eighteen" => 18,"nineteen" => 19,"tên" => 10,"elêvên" => 11,"twêlve" => 12,"thïrtêên" => 13,"föûrtêên" => 14,"fïftêên" => 15,"sïxtêên" => 16,"sêvêntêên" => 17,"eïghtêên" => 18,"nïnêtêên" => 19}->{"$.lastMatch2"})
$res = @eval($h + $pt)
log $res
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro XXX{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call XXX
}
macro XXX{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch2"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch3"})
$res = @eval($h + $t + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X0X{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call X0X
}
macro X0X{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch2"})
$res = @eval($h + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro XX0{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s*$/i
call XX0
}
macro XX0{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch2"})
$res = @eval($h + $t)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X00{
console /^^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?(\s+Hundred)?\s*$/i
call X00
}
macro X00{
[
$res = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
do talk num $res
}
automacro XX{
console /^.*:\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call XX
}
macro XX{
[
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch1"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch2"})
$res = @eval($t + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro YY{
console /^.*:\s+.?(tên|elêvên|twêlve|thïrtêên|föûrtêên|fïftêên|sïxtêên|sêvêntêên|eïghtêên|nïnêtêên|ten|eleven|twelve|thirteen|fourteen|fifteen|sixteen|seventeen|eighteen|nineteen).?\s*$/i
call YY
}
macro YY{
[
$res = @eval({"ten" => 10,"eleven" => 11,"twelve" => 12,"thirteen" => 13,"fourteen" => 14,"fifteen" => 15,"sixteen" => 16,"seventeen" => 17,"eighteen" => 18,"nineteen" => 19,"tên" => 10,"elêvên" => 11,"twêlve" => 12,"thïrtêên" => 13,"föûrtêên" => 14,"fïftêên" => 15,"sïxtêên" => 16,"sêvêntêên" => 17,"eïghtêên" => 18,"nïnêtêên" => 19}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X0{
console /^.*:\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s*$/i
call X0
}
macro X0{
[
$res = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call X
}
macro X{
[
$res = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
THANKS
automacro XYY{
console /.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(tên|elêvên|twêlve|thïrtêên|föûrtêên|fïftêên|sïxtêên|sêvêntêên|eïghtêên|nïnêtêên|ten|eleven|twelve|thirteen|fourteen|fifteen|sixteen|seventeen|eighteen|nineteen).?\s*$/i
call XYY
}
macro XYY{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$pt = @eval({"ten" => 10,"eleven" => 11,"twelve" => 12,"thirteen" => 13,"fourteen" => 14,"fifteen" => 15,"sixteen" => 16,"seventeen" => 17,"eighteen" => 18,"nineteen" => 19,"tên" => 10,"elêvên" => 11,"twêlve" => 12,"thïrtêên" => 13,"föûrtêên" => 14,"fïftêên" => 15,"sïxtêên" => 16,"sêvêntêên" => 17,"eïghtêên" => 18,"nïnêtêên" => 19}->{"$.lastMatch2"})
$res = @eval($h + $pt)
log $res
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro XXX{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call XXX
}
macro XXX{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch2"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch3"})
$res = @eval($h + $t + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X0X{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call X0X
}
macro X0X{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch2"})
$res = @eval($h + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro XX0{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s+Hundred\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s*$/i
call XX0
}
macro XX0{
[
$h = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch2"})
$res = @eval($h + $t)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X00{
console /^^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?(\s+Hundred)?\s*$/i
call X00
}
macro X00{
[
$res = @eval({"one" => 100,"two" => 200,"thrêe" => 300,"föûr" => 400,"fïve" => 500,"sïx" => 600,"sêvên" => 700,"eïght" => 800,"nïne" => 900,"three" => 300,"four" => 400,"five" => 500,"six" => 600,"seven" => 700,"eight" => 800,"nine" => 900}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
do talk num $res
}
automacro XX{
console /^.*:\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call XX
}
macro XX{
[
$t = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch1"})
$o = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch2"})
$res = @eval($t + $o)
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro YY{
console /^.*:\s+.?(tên|elêvên|twêlve|thïrtêên|föûrtêên|fïftêên|sïxtêên|sêvêntêên|eïghtêên|nïnêtêên|ten|eleven|twelve|thirteen|fourteen|fifteen|sixteen|seventeen|eighteen|nineteen).?\s*$/i
call YY
}
macro YY{
[
$res = @eval({"ten" => 10,"eleven" => 11,"twelve" => 12,"thirteen" => 13,"fourteen" => 14,"fifteen" => 15,"sixteen" => 16,"seventeen" => 17,"eighteen" => 18,"nineteen" => 19,"tên" => 10,"elêvên" => 11,"twêlve" => 12,"thïrtêên" => 13,"föûrtêên" => 14,"fïftêên" => 15,"sïxtêên" => 16,"sêvêntêên" => 17,"eïghtêên" => 18,"nïnêtêên" => 19}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X0{
console /^.*:\s+.?(twênty|thïrty|förty|fïfty|sïxty|sêvêntÿ|eightÿ|ninêtÿ|twenty|thirty|forty|fifty|sixty|seventy|eighty|ninety).?\s*$/i
call X0
}
macro X0{
[
$res = @eval({"twenty" => 20,"thirty" => 30,"forty" => 40,"fifty" => 50,"sixty" => 60,"seventy" => 70,"eighty" => 80,"ninety" => 90,"twênty" => 20,"thïrty" => 30,"förty" => 40,"fïfty" => 50,"sïxty" => 60,"sêvêntÿ" => 70,"eightÿ" => 80,"ninêtÿ" => 90}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
automacro X{
console /^.*:\s+.?(one|two|thrêe|föûr|fïve|sïx|sêvên|eïght|nïne|one|two|three|four|five|six|seven|eight|nine).?\s*$/i
call X
}
macro X{
[
$res = @eval({"one" => 1,"two" => 2,"thrêe" => 3,"föûr" => 4,"fïve" => 5,"sïx" => 6,"sêvên" => 7,"eïght" => 8,"nïne" => 9,"three" => 3,"four" => 4,"five" => 5,"six" => 6,"seven" => 7,"eight" => 8,"nine" => 9}->{"$.lastMatch1"})
]
log -o--o--o--o--o- $res -o--o--o--o--o-
pause 5
do talk num $res
}
THANKS
-
Wabisuke
- Noob
- Posts: 2
- Joined: 20 Mar 2012, 02:15
- Noob?: Yes
Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)
please tell me what bot you were using so that i can download it. it's not answering the monster talk but the word numbers were fine.glennlevi wrote:If your having troubles with monster talk, then I dont know whats wrong because the macro for that is working 100% on mine.
thanks for posting.