Oskom Forums

Oskom Forums


Добро пожаловать на Oskom Forums.
 
 
Сейчас на шардах UO Oskom
 
+ Ответить в теме
Показано с 1 по 8 из 8

Комбинированный просмотр

  1. Neophyte
    [Banned]
    Регистрация
    17.05.2004
    Адрес
    [Oscom Slayer's]
    Сообщений
    12
    #1

    По умолчанию макрос в пилоте на рубку леса..

    поделитесь плз у кого есть...идеально если в нем будет реколл при перевесе и скидывание в сундучек....но мона и без этого...заранее спасибо=)

  2. Master
    [Banned]
    Регистрация
    11.08.2003
    Адрес
    [MOHAX] [...] чары MAMA dima мега батя с мега лаагми...
    Сообщений
    1,098
    #2

    По умолчанию

    Лови он большой

    repeat 10 //; 1
    send f10
    waitfortarget 3000
    left 212, 251
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;2
    send f10
    waitfortarget 3000
    left 282, 199
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;3
    send f10
    waitfortarget 3000
    left 432, 223
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;4
    send f10
    waitfortarget 3000
    left 346, 135
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // Прыжок на 2 место
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 40, 391
    wait 300
    left 41, 391
    wait 3000
    end_repeat
    repeat 10 // ;1
    send f10
    waitfortarget 3000
    left 212, 254
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;2
    send f10
    waitfortarget 3000
    left 278, 189
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;3
    send f10
    waitfortarget 3000
    left 341, 136
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;4
    send f10
    waitfortarget 3000
    left 363, 273
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;5
    send f10
    waitfortarget 3000
    left 300, 346
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 3-e mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 40, 417
    wait 300
    left 39, 418
    wait 3000
    end_repeat
    repeat 10 //;1
    send f10
    waitfortarget 3000
    left 211, 254
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;2
    send f10
    waitfortarget 3000
    left 272, 203
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;3
    send f10
    waitfortarget 3000
    left 341, 135
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;4
    send f10
    waitfortarget 3000
    left 428, 222
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;5
    send f10
    waitfortarget 3000
    left 378, 242
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;6
    send f10
    waitfortarget 3000
    left 310, 310
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 4-e mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 62, 416
    wait 300
    left 61, 417
    wait 3000
    end_repeat
    repeat 10 //;1
    send f10
    waitfortarget 3000
    left 278, 200
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;2
    send f10
    waitfortarget 3000
    left 350, 134
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;3
    send f10
    waitfortarget 3000
    left 435, 210
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;4
    send f10
    waitfortarget 3000
    left 365, 268
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;5
    send f10
    waitfortarget 3000
    left 301, 351
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 5- mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 84, 417
    wait 300
    left 85, 416
    wait 3000
    end_repeat
    repeat 10 // ;1
    send f10
    waitfortarget 3000
    left 206, 266
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;2
    send f10
    waitfortarget 3000
    left 276, 187
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;3
    send f10
    waitfortarget 3000
    left 348, 108
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;4
    send f10
    waitfortarget 3000
    left 433, 216
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;5
    send f10
    waitfortarget 3000
    left 368, 281
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;6
    send f10
    waitfortarget 3000
    left 297, 272
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 6-e mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 107, 417
    wait 300
    left 109, 416
    wait 3000
    end_repeat
    repeat 10 // ;1
    send f10
    waitfortarget 3000
    left 209, 249
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;2
    send f10
    waitfortarget 3000
    left 280, 183
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;3
    send f10
    waitfortarget 3000
    left 346, 134
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;4
    send f10
    waitfortarget 3000
    left 440, 219
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;5
    send f10
    waitfortarget 3000
    left 367, 255
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;6
    send f10
    waitfortarget 3000
    left 305, 286
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 7-e mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 132, 417
    wait 300
    left 132, 417
    wait 3000
    end_repeat
    repeat 10 // ;1
    send f10
    waitfortarget 3000
    left 209, 249
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;2
    send f10
    waitfortarget 3000
    left 279, 191
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;3
    send f10
    waitfortarget 3000
    left 342, 69
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;4
    send f10
    waitfortarget 3000
    left 368, 283
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;5
    send f10
    waitfortarget 3000
    left 296, 344
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 8-e mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 134, 394
    wait 300
    left 135, 393
    wait 3000
    end_repeat
    repeat 10 // ;1
    send f10
    waitfortarget 3000
    left 281, 190
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;2
    send f10
    waitfortarget 3000
    left 344, 98
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;3
    send f10
    waitfortarget 3000
    left 438, 205
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;4
    send f10
    waitfortarget 3000
    left 370, 270
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;5
    send f10
    waitfortarget 3000
    left 301, 349
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 9-e mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 135, 369
    wait 300
    left 135, 368
    wait 3000
    end_repeat
    repeat 10 // ;1
    send f10
    waitfortarget 3000
    left 215, 253
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;2
    send f10
    waitfortarget 3000
    left 281, 186
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;3
    send f10
    waitfortarget 3000
    left 345, 116
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;4
    send f10
    waitfortarget 3000
    left 436, 209
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;5
    send f10
    waitfortarget 3000
    left 297, 335
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 10-e mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 111, 369
    wait 300
    left 112, 370
    wait 3000
    end_repeat
    repeat 10 //;1
    send f10
    waitfortarget 3000
    left 214, 251
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;2
    send f10
    waitfortarget 3000
    left 282, 184
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;3
    send f10
    waitfortarget 3000
    left 344, 111
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;4
    send f10
    waitfortarget 3000
    left 364, 277
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 // ;5
    send f10
    waitfortarget 3000
    left 299, 331
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 11-e mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 68, 371
    wait 300
    left 69, 371
    wait 3000
    end_repeat
    repeat 10 //;1
    send f10
    waitfortarget 3000
    left 207, 267
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;2
    send f10
    waitfortarget 3000
    left 275, 183
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //3
    send f10
    waitfortarget 3000
    left 438, 212
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //4
    send f10
    waitfortarget 3000
    left 371, 279
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //5
    send f10
    waitfortarget 3000
    left 299, 278
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 12-e mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 66, 390
    wait 300
    left 65, 391
    wait 3000
    end_repeat
    repeat 10 //;1
    send f10
    waitfortarget 3000
    left 218, 244
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;2
    send f10
    waitfortarget 3000
    left 281, 182
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //3
    send f10
    waitfortarget 3000
    left 344, 115
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //4
    send f10
    waitfortarget 3000
    left 440, 211
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //5
    send f10
    waitfortarget 3000
    left 372, 275
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 6 // 13-e mecto
    if mana < 82
    break
    end_if
    send f11 3000
    waitfortarget
    move 110, 394
    wait 300
    left 109, 394
    wait 3000
    end_repeat
    repeat 10 //;1
    send f10
    waitfortarget 3000
    left 206, 257
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //;2
    send f10
    waitfortarget 3000
    left 275, 183
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //3
    send f10
    waitfortarget 3000
    left 345, 112
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //4
    send f10
    waitfortarget 3000
    left 435, 222
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    repeat 10 //5
    send f10
    waitfortarget 3000
    left 299, 346
    wait 1000
    if lastmsg There are no logs left here to chop.
    break
    end_if
    wait 7000
    end_repeat
    double_left 82, 384 //; Еда
    wait 1000
    double_left 82, 384 //; Еда
    wait 1000
    end_script

  3. Neophyte
    [Banned]
    Регистрация
    20.05.2004
    Сообщений
    10
    #3

    По умолчанию

    о и мне пригодится

  4. Neophyte
    [Banned]
    Регистрация
    17.05.2004
    Адрес
    [Oscom Slayer's]
    Сообщений
    12
    #4

    По умолчанию

    ух...пасиба а ася есть ? у ламера осталось несколько вопросов

  5. Grandmaster
    [Banned]
    Регистрация
    29.03.2001
    Сообщений
    1,658
    #5

    По умолчанию

    Можно было выразить и так

    Код:
    while_not lastmsg no logs
    send f10 
    waitfortarget 3000 
    left 299, 346 
    wait 7000 
    end_while
    
    repeat 2 
    set lastobjectid <id еды>//; 
    send <LastObject> 
    wait 1000 
    end_repeat
    
    end_script

  6. Grandmaster
    [Banned]
    Регистрация
    29.03.2001
    Сообщений
    1,658
    #6

    По умолчанию

    Я так понял что это рекол?
    Код:
    repeat 6 // 12-e mecto 
    if mana < 82 
    break 
    end_if 
    send f11 3000 
    waitfortarget 
    move 66, 390 
    wait 300 
    left 65, 391 
    wait 3000
    Выражаем так.
    Код:
    while lastmsg spell //до тех пор пока будет физл
    set lasttargetid <id руны>
    set lastspell 31 //номер спела реколл
    set lasttargetkind 1 //тип цели "итем"
    if mana < 82 
    break 
    end_if 
    send <lastspell waitfortarg lasttarget>
    waitfortarget 
    wait <сколько нужно>
    end_while

  7. Neophyte
    [Banned]
    Регистрация
    17.05.2004
    Адрес
    [Oscom Slayer's]
    Сообщений
    12
    #7

    По умолчанию

    эх...надо изучать пилот....а то что-то с трудом я пока врубаюсь как этим всем пользоваться....там же надо координаты перенастраивать для себя? руны и сундука и еще ожет чего? а Ф10 и Ф11 на какие кнопки забиндены?

  8. #8

    По умолчанию

    Макрос на UOScripte :

    Program Lumber;
    {
    skript rubit odno derevo do konca
    binds :
    F1 - LastObject
    F2 - LastObject, WaitForTarget, LastTarget
    }
    var
    mx,my : LongInt;
    f,ex : Boolean;
    i,cnt : LongInt;
    s : String;
    begin
    f := true;
    GetMouseCoords(mx,my);
    GetJournal;
    while TRUE do begin
    if f then begin
    SendKey(k_F1);
    WaitForTarget(10000);
    LeftClick(mx,my);
    f := false;
    end else begin
    SendKey(k_F2);
    end;
    while (Pos('use this on',_lastmsg)>0) do begin delay(100); end;
    if (Pos('no logs',_lastmsg)>0) then break;
    { obrabotka soobwenij }
    ex := true;
    while ex do begin
    GetJournalNew;
    GetJournalCount(cnt);
    for i:=0 to cnt-1 do begin
    GetJournalString(i,j_LowerCase,s);
    if (Pos('no logs',s)>0) then begin
    PlaySound('c:\chimes.wav');
    exit;
    end;
    if (Pos('but fail to',s)>0) then ex:=false;
    if (Pos('put the logs',s)>0) then ex:=false;
    end;
    Delay(1000);
    end;
    end;
    end.

Ваши права

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