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

pomagite objedenit'
http://forum.yoko.com.ua/viewtopic.php?f=3&t=12534		 Page 1 of 1
Author:  Bangbuss [ 2007-09-28 17:08:03 ]
Post subject:  pomagite objedenit'
pomagite objedenit' dva skripta v odin kompaktnij. kstate esli dolga rabotaet, vikidavaet unhandled parser.

Code:
sub warmode()
while true
   if uo.Life<1 then
   UO.Warmode(1)
   uo.deletejournal()
   endif
wait(10000)
wend
   end sub
   
sub warmode1()
while true
   if UO.InJournal('Your spirit') then
   UO.Warmode(0)
   wait(1000)
   uo.usetype('0x0E75')  #backpack uo.waittargettile("400",str(uo.getx("self")),str(uo.gety("self")),str(uo.getz("self")))
   uo.usetype('0x0E85') #kirka
   uo.deletejournal()
   endif
wait(10000)
wend
   end sub
Author:  Scripts Writer [ 2007-09-28 17:15:30 ]
Post subject: 
А что собственно должен делать скрипт ?
Author:  Bangbuss [ 2007-09-28 17:22:02 ]
Post subject: 
esli ja umer to warmode(1) 6tob menja mozhno bilo resnut', esli menja resnuli to warmode(0) 6tob mog dalshe kapat',+ 6tob mog dalshe kapat' na skripte nado mne otkrit' sumku i kirku ispolzavat' pod sebja, nu eto toka posle ressurecta.
Author:  Scripts Writer [ 2007-09-28 17:28:59 ]
Post subject: 
Code:
sub Ress_Equipt_Pick()
var pickaxe='input type of pickaxe'
  while 1
    if uo.Dead() then
      uo.WarMode(1)
      wait(5000)
    else
      uo.UseObject('backpack')
      wait(1000)
      uo.UseType(pickaxe)
      wait(500)
    end if
    wait(500)
  wend
end sub
Author:  Bangbuss [ 2007-09-28 17:30:43 ]
Post subject: 
oho. klass. thx
Author:  Bangbuss [ 2007-09-28 17:37:23 ]
Post subject: 
aa stop.

esli tak to on vso reme otkrivaet backpack i juzaet kirku. a nado 6tob toka 1 raz.
Author:  Scripts Writer [ 2007-09-28 17:46:44 ]
Post subject: 
Code:
sub Ress_Equipt_Pick() 
var k=0
var pickaxe='input type of pickaxe' 
  while 1

    if uo.Dead() then 
      uo.WarMode(1) 
      wait(5000) 
      k=1
    else 
      if k==1 then
        uo.UseObject('backpack') 
        wait(1000) 
        k=0
        uo.UseType(pickaxe) 
        wait(500) 
      end if
    end if 
    wait(500) 
  wend 
end sub


Пробуй
Author:  Bangbuss [ 2007-09-28 17:59:19 ]
Post subject: 
net, k sozhelenie nerabotaet, shas backpack neotkrivaet i kirku juzaet vso reme. esli 6to ja skript zapuskaju kogda ja zhivoj.
Author:  Scripts Writer [ 2007-09-28 18:05:51 ]
Post subject: 
Исправил, пробуй
Page 1 of 1 All times are UTC+02:00
Powered by phpBB® Forum Software © phpBB Limited
https://www.phpbb.com/