Yoko

All sides of Injection
It is currently 2026-01-18 16:33:32

All times are UTC+02:00




Post new topic  Reply to topic  [ 4 posts ] 
Author Message
PostPosted: 2007-09-22 12:58:31 
Offline
User avatar

Joined: 2007-06-20 15:38:11
Posts: 53
Этот скрипт на напёрстки
но он или говорит чару который дал правельный ответ что он ошибся
или вообще не воспринимает ответ
может кто то помочь пожалуйсто

Code:
sub gm() 
var line, chislo, otvet, name, id
var item_amount = 0
var stavka = 100
var timer
start:
uo.moveoff() #чтобы от UO.RClick() чар не дергался
UO.Exec('exec reklama')
otvet=uo.random(3)+1
item_amount = 0
timer=1
while not UO.TradeCount()
wait(100)
wend
UO.Exec('terminate reklama')
uo.exec("set finddistance 5")
uo.findtype("0x0190",-1,"ground")
id=uo.TradeOpponent()
name=uo.getname(uo.TradeOpponent())
      REPEAT
      UO.FindType('0x0EED', '-1', UO.TradeContainer('right'))
         If UO.FindCount() Then
               If UO.GetQuantity('finditem')==0 Then
                  item_amount = item_amount + 1
               Else
                  item_amount = item_amount + UO.GetQuantity('finditem')
               EndIf
            UO.Ignore('finditem')
            UO.FindType('0x0EED', '-1', UO.TradeContainer('right'))
         EndIf
      Until UO.FindCount()==0 or UO.Dead()
   UO.IgnoreReset()
if item_amount == stavka then
while not UO.TradeCheck('','right',1) and timer < 6
timer = timer + 1
wait(1000)
uo.print(STR(timer))
wend
if timer == 6 then
UO.RClick(176,90)
wait(500)
goto start
endif
timer = 1
wait(500)
UO.TradeCheck('','left',1)
uo.msg(name + ", отгадайте число от 1 до 3, у Вас есть 5 секунд!")
wait(7000)
else
uo.msg(name + ", для игры нужно дать мне 100гп")
UO.RClick(176,90)
wait(500)
goto start
endif
line=UO.injournal(name)
wait(50)
chislo=Trim(Right(UO.Journal(line-1),1))
uo.msg("Ваш ответ " + chislo + ", а я загадал " + STR(otvet) + "!")
if val(chislo) == otvet then
wait(500)
uo.msg("Поздравляю " + name + ", Вы отгадали и выиграли 300гп!")
if UO.TradeCount() then
UO.RClick(176,90)
wait(500)
endif
uo.findtype("0x0EED")
uo.moveitem('finditem','300',id)
wait(500)
UO.TradeCheck('','left',1)
timer = 0
while not UO.TradeCheck('','right',1) and timer < 5
timer = timer + 1
wait(1000)
uo.print(STR(timer))
wend

if timer == 5 then
UO.RClick(176,90)
wait(500)
goto start
endif

goto start

else
wait(200)
uo.msg("К сожалению Вы не отгадали!")
UO.RClick(176,90)
wait(500)
endif
goto start
end sub

sub reklama()
while 1
wait(8000)
uo.msg("Игра в наперстки!")
wait(500)
uo.msg("Для начала игры просто дайте чару 100гп")
wend
end sub


Top
   
 Post subject:
PostPosted: 2007-10-17 23:33:23 
Offline

Joined: 2006-03-08 20:53:28
Posts: 115
Помогите Не может Определить ник почему то, и ответы Принимает Чужые


Top
   
 Post subject:
PostPosted: 2007-10-18 17:24:37 
Offline

Joined: 2005-04-19 18:00:29
Posts: 2259
Location: Московская область
Code:
uo.LClick('finditem') #On character before trading and getting his name


2Don't forget to find women too.


Top
   
 Post subject:
PostPosted: 2007-10-18 21:16:54 
Offline

Joined: 2006-03-08 20:53:28
Posts: 115
А можете поставить проверку передано гп или нет, типо если передано то скрипт задает ему вопрос, а если нет то он говорит "ты не дал мне денег" и опять врубается рекалма! а то если ему перевести на него гп а потом отменить запрос он все равно задаст ему вопрос.


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

All times are UTC+02:00


Who is online

Users browsing this forum: No registered users and 1 guest


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:  
cron
Powered by phpBB® Forum Software © phpBB Limited