Yoko

нех делать было вот сделал простенькую игру)

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)
chislo=Trim(Right(UO.Journal(line-1),1))
uo.msg("Ваш ответ " + chislo + ", а я загадал " + STR(otvet) + "!")
if val(chislo) == otvet then
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
uo.msg("К сожалению Вы не отгадали!")
UO.RClick(176,90)
wait(500)
endif
goto start
end sub

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

просто врубаете макр и чар стоит флудит о игре. када на него кидают бабки, в данном случае 100гп, просит отгадать число. при угадывании дает 300гп )

респект

_________________
Уроки языка Injection
Основные команды языка Injection
Yoko Injection Code Sweeper
Drw (2009) скрипты
2017 Начал играть на Uorpg.net

Слоник маладса,не дал пропасть вечеру зря

прикольно
вот у народа идеи.. я до бота-вендора-то с трудом смог додуматься а тут наперсточники

Проблема скрипта, в продолжении игры, если человек отменил передачю денег, не дожидаясь отмены бота.
То игра продолжается =)
Сижу забиваю мозг ибо совсем не опытный в инже, как пофиксить.
Чоута не получается (((
Поправь плз если н есложно.

подскажите какие настроики убрать в uo.cfg или еще где чтобы он правильно брал имена тех кто дает деньги? и еще такая проблема когда чар говорит вы загадали .... то называет только 3 а если загадывали 2 и 1 то там перед восклицательным знаком только пробел((( подскажите плиззз очень прошу)