Code:
bind pub -|- !hat cmd:hatproc cmd:hat {nick host hand chan text} { if {[string match -nocase "" $text]} { putquick "Privmsg $chan :Ha~y Tra? Loi` Em - Le^. Quye^n" utimer 2 putquick "Privmsg $chan :Em ho?i anh co' bao gio+`.. con so^ng kia tho^i ngu+`ng tro^i," utimer 4 putquick "Privmsg $chan :Anh tra? lo+`i em ra(`ng.. mo^.t nga`y na('ng ha. so^ng se~ ca.n kho^" utimer 6 putquick "Privmsg $chan :Em ho?i anh co' khi na`o.. dda'm ma^y kia tho^i ngu+`ng bay," utimer 8 putquick "Privmsg $chan :Anh tra? lo+`i em ra(`ng.. ma^y ngu+`ng bay khi mu+a dde^'n ba^'t cho+.t" utimer 10 putquick "Privmsg $chan :Em ho?i anh co' bao gio+`.. anh tho^i kho^ng co`n ye^u em," utimer 12 putquick "Privmsg $chan :Anh tra? lo+`i em ra(`ng.. cuo^.c ti`nh chu'ng mi`nh kho^ng bao gio+` tan" utimer 14 putquick "Privmsg $chan :Em ho?i anh dde^'n khi na`o.. anh ddi chung ddu+o+`ng ngu+o+`i ta," utimer 16 putquick "Privmsg $chan :Anh cu+o+`i vo+'i em ra(`ng.. ti`nh ye^u ddo^i ta ma~i chung mo^.t ddu+o+`ng" utimer 18 putquick "Privmsg $chan :Nhu+ng sao ho^m nay anh dda~ ddi xa em ro^`i" utimer 20 putquick "Privmsg $chan :Nhu+ con so^ng kia dde^'n lu'c ca.n kho^," utimer 22 putquick "Privmsg $chan :Em dda^y nga^y ngo^ kho'c than dde^m nga`y" utimer 24 putquick "Privmsg $chan :Mong sao nu+o+'c ma('t la^'p dda^`y con so^ng kia" utimer 26 putquick "Privmsg $chan :Sao khi xu+a anh kho^ng no'i vo+'i em ddo^i lo+`i" utimer 28 putquick "Privmsg $chan :Ti`nh ye^u ddo^i ta co' lu'c ta`n phai" utimer 30 putquick "Privmsg $chan :Cho con tim em xo't xa mong cho+`" utimer 32 putquick "Privmsg $chan :Tro+`i tan co+n mu+a ma^y se~ la.i bay" utimer 34 putquick "Privmsg $chan :Tro+`i tan co+n mu+a anh se~ quay vê`" }}Code:
putquick "Privmsg $chan :Ha~y Tra? Loi` Em - Le^. Quye^n"
Help me for it work.
Thanks
Statistics: Posted by tuanthinh — Sun Mar 13, 2005 3:20 pm
]]>