Yoko

All sides of Injection
It is currently 2025-12-25 14:19:22

All times are UTC+02:00




Post new topic  Reply to topic  [ 7 posts ] 
Author Message
PostPosted: 2005-08-03 10:31:48 
Offline

Joined: 2005-08-03 10:14:16
Posts: 4
надо что бы в killer="" записывалось имя нападающего.
т.е. я хочу узнать, кто именно убивает меня на макросе.
достаточно последние 20 строк журнала даже перед смертью

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

перерыл хелп, перерыл форум, не нашёл -(


Top
   
 Post subject:
PostPosted: 2005-08-03 11:02:09 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
плохо искал

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


Top
   
 Post subject:
PostPosted: 2005-08-03 11:42:58 
Offline

Joined: 2005-08-03 10:14:16
Posts: 4
omi4 wrote:


слишком сложно, нифига не понял -(


Top
   
 Post subject:
PostPosted: 2005-08-03 11:47:59 
Offline
User avatar

Joined: 2005-07-10 21:53:05
Posts: 457
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


Top
   
 Post subject:
PostPosted: 2005-08-03 13:09:12 
Offline

Joined: 2005-08-03 10:14:16
Posts: 4
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


так?

так возвращает собственное имя, а не нападающего


Top
   
 Post subject:
PostPosted: 2005-08-03 15:42:34 
Offline
Expert!
User avatar

Joined: 2004-08-11 23:56:17
Posts: 746
Location: The Citadel
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


Top
   
 Post subject:
PostPosted: 2005-08-04 09:49:39 
Offline
Expert!
User avatar

Joined: 2004-10-15 22:38:04
Posts: 1396
Location: Moscow City.
Люблю я этот мининг :lol:


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 7 posts ] 

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 2 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
Jump to:  
Powered by phpBB® Forum Software © phpBB Limited