responseOnASCIInumber.pl #for response BotKiller(ASCII)

All resolved question will be found here. It is recommended that you browse / search through this section first and see if your question has been answered before

Moderators: Moderators, Documentation Writers

arievartsoul
Noob
Noob
Posts: 4
Joined: 07 Mar 2011, 02:14
Noob?: Yes

Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)

#441 Post by arievartsoul »

please some one help me with my config:

reactOnNPC talk num @eval(my $numerotxt = #2~1;my $answer;switch ($numerotxt) { case /one hundred/ {$answer=1} case /two hundred/ {$answer=2} case /tree hundred/ {$answer=3} case /four hundred/ {$answer=4} case /five hundred/ {$answer=5} case /six hundred/ {$answer=6} case /seven hundred/ {$answer=7} case /eight hundred/ {$answer=8} case /nine hundred/ {$answer=9} case /thrêe hundred/ {$answer=3} case /föûr hundred/ {$answer=4} case /fïve hundred/ {$answer=5} case /sïx hundred/ {$answer=6} case /sêvên hundred/ {$answer=7} case /eïght hundred/ {$answer=8} case /nïne hundred/ {$answer=9}}switch ($numerotxt) { case /ten/ {$answer.=1} case /twenty/ {$answer.=2} case /thirty/ {$answer.=3} case /forty/ {$answer.=4} case /fifty/ {$answer.=5} case /sixty/ {$answer.=6} case /seventy/ {$answer.=7} case /eighty/ {$answer.=8} case /ninety/ {$answer.=9} else {$answer.=0}}switch ($numerotxt) { case /one/ {$answer.=1} case /two/ {$answer.=2} case /tree/ {$answer.=3} case /four/ {$answer.=4} case /five/ {$answer.=5} case /six/ {$answer.=6} case /seven/ {$answer.=7} case /eight/ {$answer.=8} case /nine/ {$answer.=9} else {$answer.=0} { case /tên/ {$answer.=1} case /twênty/ {$answer.=2} case /thïrty/ {$answer.=3} case /förty/ {$answer.=4} case /fïfty/ {$answer.=5} case /sïxty/ {$answer.=6} case /sêvêntÿ/ {$answer.=7} case /eightÿ/ {$answer.=8} case /ninêtÿ/ {$answer.=9} else {$answer.=0}}switch ($numerotxt) { case /thrêe/ {$answer.=3} case /föûr/ {$answer.=4} case /fïve/ {$answer.=5} case /sïx/ {$answer.=6} case /sêvên/ {$answer.=7} case /eïght/ {$answer.=8} case /nïne/ {$answer.=9} else {$answer.=0}}return $answer;)
type number
msg_0 [Police]
msg_1 Input this number:
msg_2 /(\w+)/
}

my console:

[Jun 14 13:27:49 2011.84] Unknown #110017229: [Police]
[Jun 14 13:27:49 2011.85] [reactOnNPC] NPC message saved (2): "[^0000FFPolice^000000]".
[Jun 14 13:27:49 2011.86] [Convert NPC message] to : ########
[Jun 14 13:27:49 2011.87] Unknown #110017229: Input this number:
[Jun 14 13:27:49 2011.88] [reactOnNPC] NPC message saved (3): "Input this number:".
[Jun 14 13:27:49 2011.89] [Convert NPC message] to : ##################
[Jun 14 13:27:49 2011.90] Unknown #110017229: btwod Hundred sïx
[Jun 14 13:27:49 2011.91] [reactOnNPC] NPC message saved (4): "^5DB73F^8D4C72btwod ^BE4C33Hundred ^404A7C^5A6983sïx^000000".
[Jun 14 13:27:49 2011.92] [Convert NPC message] to : #################
[Jun 14 13:27:49 2011.93] Unknown #110017229:
[Jun 14 13:27:49 2011.94] [reactOnNPC] NPC message saved (5): " ".
[Jun 14 13:27:49 2011.94] [Convert NPC message] to : #
[Jun 14 13:27:49 2011.95] Unknown #110017229: one of fïve
[Jun 14 13:27:49 2011.96] [reactOnNPC] NPC message saved (6): "^97C085^A0B31Fone^000000 of ^5F7C27fïve^000000".
[Jun 14 13:27:49 2011.97] [Convert NPC message] to : ###########
[Jun 14 13:27:49 2011.98] Unknown #110017229: ninêtÿ seconds to respond
[Jun 14 13:27:49 2011.99] [reactOnNPC] NPC message saved (7): "^A49026 ^03C503^904843ninêtÿ ^65B502^000000^AA4FB4 seconds to respond".
[Jun 14 13:27:50 2011.66] [Convert NPC message] to : ###########################
[Jun 14 13:27:50 2011.16] Unknown #110017229: Secara otomatis melanjutkan pembicaraan
[Jun 14 13:27:50 2011.25] [reactOnNPC] onNPCAction type is: continue.
[Jun 14 13:27:50 2011.34] [reactOnNPC] Conditions for reactOnNPC_0 not met.
[Jun 14 13:27:50 2011.63] Monster Disappeared: Mantis (2)
[Jun 14 13:27:50 2011.73] Monster Moved: Baphomet Jr (1) - (128, 179) -> (136, 181)
[Jun 14 13:27:50 2011.22] [jarak=1] Monster Mantis (12): *...*
[Jun 14 13:27:50 2011.23] Melakukan Teleport setelah menyerang monster 1 kali
[Jun 14 13:27:50 2011.24] [100/100] You use Storm Gust (Lv: 10) on Monster Baphomet Jr (1) (Dmg: 16449)
[Jun 14 13:27:50 2011.25] Exp: 2059814816
[Jun 14 13:27:50 2011.26] Job Exp: 328892871
[Jun 14 13:27:50 2011.26] Mendapatkan Exp: 0/0 (0.00%/0.00%)
[Jun 14 13:27:50 2011.28] Item ditambahkan dalam inventory: Yggdrasilberry (3) x 1 - Usable
[Jun 14 13:27:50 2011.30] Monster Died: Baphomet Jr (1)
[Jun 14 13:27:50 2011.31] Muncul Item : Boots (56) x 1 (131, 180)
[Jun 14 13:27:50 2011.32] Muncul Item : Yellow Herb (57) x 1 (131, 180)
[Jun 14 13:27:50 2011.33] Muncul Item : Yggdrasil Leaf (58) x 1 (132, 182)
[Jun 14 13:27:50 2011.34] Muncul Item : Hallberd [2] (59) x 1 (130, 181)
[Jun 14 13:27:50 2011.35] Muncul Item : Oridecon (60) x 1 (132, 181)
[Jun 14 13:27:50 2011.36] Muncul Item : Evil Horn (61) x 1 (132, 182)
[Jun 14 13:27:50 2011.37] Tidak ada LOS dari prt_maze03 (142,182) ke Tujuan Akhir di (178,52).
[Jun 14 13:27:50 2011.38] Cannot reach (178,52) from current position.
[Jun 14 13:27:50 2011.39] Menyerang: Monster Baphomet Jr (13)
[Jun 14 13:27:50 2011.40] Terdapat NPC : Unknown #110017229 (142, 182) (ID 110017229) - (0)
[Jun 14 13:27:50 2011.41] Unknown #110017229: Ketik 'talk num <nomor #>' untuk memasukkan nomor.
[Jun 14 13:27:50 2011.42] [reactOnNPC] onNPCAction type is: number.
[Jun 14 13:27:50 2011.43] [reactOnNPC] Matching "[Police]" to "/.*/" (0)... [Jun 14 13:27:50 2011.44] regexp ok.
[Jun 14 13:27:50 2011.45] [reactOnNPC] Matching "Thank you for your time." to "/.*/" (1)... [Jun 14 13:27:50 2011.46] regexp ok.
[Jun 14 13:27:50 2011.47] [reactOnNPC] Matching "[Police]" to "/.*/" (2)... [Jun 14 13:27:50 2011.48] regexp ok.
[Jun 14 13:27:50 2011.49] [reactOnNPC] Matching "Input this number:" to "/.*/" (3)... [Jun 14 13:27:50 2011.50] regexp ok.
[Jun 14 13:27:50 2011.50] [reactOnNPC] Matching "btwod Hundred sïx" to "/.*/" (4)... [Jun 14 13:27:50 2011.52] regexp ok.
[Jun 14 13:27:50 2011.53] [reactOnNPC] Matching " " to "/.*/" (5)... [Jun 14 13:27:50 2011.54] regexp ok.
[Jun 14 13:27:50 2011.55] [reactOnNPC] Matching "one of fïve" to "/.*/" (6)... [Jun 14 13:27:50 2011.55] regexp ok.
[Jun 14 13:27:50 2011.58] [reactOnNPC] Reacting to NPC. Executing command "ASCIInumberKiller num".
[Jun 14 13:27:50 2011.59] [1] : ########
[Jun 14 13:27:50 2011.60] [2] : ############################
[Jun 14 13:27:50 2011.61] [3] : #
[Jun 14 13:27:50 2011.62] [4] : ##########################################
[Jun 14 13:27:50 2011.63] [5] : ######################
[Jun 14 13:27:50 2011.64] [6] : ########
[Jun 14 13:27:50 2011.65] [7] : #
[Jun 14 13:27:50 2011.66] [8] : ##############################################
[Jun 14 13:27:50 2011.67] [9] : #
[Jun 14 13:27:50 2011.68] [10] : ###############################
[Jun 14 13:27:50 2011.69] [11] : ########
[Jun 14 13:27:50 2011.70] [12] : ########################
[Jun 14 13:27:50 2011.71] [13] : ########
[Jun 14 13:27:50 2011.72] [14] : ##################
[Jun 14 13:27:50 2011.73] [15] : #################
[Jun 14 13:27:50 2011.73] [16] : #
[Jun 14 13:27:50 2011.74] [17] : ###########
[Jun 14 13:27:50 2011.75] [18] : ###########################
[Jun 14 13:27:50 2011.76] [ASCIInumber v2.2.1(fix)] Executing command "talk num ".
[Jun 14 13:27:50 2011.77] [ASCIInumber v2.2.1(fix)] *** Delay 1-3 sec. before talk num ***.
[Jun 14 13:27:53 2011.14] Error pada function 'talk num' (Respon pada NPC)
Anda harus menspesifikasikan sebuah nomor.
areevza
Noob
Noob
Posts: 1
Joined: 15 Jun 2011, 01:48
Noob?: Yes

Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)

#442 Post by areevza »

mortimal, I already using your macro that u share for hibari_kyoka
but it doesn't work..

this is my console:
[Jun 15 12:30:44 2011.62] Unknown #110017229: [Police]
[Jun 15 12:30:44 2011.73] [reactOnNPC] NPC message saved (0): "[^0000FFPolice^000000]".
[Jun 15 12:30:44 2011.81] [Convert NPC message] to : ########
[Jun 15 12:30:44 2011.90] Unknown #110017229: Input this number:
[Jun 15 12:30:44 2011.10] [reactOnNPC] NPC message saved (1): "Input this number:".
[Jun 15 12:30:44 2011.11] [Convert NPC message] to : ##################
[Jun 15 12:30:44 2011.12] Unknown #110017229: föûr Hundred elêvên
[Jun 15 12:30:44 2011.13] [reactOnNPC] NPC message saved (2): "^193F2C^759E44föûr ^61A6C8Hundred ^57662E^6F4184elêvên^000000".
[Jun 15 12:30:44 2011.14] [Convert NPC message] to : ###################
[Jun 15 12:30:44 2011.15] Unknown #110017229: thrêe of fïve
[Jun 15 12:30:44 2011.16] [reactOnNPC] NPC message saved (3): "^3ABA80^BC429Ethrêe^000000 of ^8A70ADfïve^000000".
[Jun 15 12:30:44 2011.17] [Convert NPC message] to : #############
[Jun 15 12:30:44 2011.18] Unknown #110017229:
[Jun 15 12:30:44 2011.19] [reactOnNPC] NPC message saved (4): " ".
[Jun 15 12:30:44 2011.20] [Convert NPC message] to : #
[Jun 15 12:30:44 2011.21] Unknown #110017229: thïrty föûr seconds to respond
[Jun 15 12:30:44 2011.22] [reactOnNPC] NPC message saved (5): "^AF1018 ^279443^A55086thïrty ^94C55Aföûr^000000^5E0533 seconds to respond".
[Jun 15 12:30:44 2011.23] [Convert NPC message] to : ###############################
[Jun 15 12:30:44 2011.24] Unknown #110017229: Secara otomatis melanjutkan pembicaraan
[Jun 15 12:30:44 2011.25] [reactOnNPC] onNPCAction type is: continue.
[Jun 15 12:30:44 2011.26] [reactOnNPC] Conditions for reactOnNPC_0 not met.
[Jun 15 12:30:44 2011.27] [jarak=9.8] Monster Baphomet Jr (7): *$!@#*
[Jun 15 12:30:44 2011.65] Monster Moved: Mantis (9) - (142, 141) -> (137, 141)
[Jun 15 12:30:44 2011.89] [jarak=6.4] Monster Baphomet Jr (0): *$!@#*
[Jun 15 12:30:45 2011.39] Monster Moved: Hunter Fly (1) - (139, 137) -> (148, 137)
[Jun 15 12:30:45 2011.40] Unknown #110017229: Ketik 'talk num <nomor #>' untuk memasukkan nomor.

the problem is:
macro not triggred
can anyone can fix it.. please help thanks..
asangongo10
Noob
Noob
Posts: 3
Joined: 29 Apr 2011, 11:34
Noob?: Yes

Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)

#443 Post by asangongo10 »

Mortimal wrote:kilzers03 and yammoo use these post.

ssmith use these:

Code: Select all

automacro antiBotMonTalk {
	console /^\[Guild\] .*: .*\s(\d+)\s.*$/
	overrideAI 1
	priority 1
	call aBMT
}

macro aBMT {
	pause 5
	do talk num $.lastMatch1
	release all
}

hibari_kyoya01 duno if it will work but try this:

Code: Select all

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
}

DONT FORGET AutoTalkCont 1
sir the code for the hundreds is not working =( , but for ones and tenths they are working =)

HOPING FOR HELP !
Nihao19
Noob
Noob
Posts: 1
Joined: 28 Jun 2011, 14:37
Noob?: Yes

Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)

#444 Post by Nihao19 »

Mortimal wrote:hibari_kyoya01 duno if it will work but try this:

Code: Select all

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
}

DONT FORGET AutoTalkCont 1
I tried to use this but unfortunately it doesnt work for me :(

Did I do something wrong?
I put the above block to my macros
And then I put the reactOnNPC.pl & responseOnASCIInumber.pl to the plug ins

And then the

#Use this when you need to answer a number
reactOnNPC ASCIInumberKiller num {
type number
msg_0 /.*/
msg_1 /.*/
msg_2 /.*/
msg_3 /.*/
}

#Use this when you need to answer a text
reactOnNPC ASCIInumberKiller text {
type text
msg_0 /.*/
msg_1 /.*/
msg_2 /.*/
msg_3 /.*/
}

ASCIInumberKiller {
lengthCharNumber 8
BgColor ^[D-Fd-f][A-Fa-f0-9][D-Fd-f][A-Fa-f0-9]{3}
}

To my config. (I have the same problem as Hibari)
kimjoshua99
Noob
Noob
Posts: 1
Joined: 22 Feb 2011, 07:37
Noob?: No

Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)

#445 Post by kimjoshua99 »

can i use this to a newer version of openkore?
Image
Image
Image
fretelo
Noob
Noob
Posts: 7
Joined: 03 Sep 2008, 15:44
Noob?: No

Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)

#446 Post by fretelo »

How about this botkiller ?

Image

What plugins and what color do i use, they're using different colors, and different style of numbers. I know their length , they are 8 right? and i know how to add more numbers,.

Thanks,
-Saint Seiya-
The Way Of Human
The Way Of Human
Posts: 183
Joined: 11 Apr 2008, 07:03

Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)

#447 Post by -Saint Seiya- »

getting the same errors as last few user, UTF error, cant use by new openkore?
Mortimal
Developers
Developers
Posts: 389
Joined: 01 Nov 2008, 15:31
Noob?: No

Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)

#448 Post by Mortimal »

-Saint Seiya-, zanmato17, anneloveamale, asangongo10 - Macro.txt must be UTF8, is it?

arievartsoul Do u have another macroses which can block anti-bot macro? this macro is writen not for plugin its automatic.

asangongo10 I need exaples of your not working numbers. logconsole 1 in xkore 1 mode pls.

Nihao19 macro must be used without any plugins or macroses which can block him.
Please use pin function for uploading your file contents!
-Saint Seiya-
The Way Of Human
The Way Of Human
Posts: 183
Joined: 11 Apr 2008, 07:03

Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)

#449 Post by -Saint Seiya- »

Mortimal

ya i saved it in UTF8 its not getting any more errors but the macro doesnt seem to be triggering nothings happening when anti bot question pop out
lastbie
Noob
Noob
Posts: 1
Joined: 22 Oct 2011, 03:05
Noob?: Yes

Re: responseOnASCIInumber.pl #for response BotKiller(ASCII)

#450 Post by lastbie »

how about this bot check,
Image
anyone can help for the ascii and npcreacton??