chukcha: Блог

Смотрю пример Бала:

Clarissa - гейткипер в Гиране
: dialog-7080 ( — "строка в диалог" ) "Привет! Прыжок в [forth 0 0 0 jump|0 0 0]%%" ;
['] dialog-7080 7080 npc-dialog+


Есть вопрос по синтаксису [forth 0 0 0 jump|0 0 0]%%.
1. Forth это имя словаря. Т.е., если захочу использовать другой (myvoc, например), то должен написать [myvoc 0 0 0 ...
2. два знака %% тоже что-то должны означать (можно, конечно, тупо брать и использовать,что пытаюсь сейчас сделать, но хочется осознания). А если поставлю %%% или...?

И второй вопрос по добавлению диалогов.
: npc-ХХХ-dialog-append работает?
Если первый вариант я реализовал только что без проблем, то второй вопрос так и не получилось сделать (раньше все работало). Вопрос на самом деле праздный.

Раньше писал в test.htm, например
[ time_end_reg 1000 / ]
и выводил число. Чичас чето ругается...

Вопросы:
1. Будет ли работать jbf_reload или уже есть слово, заменяющее его?
2. Появились словари. Будет ли в дальнейщем работать старый синтаксис или все определять через словари? Есть ли причины по которым нужно переходить на работу со словарями. Дело в том, что много дел на работе и никак не разберусь по-нормальному со словарями.

Есть ивент! НЕ все нравиться в реализации (знание форта слабое). Ивент проверен на серверах РМТ. Предложения и вопросы. Особенно хочется критических замечаний от Мастеров по поводу реализации на форте (оптимизация, улучшения, красота, изящество и т.п.). Отвечу на любые вопросы.

Собстнвенно вопрос в теме. Хочется понимать, что ждет тех, кто не имеет Доступ. Как планировать развитие своейное (в смысле сервера своего). Наскоко я понимаю в других сборках Форт, мягко говоря, недоразвит? (ой, второй вопрос получился)

Пытаюсь парализовать игроков из списка

 "player@ 'Name' p@ TTT_list in-list? if player@ c.paralyze" do-players 

Ругается на player@ c.paralyze
Подскажите, плз, в чем обшибка.

Не могу выйти из цикла!

 : get_life player@ "CurrentHp" p@ проверим уровень жизни ; : check_life get_life 1 < if false to TTT-life exit не выходит из цикла!!!!!!!!!!!!!!!!!! else True to TTT-life then ; 0 time_for_award do " check_life " I 1000 * do-timer -1 +loop 

Не хотить выходить из цикла! Можа кто знает (Бал, например)?

Вот работаю я со списком икроков TTT_list
Хочу всех перенести на ивет:

 "player@ 'Name' p@ TTT_list in-list? if 149486 46734 -3411 jump" do-players 

переносит. А вот дальше вопросы имеют место быть.
1. Хочу всех парализовать (дабы дать возможность подгрузиться медленным компам игроков).

 "player@ 'Name' p@ TTT_list in-list? if player@ c.paralyze" do-players 

не парализует - выдает ошибки.
2. Хочу отправить игроков на их преждние места (не буду приводить извращения как пробовал) и чой-то никак.

Может у кого есть советы мудрые на ентот счет.

Спасибо заранее.

делаю цикл:
0 30 DO
I announce
"sleep" .
1000 sleep
-1 +LOOP
т.к. хочу, выводить (это пример)
10 sleep
9 sleep
...

Выводит
10
9 ...
1
sleep sleep...
А я так не хочу. Может кто знает в чем проблема.

"Лыжник висит на трамплине...
Рукав кимоно зацепился.
Чтобы избавить свой род от позора
Палкой
пытается сделать себе харакири
Тщетно.
Тупая..."

Дайте помечтать...
Яесли кто знает, то намекните как.


"Вот бы жизнь тогда настала-
Знай гуляй и отдыхай.
Тут и мама б перестала
Говорить, что я лентяй!"

Можно ли начать ивент, например, в 19-00. Есесно, автоматически. Можно, наверное, прибегнуть к комбинации с timer и sleep (это то,что я знаю), но может есть более красивое решение или другие комманды?

Пишу ивенты. Разбираюсь с фортом. Сейчас стоит задача обратного отчсчета перед началом мясорубного ивента. Может кто уже делал? Поделитесь. Могу на че-нибудь поменяться из наших наработок (их, правда, не много и похвастать нечем).

Подскажите, плз, назначение и содержимое круглых скобок
: coliseum-doors-open ( — )
coliseum-doors ['] door-open do-list
;
или содержмое скобок здесь
: my-jump ( name — )
"xxx yyy zzz jump" swap find_player do-player
;


как они интерпритируются при выполнении?
Спасибо всем заранее
За языка познание.

КАК? Есть список игроков, есть координата (одна). Как их всех туда отправить. Свои варианты даже не выкладываю, чтоб не отвлечь Мастеров юмором.

Я делаю ивент типа массовый расколбас.
Игроки подходят к НПС и регистрируются на ивент. Каждый игрок попадает в список участников (теоретически понятно как делать с помощью команд списка).
Игроки выходят в колизей, двери закрываются. Далее игроки убивают друг друга...
Внимание вопрос!
Как определять имена убитых игроков, чтобы сформировать список убитых. Потом планирую сравнивать количество элементов в списке живых и убитых и если разница = 1 (т.е. один остался), то он и есть победитель.

Есть такой вопрос.
Хочу, чтобы НПС говорил по русски. Пишу
: bypass_test_7121
status null = if
"Hello. We have not any events! Nu netu sha eventov!

Привет! А ивентов нема! Иди домой!" show
exit
then
если сохраняю в кодировке виндовс, то не пишет по русски у НПС, если сохраняю в кодировке UTF-8, то выдает ошибку - ругается на первый же оператор (не понимает его).
Можа есть какие решения или кто сталкивался?
Заранее спасибо!

Пишу тестовый квест

0 suvalue step
step . проверяю значение
: bypass_test_7121
"enter" . проверка входа
step . еще раз проверка значения
step 0 = if
"test?" show
1 to step переходим к первому шагу
step . и еще раз посмотрим внутри ифа
exit выходим из слова
then
step . а значение на выходе?
;

4 раза вывожу значение step
1раз 0 (нормально)
2 раз null (а почему не 0)
3раз не выводится т.к. условие не выполнено
4 раз null
А куда потерялся 0?

Помогите чайнику плз.
Делаю тестовый квест
: npc-7071-dialog-append
'
Quest bloody orcs
' .
;
: bypass_testquest_7071 сообщение появляющееся после выбора квеста игроком
"Help me! Kill the Enku Ork Champion! South of Dion! Please! Im reward you, if you kills him!" show
;
: on-npc-291-die
1 3427 item_add
;

после //reload пишет Unknow word 'item-add' in file...(путь файла).
не могу понять почему.