Oskom Forums

Oskom Forums


Добро пожаловать на Oskom Forums.
 
 
Сейчас на шардах UO Oskom
 
Закрытая тема
Показано с 1 по 3 из 3
  1. Journeyman

    Регистрация
    05.05.2005
    Адрес
    MOPO>I<EHOE
    Сообщений
    233
    #1

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

    set #hide 0 // 1 - ?????? ??????????, 0 - ???
    set #dlin 15 // ???????????? ????? ????? ? ????? ???????????
    set #napr 1 // ? ????? ??????? ??????: 0 - ??????-??????,
    // 1 - ?????-???????
    set #ves 500 // ???????????? ???, ?????????? ?????
    set #sdvig 0 // ???? ?????????? ??? ?????????: 0 - ????, 1 - ?????
    set #proba 20 // ?????????? ??????? ?????????
    set #propusk 0 // 1 - ?????????? ??????? ????, 0 - ???????? ??? ?? ??????

    // ????????? ????
    if #hide = 1
    while_not (lastmsg you have hidden)
    send F7 3000 // ???????? ???????????
    end_while
    end_if

    // ???????? ?????????
    :main
    set #i 1 // ??????? ??? ????????? ? ???? ??????
    while #i < #dlin
    set #xx charposx // ??????? ?????????? ????
    set #yy charposy
    gosub kopaem
    gosub idem_hor
    if #xx = charposx and #yy = charposy
    // ????????? ???? ??? ???????? ?? ??????????!
    gosub razvorot
    break
    end_if
    set #i #i + 1
    end_while
    if #napr = 0
    // ?????? ??????????? ????????
    set #napr 1
    else
    set #napr 0
    end_if
    goto main

    // ????????? ??????????? 25 ?????? ?????? ????
    :kopaem
    for #y -2 2 1
    for #x -2 2 1
    set lasttargetx charposx + #x
    set lasttargety charposy + #y
    set lasttargetkind 2
    gosub dyatel // ?????? ? ???? ?????
    end_for
    end_for
    return

    // ????????? ????????? ??????? ?????? ?????
    :dyatel
    set #p 0
    :mining
    send F2 // lastobject waitfortarget lasttarget
    wait 9000
    roverka
    if (lastmsg nothing) or (lastmsg mining in rock) or (lastmsg have no line) or (lastmsg get there) or (lastmsg you can't)
    return
    end_if
    goto mining
    end_if
    wait 500
    set #p #p + 1
    if #p > #proba
    return
    end_if
    goto mining
    return

    // ????????? ?????? ???? ?? ??? ???? ?????????????
    :idem_hor
    if #napr = 0
    send Left
    if #hide = 1
    // ???? ?? ? ????? - ???? ????? ????? ??????
    wait 1000
    end_if
    send Left
    if #hide = 1
    // ???? ?? ? ????? - ???? ????? ????? ??????
    wait 1000
    if lastmsg been revealed
    send F7
    wait 500
    end_if
    end_if
    else
    send Right
    if #hide = 1
    // ???? ?? ? ????? - ???? ????? ????? ??????
    wait 1000
    end_if
    send Right
    if #hide = 1
    // ???? ?? ? ????? - ???? ????? ????? ??????
    wait 1000
    if lastmsg been revealed
    send F7
    wait 500
    end_if
    end_if
    end_if
    return

    // ????????? ?????? ???? ?? ????????? ??? ?????????
    :razvorot
    if #sdvig = 0
    send Down
    if #hide = 1
    // ???? ?? ? ????? - ???? ????? ????? ??????
    wait 1000
    if lastmsg been revealed
    send F7
    wait 500
    end_if
    end_if
    else
    send Up
    if #hide = 1
    // ???? ?? ? ????? - ???? ????? ????? ??????
    wait 1000
    if lastmsg been revealed
    send F7
    wait 500
    end_if
    end_if
    end_if



    Проблема в том, что у вас пишется на русском "тут не осталось руды" а пилот не понимает если писать (ластмсг тут). Что мне делать??

  2. Grandmaster
    [Banned]
    Регистрация
    05.04.2006
    Адрес
    Mihail[D-Tox]
    Сообщений
    3,443
    #2

    По умолчанию

    а зачем скидывать скрипт, если ты уже сам сформулировал проблему? - что пилот не понимает русские символы..
    юзай поиск тут неоднократно были такие темы..

  3. Grandmaster
    Аватар для Gevorg
    Регистрация
    18.11.2004
    Адрес
    [Junior Brothers]
    Сообщений
    2,074
    #3

    По умолчанию

    Если бы отправился в спецтоп по скриптам, то нашел бы ответ на свой вопрос
    http://uoo.ru/phpBB/viewtopic.php?t=145599&start=100

Ваши права

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