Yoko
http://forum.yoko.com.ua/

помогите ско скриптом, плз. в поиске не нашёл -(
http://forum.yoko.com.ua/viewtopic.php?f=20&t=4703		 Page 1 of 1
Author:  zzpsmzz [ 2005-08-03 10:31:48 ]
Post subject:  помогите ско скриптом, плз. в поиске не нашёл -(
надо что бы в killer="" записывалось имя нападающего.
т.е. я хочу узнать, кто именно убивает меня на макросе.
достаточно последние 20 строк журнала даже перед смертью

sub kill()
var killer
while not uo.dead()
wait(100)
wend
killer=""
uo.textprint(killer)
end sub

перерыл хелп, перерыл форум, не нашёл -(
Author:  omi4 [ 2005-08-03 11:02:09 ]
Post subject: 
плохо искал

http://yoko.netroof.net/forum/viewtopic.php?t=1195&start=0&postdays=0&postorder=asc&highlight=
Author:  zzpsmzz [ 2005-08-03 11:42:58 ]
Post subject: 
omi4 wrote:
плохо искал

http://yoko.netroof.net/forum/viewtopic.php?t=1195&start=0&postdays=0&postorder=asc&highlight=


слишком сложно, нифига не понял -(
Author:  omi4 [ 2005-08-03 11:47:59 ]
Post subject: 
Code:
############################################################ 
#   Контроль за опасностью 
############################################################ 
sub Visor() 
VAR asd 
while 1 
UO.deletejournal() 
while not UO.InJournal(":") 
wait(100) 
wend 
if UO.InJournal("Elemental") then 
uo.SetGlobal("timeelem",time()) 
uo.textopen() 
uo.textprint("Будет бой с элементалем") 
UO.Exec("exec ElemKill") 
UO.Exec("terminate Visor") 
endif 
if UO.InJournal("attacking you") then 
UO.GetStatus("UO.JournalSerial(0)") 
uo.SetGlobal("name",UO.GetName(UO.JournalSerial(0))) 
log(9,uo.GetGlobal("name"),"") 
uo.textopen() 
uo.textprint("Эта крыса "+UO.GetName(UO.JournalSerial(0))+" внезапно атаковала!" ) 
UO.Exec("exec Escape") 
UO.Exec("terminate Visor") 
endif 
asd=UO.GetNotoriety(UO.JournalSerial(0)) 
if asd==6 then 
UO.GetStatus("UO.JournalSerial(0)") 
uo.SetGlobal("name",UO.GetName(UO.JournalSerial(0))) 
log(6,uo.GetGlobal("name"),"") 
uo.textopen() 
uo.textprint("В шахте оказался ПК - "+UO.GetName(UO.JournalSerial(0))) 
UO.Exec("exec Escape") 
UO.Exec("terminate Visor") 
endif 
if asd==5 then 
UO.GetStatus("UO.JournalSerial(0)") 
uo.SetGlobal("name",UO.GetName(UO.JournalSerial(0))) 
log(8,uo.GetGlobal("name"),"") 
uo.textopen() 
uo.textprint("В шахте вражеский гильдмэн - "+UO.GetName(UO.JournalSerial(0))) 
UO.Exec("exec Escape") 
UO.Exec("terminate Visor") 
endif 
if asd==4 then 
UO.GetStatus("UO.JournalSerial(0)") 
uo.SetGlobal("name",UO.GetName(UO.JournalSerial(0))) 
log(7,uo.GetGlobal("name"),"") 
uo.textopen() 
uo.textprint("В шахте оказался криминал - "+UO.GetName(UO.JournalSerial(0))) 
UO.Exec("exec Escape") 
UO.Exec("terminate Visor") 
endif 
wend 
end sub
Author:  zzpsmzz [ 2005-08-03 13:09:12 ]
Post subject: 
Code:
sub kiler_log()
start:
uo.deletejournal()
while not UO.InJournal(":") 
wait(100)
wend
if UO.InJournal("attacking you") then 
UO.GetStatus("UO.JournalSerial(0)") 
uo.textopen() 
uo.textprint("Эта крыса "+UO.GetName(UO.JournalSerial(0))+" напала на меня! *ужс*" )
endif
goto start
end sub


так?

так возвращает собственное имя, а не нападающего
Author:  flake [ 2005-08-03 15:42:34 ]
Post subject: 
Code:
sub kiler_log() 
VAR name
start: 
uo.deletejournal() 
while not UO.InJournal(":") 
wait(100) 
wend 
if UO.InJournal("attacking you") then 
name = UO.GeName( UO.JournalSerial( UO.InJournal( 'attacking you' )-1 ) )
uo.textopen() 
uo.textprint("Эта крыса "+ name +" напала на меня! *ужс*" ) 
endif 
goto start 
end sub
Author:  I'm [ 2005-08-04 09:49:39 ]
Post subject: 
Люблю я этот мининг :lol:
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/