ZVSE

**Герой получает или дает опыт 50 * разницу в уровнях * уровень навыка обучение

!?FU77010; Перед взаимодействием героев
!!SN:X?y1/?y2; Узнать номера героев

!!HEy1:O?y5; Игрок хозяин 1 героя
!!HEy2:O?y6; Игрок хозяин 2 героя
!!FU&y5<>y6:E; Выход если герои от разных игроков

!!VRy60:S$day$;
!!SN:W^H3_Scholar_H1%Y1_H2%Y2_%Y60^/?y10;
!!FU&y10=1:E; Exit if they have already met today
!!SN:W^H3_Scholar_H1%Y2_H2%Y1_%Y60^/?y10;
!!FU&y10=1:E; Exit if they have already met today

!!HEy1:S21/?y5; Проверка наличия навыка обучение
!!HEy2:S21/?y6; Проверка наличия навыка обучение
!!FU&y5=0/y6=0:E; Выход если у героев нет обучения

!!VRy5&y6>y5:Sy6; Узнаем наивысший уровень навыка обучение

!!HEy1:Ed/?y11; Проверка уровня героя 1
!!HEy2:Ed/?y12; Проверка уровня героя 2
!!FU&y11=y12:E; Выход если уровни равны

!!VRy3&y11>y12:Sy1;
!!VRy4&y11>y12:Sy2;
!!VRy3&y11<y12:Sy2;
!!VRy4&y11<y12:Sy1;

!!HEy3:Ed/?y11; Проверка уровня героя с большим уровнем
!!HEy4:Ed/?y12; Проверка уровня героя с меньшим уровнем

!!VRy7:Sy11 -y12 *5 *y5; опыт 50 * разницу в уровнях * уровень навыка обучение

!!HEy4:Edy7; добавить герою опыт

!!SN:W^H3_Scholar_H1%Y1_H2%Y2_%Y60^/1; [Set Flag so it can only happen once per day]
!!SN:W^H3_Scholar_H1%Y2_H2%Y1_%Y60^/1;

ZVSE

; Скрипт: Заклинания огня наносят вампирам двойной урон
; Плащ Короля Нежити и мантия Вампира убирают уязвимость к огню

!?BG0; [перед действием в бою]
!!BG:A?y1; !!FU&y1<>1:E; [y1 - тип действия, выход, если не колдовство героя]
!!BG:S?y1; !!FU&y1<>21/y1<22/y1<11/y1<13/y1<29:E; [выход, если не огненное закл.]
!!BG:N?y1; !!BMy1:T?y2; !!FU&y2<>63/y2<>62:E; [номер стека, тип существа, выход если не вампиры]

!!BG:H?y1;
!!HEy1:A2/130/d/?y2; !!FU&y2>0:E; [130 Плащ Короля Нежити выход если надеты]
!!HEy1:A2/55/d/?y2; !!FU&y2>0:E; [55 Мантия Вампира выход если надеты]

!!SN:W^vampfire^/1; [выставление флага урон огнем по вампирам]

!?BG1; [при передаче хода]
!!SN:W^vampfire^/0; [сброс флага урон огнем по вампирам]

!?MR1;
!!SN:W^vampfire^/?y1; [выход, если не урон огнем по вампирам]
!!MR&y1>0:F?y4 Fdy4; [удвоение базового урона]

** end