Одесса: 2°С (вода 8°С)
Киев: 0°С
Львов: -2°С

Тема: Скрипты на УО !

Ответить в теме
Показано с 1 по 3 из 3
  1. Вверх #1
    Посетитель
    Адрес
    Одесса, Малиновский район, ул. Ак. Филатова
    Сообщений
    117
    Репутация
    10

    По умолчанию Скрипты на УО !

    Ув,администрация прошу не удаляйте мой топ ато форум УО закрыт и я скрипты никаким образом кроме этого предать не могу!

    Заранее благодарю..!!

    sub looting()
    var corpse,i,j
    uo.set('finddistance','2')
    uo.set('distance','2')
    DIM Loot[4]
    Loot[0] = 0x0EED; # Gold
    Loot[1] = 0x0F3F; # Arrow
    Loot[2] = 0x1BFB; # Bolt
    Loot[3] = 0x0F26; # Diamond
    Loot[4] = 0x0F21; # Star Sapphire

    DIM Text[4]
    Text[0] = 'Gold Coins'
    Text[1] = 'Arrows'
    Text[2] = 'Bolts'
    Text[3] = 'Diamons'
    Text[4] = 'Star Sapphires'

    DIM Vars[4]
    Vars[0] = uo.gold
    Vars[1] = uo.ar
    Vars[2] = uo.bt
    Vars[3] = uo.count('0x0F26')
    Vars[4] = uo.count('0x0F21')


    while true
    while uo.countonground('0x2006') > 0
    if UO.Weight > 40000 then
    uo.print("Too much weight! There're "+STR(UO.Gold)+" gold coins in backpack!")
    uo.waittargettype('0x0EED')
    wait(1000)
    uo.useobject('0x40157FBF')
    wait(1000)
    goto end
    end if
    uo.findtype('0x2006','-1','ground')
    if uo.findcount() > 0 then
    corpse=uo.getserial('finditem')
    uo.print("Found "+str(uo.findcount())+" corpse(s)!")
    for i=0 to 4
    j=0
    repeat
    UO.FindType(Loot[i],-1,corpse)
    if UO.GetQuantity('finditem') then
    UO.MoveItem('finditem','0','backpack')
    uo.print("Looted: "+STR(UO.GetQuantity('finditem'))+" "+Text[i]+"! In All: "+STR(vars[i]+UO.GetQuantity('finditem')))
    wait(600)
    end if
    j = j + 1
    if j > 15 then
    goto stuck
    end if
    until uo.findcount()==0
    next
    stuck:
    uo.ignore(corpse)
    Else
    uo.print("No Corpses Beside!!!")
    end if
    end:
    wend
    wait(600)
    wend
    end sub
    [color=red]Voohoo[/color].


  2. Вверх #2
    Посетитель
    Адрес
    Одесса, Малиновский район, ул. Ак. Филатова
    Сообщений
    117
    Репутация
    10
    sub corpse()
    var corpse,i,j
    uo.set('finddistance','2')
    uo.set('distance','2')
    DIM Loot[4]
    Loot[0] = 0x0EED; # Gold
    Loot[1] = 0x0F3F; # Arrow
    Loot[2] = 0x0F0B; # Bone
    Loot[3] = 0x0F26; # Diamond
    Loot[4] = 0x0EF0; # Star Sapphire

    DIM Text[4]
    Text[0] = 'Gold Coins'
    Text[1] = 'Arrows'
    Text[2] = 'Bone'
    Text[3] = 'Diamons'
    Text[4] = 'Star Sapphires'

    DIM Vars[4]
    Vars[0] = uo.gold
    Vars[1] = uo.ar
    Vars[2] = uo.count('0x0F0B')
    Vars[3] = uo.count('0x0F26')
    Vars[4] = uo.count('0x0EF0')


    while true
    while uo.countonground('0x2006') > 0
    if UO.Weight > 40000 then
    uo.print("Too much weight! There're "+STR(UO.Gold)+" gold coins in backpack!")
    uo.waittargettype('0x0EED')
    wait(1000)
    uo.useobject('0x40157FBF')
    wait(1000)
    goto end
    end if
    uo.findtype('0x2006','-1','ground')
    if uo.findcount() > 0 then
    corpse=uo.getserial('finditem')
    uo.print("Found "+str(uo.findcount())+" corpse(s)!")
    for i=0 to 4
    j=0
    repeat
    UO.FindType(Loot[i],-1,corpse)
    if UO.GetQuantity('finditem') then
    UO.MoveItem('finditem','0','backpack')
    uo.print("Looted: "+STR(UO.GetQuantity('finditem'))+" "+Text[i]+"! In All: "+STR(vars[i]+UO.GetQuantity('finditem')))
    wait(600)
    end if
    j = j + 1
    if j > 15 then
    goto stuck
    end if
    until uo.findcount()==0
    next
    stuck:
    uo.ignore(corpse)
    Else
    uo.print("No Corpses Beside!!!")
    end if
    end:
    wend
    wait(600)
    wend
    end sub
    [color=red]Voohoo[/color].

  3. Вверх #3
    это на что скрипты?

Ответить в теме

Социальные закладки

Социальные закладки

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения