| Yoko http://forum.yoko.com.ua/ |
|
| pk action http://forum.yoko.com.ua/viewtopic.php?f=3&t=12568 |
Page 1 of 1 |
| Author: | riccardo [ 2007-10-05 10:14:14 ] |
| Post subject: | pk action |
Hello , I have a problem with this scrip : Please can someone remake this script , when character see pk in screen for example Nick [Chaos] , [Chaos] - it means pk hord im in [Order] faction then he use invis potion and recall with runebook to bank wait 10 min and recall back to restart lumber the wood . thanks to all sub run() var objser var pkser var type var pktype UO.DeleteJournal() While True if UO.InJournal(":") then objser = uo.JournalSerial(uo.InJournal(":")-1) pkser = objser[0]+objser[1]+objser[2]+objser[3] type = UO.GetGraphic(objser) pktype = type[0]+type[1]+type[2]+type[3]+type[4] if pkser == "0x00" and pktype == "0x019" and friends(objser) then UO.Say(",terminate lumber") UO.UseType('0x0F0E','0x0631') Wait(100) UO.Warmode("0") wait(100) UO.MSG("Recalling...") UO.WaitTargetObject('0x4014BCB6') UO.UseType('0x1F4C') Wait(300000) UO.Recall('0x401305D3','4') Wait(10000) UO.Exec('exec lumber') Wait(500) UO.Say(",terminate run") Return endif endif wait(1000) Wend end sub sub friends(pk) var i DIM fr[11] fr[1] = "" fr[2] = "" fr[3] = "" fr[4] = "" fr[6] = "" fr[7] = "" fr[8] = "" fr[9] = "" fr[10] = "" for i = 1 to 10 if pk == fr[i] then Return 0 endif Next Return 1 end sub |
|
| Page 1 of 1 | All times are UTC+02:00 |
| Powered by phpBB® Forum Software © phpBB Limited https://www.phpbb.com/ |
|