Всадники Кальрадии

Модификации => Обмен опытом: Mount&Blade => Обмен опытом (в помощь мододелу) => Вопросы и ответы по модостроению => Тема начата: lutar от 06 Мая, 2012, 12:18

Название: Скрипт потери сил в бою (blood loss)
Отправлено: lutar от 06 Мая, 2012, 12:18

Отказывается  работать  скрипт  потери  крови  в  сражении.

Ссылка  на  оригинал  - 

http://mbx.streetofeyes.com/index.php/topic,1579.msg31557.html#msg31557

Ставится  все  довольно просто 

### constants ###

Код: [Выделить]

# Agent slots, make sure these slots are not used for something else
slot_agent_bleed = 8
slot_agent_rate  = 9    # rate of blood loss
slot_agent_hp    = 12

# Various constants
absolute = 1
true     = 1
false    = 0
player   = 0

# Bleeding
blood_per_hp  = 300
dmg_threshold = 3
dmg_low_range = 6
dmg_hi_range  = 12

module_scripts.py

Код: [Выделить]

bloodScripts = [
    ("monitor_health",
    [
        (try_for_agents,":agent_id"),
            (agent_is_alive,":agent_id"),
            (store_agent_hit_points,":current_hp",":agent_id",absolute),
            (agent_get_slot,":old_hp",":agent_id",slot_agent_hp),
            (try_begin),
                (gt,":old_hp",":current_hp"), # Damage taken
                (agent_set_slot,":agent_id",slot_agent_hp,":current_hp"),
                (store_sub,":new_rate",":old_hp",":current_hp"),
                (gt,":new_rate",dmg_threshold),
               
                #debug start
                (str_store_agent_name,s1,":agent_id"),
                (assign,reg1,":new_rate"),
                (try_begin),
                    (agent_is_human,":agent_id"),
                    (display_message,"@{s1} recived {reg1} damage"),
                (else_try),
                    (display_message,"@{s1}s horse recived {reg1} damage"),
                (try_end),
                #debug end
               
                (val_sub,":new_rate",dmg_threshold),
                (store_random_in_range,":mul",dmg_low_range,dmg_hi_range),
                (val_mul,":new_rate",":mul"),
                (val_div,":new_rate",10),
               
                #debug start
                (assign,reg1,":new_rate"),
                (display_message,"@damage reduced to {reg1}"),
                #debug end
               
                (agent_get_slot,":old_rate",":agent_id",slot_agent_rate),
                (val_add,":new_rate",":old_rate"),
                (agent_set_slot,":agent_id",slot_agent_rate,":new_rate"),
            (else_try),
                (eq,":old_hp",0), # Init agent
                (agent_set_slot,":agent_id",slot_agent_hp,":current_hp"),
            (try_end),
        (try_end),
    ]),
   
    ("bleed",
    [
        (try_for_agents,":agent_id"),
            (agent_is_alive,":agent_id"),
            (agent_get_slot,":rate",":agent_id",slot_agent_rate),
            (gt,":rate",0),
            (agent_get_slot,":blood",":agent_id",slot_agent_bleed),
            (val_add,":blood",":rate"),
            (store_div,":hp_loss",":blood",blood_per_hp),
            (try_begin),
                (gt,":hp_loss",0), # the agent has lost enough blood to lose hitpoints
                (store_agent_hit_points,":hp",":agent_id",absolute),
                (val_sub,":hp",":hp_loss"),
               
                #debug start
                (str_store_agent_name,s1,":agent_id"),
                (assign,reg1,":rate"),
                (assign,reg2,":hp"),
                (try_begin),
                    (agent_is_human,":agent_id"),
                    (display_message,"@{s1} is bleeding: rate = {reg1}, HP = {reg2}"),
                (else_try),
                    (display_message,"@{s1}s horse is bleeding: rate = {reg1}, HP = {reg2}"),
                (try_end),
                #debug end
               
                (try_begin),
                    (gt,":hp",0),
                    (agent_set_hit_points,":agent_id",":hp",absolute),
                    (agent_set_slot,":agent_id",slot_agent_hp,":hp"),
                    (store_mul,":tmp",":hp_loss",blood_per_hp),
                    (val_sub,":blood",":tmp"),
                    (agent_set_slot,":agent_id",slot_agent_bleed,":blood"),
                (else_try),
                    (call_script,"script_get_enemy_agent",":agent_id"),
                    (agent_deliver_damage_to_agent,reg0,":agent_id"),
                (try_end),
            (else_try),
                (agent_set_slot,":agent_id",slot_agent_bleed,":blood"),
            (try_end),
        (try_end),
    ]),
   
    ("get_enemy_agent",
    [
        (store_script_param,":target_agent_id",1),
        (try_begin),
            (agent_is_ally,":target_agent_id"),
            (agent_is_human,":target_agent_id"),    # a horse agent can not cause damage
            (assign,reg0,":target_agent_id"),
        (else_try),
            (get_player_agent_no,reg0),
        (try_end),
    ]),
]


module_mission_templates.py

Код: [Выделить]

# blood loss
monitor_health = (
    0.05, 0.0, 0.0,
        [],
        [
            (call_script,"script_monitor_health"),
        ])

bleed = (
    1.0, 0.0, 0.0,
        [],
        [
            (call_script,"script_bleed"),
        ])

# add triggers to all mission templates

for template in mission_templates:
    template[-1].append(monitor_health)
    template[-1].append(bleed)

Вопрос  ,Что  здесь  нужно  уточнить  для  правильной  работы  кода  ?   

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: FinGall от 06 Мая, 2012, 14:24

Там в у автора в скриптах есть ещё внизу:
scripts.extend(bloodScripts)
Может из-за этого? =/

А вообще, зачем такие сложности. Дополнительные слоты. Эти переливания крови вряд ли кто заметит.
В Дипломатии есть небольшой скрипт уменьшающий скорость коней от ранений. Может и здесь сделать так же. (Кстати, эта фишка на скорость агента вроде не влияет, а должна бы.)

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: lutar от 06 Мая, 2012, 20:00

В  Brytenwalda  именно  этот скрипт и  довольно хорошо  работает там  все .   Что там  есть в Дипломатии не важно,  нужен именно  этот скрипт  потери  крови в бою со  всеми слотами,  которые  заметны , кто играл.

Цитата: FinGall от 06 Мая, 2012, 14:24

Там в у автора в скриптах есть ещё внизу:
scripts.extend(bloodScripts)
Может из-за этого?

У  автора  есть еще  внизу 

   template[-1].append    -   Гадать  не имеет  смысла.   Нужен  кодер  для  разрешения  вопроса,а  не для  утешения .  Можно без скриптов  вообще обойтись но  мне нужен  именно  этот. :)

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: Leon473 от 06 Мая, 2012, 21:15

В module_scripts.py

Код: [Выделить]

bloodScripts = [
    ("monitor_health",
    [
        (try_for_agents,":agent_id"),
            (agent_is_alive,":agent_id"),
            (store_agent_hit_points,":current_hp",":agent_id",absolute),
            (agent_get_slot,":old_hp",":agent_id",slot_agent_hp),
            (try_begin),
                (gt,":old_hp",":current_hp"), # Damage taken
                (agent_set_slot,":agent_id",slot_agent_hp,":current_hp"),
                (store_sub,":new_rate",":old_hp",":current_hp"),
                (gt,":new_rate",dmg_threshold),
               
                #debug start
                (str_store_agent_name,s1,":agent_id"),
                (assign,reg1,":new_rate"),
                (try_begin),
                    (agent_is_human,":agent_id"),
                    (display_message,"@{s1} recived {reg1} damage"),
                (else_try),
                    (display_message,"@{s1}s horse recived {reg1} damage"),
                (try_end),
                #debug end
               
                (val_sub,":new_rate",dmg_threshold),
                (store_random_in_range,":mul",dmg_low_range,dmg_hi_range),
                (val_mul,":new_rate",":mul"),
                (val_div,":new_rate",10),
               
                #debug start
                (assign,reg1,":new_rate"),
                (display_message,"@damage reduced to {reg1}"),
                #debug end
               
                (agent_get_slot,":old_rate",":agent_id",slot_agent_rate),
                (val_add,":new_rate",":old_rate"),
                (agent_set_slot,":agent_id",slot_agent_rate,":new_rate"),
            (else_try),
                (eq,":old_hp",0), # Init agent
                (agent_set_slot,":agent_id",slot_agent_hp,":current_hp"),
            (try_end),
        (try_end),
    ]),
   
    ("bleed",
    [
        (try_for_agents,":agent_id"),
            (agent_is_alive,":agent_id"),
            (agent_get_slot,":rate",":agent_id",slot_agent_rate),
            (gt,":rate",0),
            (agent_get_slot,":blood",":agent_id",slot_agent_bleed),
            (val_add,":blood",":rate"),
            (store_div,":hp_loss",":blood",blood_per_hp),
            (try_begin),
                (gt,":hp_loss",0), # the agent has lost enough blood to lose hitpoints
                (store_agent_hit_points,":hp",":agent_id",absolute),
                (val_sub,":hp",":hp_loss"),
               
                #debug start
                (str_store_agent_name,s1,":agent_id"),
                (assign,reg1,":rate"),
                (assign,reg2,":hp"),
                (try_begin),
                    (agent_is_human,":agent_id"),
                    (display_message,"@{s1} is bleeding: rate = {reg1}, HP = {reg2}"),
                (else_try),
                    (display_message,"@{s1}s horse is bleeding: rate = {reg1}, HP = {reg2}"),
                (try_end),
                #debug end
               
                (try_begin),
                    (gt,":hp",0),
                    (agent_set_hit_points,":agent_id",":hp",absolute),
                    (agent_set_slot,":agent_id",slot_agent_hp,":hp"),
                    (store_mul,":tmp",":hp_loss",blood_per_hp),
                    (val_sub,":blood",":tmp"),
                    (agent_set_slot,":agent_id",slot_agent_bleed,":blood"),
                (else_try),
                    (call_script,"script_get_enemy_agent",":agent_id"),
                    (agent_deliver_damage_to_agent,reg0,":agent_id"),
                (try_end),
            (else_try),
                (agent_set_slot,":agent_id",slot_agent_bleed,":blood"),
            (try_end),
        (try_end),
    ]),
   
    ("get_enemy_agent",
    [
        (store_script_param,":target_agent_id",1),
        (try_begin),
            (agent_is_ally,":target_agent_id"),
            (agent_is_human,":target_agent_id"),    # a horse agent can not cause damage
            (assign,reg0,":target_agent_id"),
        (else_try),
            (get_player_agent_no,reg0),
        (try_end),
    ]),
]
 
scripts.extend(bloodScripts)

в module_mission_templates.py

Код: [Выделить]

# blood loss
monitor_health = (
    0.05, 0.0, 0.0,
        [],
        [
            (call_script,"script_monitor_health"),
        ])

bleed = (
    1.0, 0.0, 0.0,
        [],
        [
            (call_script,"script_bleed"),
        ])

for template in mission_templates:
    template[5].append(monitor_health)
    template[5].append(bleed)

Сам код я не менял, подправил лишь питоновские функции. Если проблема заключалась в том, что он скрипт вообще не работал, то может поможет. Сам не тестировал, если кто-то протестит, то, пожалуйста, отпишитесь здесь.

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: lutar от 06 Мая, 2012, 21:59

Вопрос  - куда  прописывать  это  - 


for template in mission_templates:
    template[5].append(monitor_health)
    template[5].append(bleed)

Я  эту  часть  не  ставил  ,так как  с ней  вылезают  ошибки   при  компиляции  . В  mission_templates   добавлял  как  обычно  с  нужные сцены  monitor_health  и  bleed .

Еще  -  в  скрипт  прописывал   не  bloodScripts = [   - как   в оригинале,а     с  #bloodScripts = [ ......      Иначе  ошибки вылезают.

Как  правильно  надо  ?

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: Leon473 от 06 Мая, 2012, 22:05

Именно тот код что я запостил вставляй в сами концы файлов, после последних закрывающих скобок.

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: lutar от 06 Мая, 2012, 22:41

Естественно  не  работает  и  ошибки именно   с  этими  в конце  добавлениями.. Этот код  не такой  уж большой и сложный,его можно  опробовать  у себя  для эксперимента  вначале .
Синтаксическая ошибка  постоянно  при  компиляции.

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: Leon473 от 06 Мая, 2012, 23:17

Я еще когда предыдущий пост писал проверил работает ли оно, и у меня все компилируется нормально и без каких либо ошибок.
А если убрать те добавления в конце, то код вообще не добавится, так как при компиляции в текстовик будет просто проигнорирован.

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: lutar от 06 Мая, 2012, 23:35

Вас понял.  Прием. )  Вероятно  мне надо  на  чистой версии  попробовать, может быть  что то дублируется  из за  прошлых  попыток  поставить  этот скрипт.

Значит ,я  ставлю  это в  константы 

Код: [Выделить]

# Agent slots, make sure these slots are not used for something else
slot_agent_bleed = 8
slot_agent_rate  = 9    # rate of blood loss
slot_agent_hp    = 12

# Various constants
absolute = 1
true     = 1
false    = 0
player   = 0

# Bleeding
blood_per_hp  = 300
dmg_threshold = 3
dmg_low_range = 6
dmg_hi_range  = 12

А  потом  вот  это 
 

Цитата: Leon473 от 06 Мая, 2012, 21:15

В module_scripts.py

Код: [Выделить]

bloodScripts = [
    ("monitor_health",
    [
        (try_for_agents,":agent_id"),
            (agent_is_alive,":agent_id"),
            (store_agent_hit_points,":current_hp",":agent_id",absolute),
            (agent_get_slot,":old_hp",":agent_id",slot_agent_hp),
            (try_begin),
                (gt,":old_hp",":current_hp"), # Damage taken
                (agent_set_slot,":agent_id",slot_agent_hp,":current_hp"),
                (store_sub,":new_rate",":old_hp",":current_hp"),
                (gt,":new_rate",dmg_threshold),
               
                #debug start
                (str_store_agent_name,s1,":agent_id"),
                (assign,reg1,":new_rate"),
                (try_begin),
                    (agent_is_human,":agent_id"),
                    (display_message,"@{s1} recived {reg1} damage"),
                (else_try),
                    (display_message,"@{s1}s horse recived {reg1} damage"),
                (try_end),
                #debug end
               
                (val_sub,":new_rate",dmg_threshold),
                (store_random_in_range,":mul",dmg_low_range,dmg_hi_range),
                (val_mul,":new_rate",":mul"),
                (val_div,":new_rate",10),
               
                #debug start
                (assign,reg1,":new_rate"),
                (display_message,"@damage reduced to {reg1}"),
                #debug end
               
                (agent_get_slot,":old_rate",":agent_id",slot_agent_rate),
                (val_add,":new_rate",":old_rate"),
                (agent_set_slot,":agent_id",slot_agent_rate,":new_rate"),
            (else_try),
                (eq,":old_hp",0), # Init agent
                (agent_set_slot,":agent_id",slot_agent_hp,":current_hp"),
            (try_end),
        (try_end),
    ]),
   
    ("bleed",
    [
        (try_for_agents,":agent_id"),
            (agent_is_alive,":agent_id"),
            (agent_get_slot,":rate",":agent_id",slot_agent_rate),
            (gt,":rate",0),
            (agent_get_slot,":blood",":agent_id",slot_agent_bleed),
            (val_add,":blood",":rate"),
            (store_div,":hp_loss",":blood",blood_per_hp),
            (try_begin),
                (gt,":hp_loss",0), # the agent has lost enough blood to lose hitpoints
                (store_agent_hit_points,":hp",":agent_id",absolute),
                (val_sub,":hp",":hp_loss"),
               
                #debug start
                (str_store_agent_name,s1,":agent_id"),
                (assign,reg1,":rate"),
                (assign,reg2,":hp"),
                (try_begin),
                    (agent_is_human,":agent_id"),
                    (display_message,"@{s1} is bleeding: rate = {reg1}, HP = {reg2}"),
                (else_try),
                    (display_message,"@{s1}s horse is bleeding: rate = {reg1}, HP = {reg2}"),
                (try_end),
                #debug end
               
                (try_begin),
                    (gt,":hp",0),
                    (agent_set_hit_points,":agent_id",":hp",absolute),
                    (agent_set_slot,":agent_id",slot_agent_hp,":hp"),
                    (store_mul,":tmp",":hp_loss",blood_per_hp),
                    (val_sub,":blood",":tmp"),
                    (agent_set_slot,":agent_id",slot_agent_bleed,":blood"),
                (else_try),
                    (call_script,"script_get_enemy_agent",":agent_id"),
                    (agent_deliver_damage_to_agent,reg0,":agent_id"),
                (try_end),
            (else_try),
                (agent_set_slot,":agent_id",slot_agent_bleed,":blood"),
            (try_end),
        (try_end),
    ]),
   
    ("get_enemy_agent",
    [
        (store_script_param,":target_agent_id",1),
        (try_begin),
            (agent_is_ally,":target_agent_id"),
            (agent_is_human,":target_agent_id"),    # a horse agent can not cause damage
            (assign,reg0,":target_agent_id"),
        (else_try),
            (get_player_agent_no,reg0),
        (try_end),
    ]),
]
 
scripts.extend(bloodScripts)

в module_mission_templates.py

Код: [Выделить]

# blood loss
monitor_health = (
    0.05, 0.0, 0.0,
        [],
        [
            (call_script,"script_monitor_health"),
        ])

bleed = (
    1.0, 0.0, 0.0,
        [],
        [
            (call_script,"script_bleed"),
        ])

for template in mission_templates:
    template[5].append(monitor_health)
    template[5].append(bleed)

Причем  эта  часть 

Код: [Выделить]

.....        (try_end),
    ]),
]
 
scripts.extend(bloodScripts)попадает   в  самый  конец  всех  строк  module_scripts.py

Надеюсь  получится..

##############################################

Name ` bloodScripts  ` is not  defined ...   :blink:

В  чем же  проблема  ?   Наверно  не  в  ту  часть  вставка  блоков  у меня  ? 

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: FinGall от 07 Мая, 2012, 06:10

Я всё-таки не понимаю. Зачем делат новые скрипты отдельным списком, а потом прибавлять его к списку scripts. Разве не проще, сразу добавить эти скрипты в список scripts.

И в module_mission_templates.py примерно то же самое. Можно ведь и без путоновских функций. В начале файла самому создать список template (или с другим именем).
Получится где-то так:

#В самом начале module_mission_templates

# blood

lossmonitor_health = (    0.05, 0.0, 0.0,        [],        [            (call_script,"script_monitor_health"),        ])

bleed = (    1.0, 0.0, 0.0,        [],        [            (call_script,"script_bleed"),        ])

template = [
lossmonitor_health,
bleed,
]

А потом надо добавить template во все батальные сцены.
В конце. Между последними "]" и ")".
Вот так:
  ]
  +template,
),

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: lutar от 07 Мая, 2012, 09:28

ОК !  Попробуем  так  с  миссион _.

Но  скрипт  нужно  так  добавить  как  он есть или  по другому  ? 
Попробую. Все дело в  том, что при компиляции не принимаются  строки  после  ]  в самом конце
 
scripts.extend(bloodScripts)  и  в  скрипте   bloodScripts = [  в самом начале

Есть еще немного отличающийся  вариант  ,который  нашел у китайцев  http://www.mountblade.com.cn/html/72/t-81672.html

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: FinGall от 07 Мая, 2012, 11:38

Скрипты просто добавляются в module_scripts перед последней "]". Как обычно.

   ("monitor_health",
    [
        (try_for_agents,":agent_id"),
            (agent_is_alive,":agent_id"),
            (store_agent_hit_points,":current_hp",":agent_id",absolute),
            (agent_get_slot,":old_hp",":agent_id",slot_agent_hp),
            (try_begin),
                (gt,":old_hp",":current_hp"),   # Damage taken
                (agent_set_slot,":agent_id",slot_agent_hp,":current_hp"),
                (store_sub,":new_rate",":old_hp",":current_hp"),
                (gt,":new_rate",dmg_threshold),
               
                #debug start
                (str_store_agent_name,s1,":agent_id"),
                (assign,reg1,":new_rate"),
                (try_begin),
                    (agent_is_human,":agent_id"),
                    (display_message,"@{s1} recived {reg1} damage"),
                (else_try),
                    (display_message,"@{s1}s horse recived {reg1} damage"),
                (try_end),
                #debug end
               
                (val_sub,":new_rate",dmg_threshold),
                (store_random_in_range,":mul",dmg_low_range,dmg_hi_range),
                (val_mul,":new_rate",":mul"),
                (val_div,":new_rate",10),
               
                #debug start
                (assign,reg1,":new_rate"),
                (display_message,"@damage reduced to {reg1}"),
                #debug end
               
                (agent_get_slot,":old_rate",":agent_id",slot_agent_rate),
                (val_add,":new_rate",":old_rate"),
                (agent_set_slot,":agent_id",slot_agent_rate,":new_rate"),
            (else_try),
                (eq,":old_hp",0),   # Init agent
                (agent_set_slot,":agent_id",slot_agent_hp,":current_hp"),
            (try_end),
        (try_end),
    ]),
   
    ("bleed",
    [
        (try_for_agents,":agent_id"),
            (agent_is_alive,":agent_id"),
            (agent_get_slot,":rate",":agent_id",slot_agent_rate),
            (gt,":rate",0),
            (agent_get_slot,":blood",":agent_id",slot_agent_bleed),
            (val_add,":blood",":rate"),
            (store_div,":hp_loss",":blood",blood_per_hp),
            (try_begin),
                (gt,":hp_loss",0), # the agent has lost enough blood to lose hitpoints
                (store_agent_hit_points,":hp",":agent_id",absolute),
                (val_sub,":hp",":hp_loss"),
               
                #debug start
                (str_store_agent_name,s1,":agent_id"),
                (assign,reg1,":rate"),
                (assign,reg2,":hp"),
                (try_begin),
                    (agent_is_human,":agent_id"),
                    (display_message,"@{s1} is bleeding: rate = {reg1}, HP = {reg2}"),
                (else_try),
                    (display_message,"@{s1}s horse is bleeding: rate = {reg1}, HP = {reg2}"),
                (try_end),
                #debug end
               
                (try_begin),
                    (gt,":hp",0),
                    (agent_set_hit_points,":agent_id",":hp",absolute),
                    (agent_set_slot,":agent_id",slot_agent_hp,":hp"),
                    (store_mul,":tmp",":hp_loss",blood_per_hp),
                    (val_sub,":blood",":tmp"),
                    (agent_set_slot,":agent_id",slot_agent_bleed,":blood"),
                (else_try),
                    (call_script,"script_get_enemy_agent",":agent_id"),
                    (agent_deliver_damage_to_agent,reg0,":agent_id"),
                (try_end),
            (else_try),
                (agent_set_slot,":agent_id",slot_agent_bleed,":blood"),
            (try_end),
        (try_end),
    ]),
   
    ("get_enemy_agent",
    [
        (store_script_param,":target_agent_id",1),
        (try_begin),
            (agent_is_ally,":target_agent_id"),
            (agent_is_human,":target_agent_id"),    # a horse agent can not cause damage
            (assign,reg0,":target_agent_id"),
        (else_try),
            (get_player_agent_no,reg0),
        (try_end),
    ]),



]

Все, что между  #debug start  #debug end - это вывод данных на экран.
Думаю, потом это можно будет удалить. (Кстати, китайцы так и сделали).

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: lutar от 07 Мая, 2012, 13:03

Цитата: FinGall от 07 Мая, 2012, 11:38

Скрипты просто добавляются в module_scripts перед последней "]". Как обычно.

   ("monitor_health",
    [
        (try_for_agents,":agent_id"),
            (agent_is_alive,":agent_id"),
            (store_agent_hit_points,":current_hp",":agent_id",absolute),
            (agent_get_slot,":old_hp",":agent_id",slot_agent_hp),
            (try_begin),
                (gt,":old_hp",":current_hp"),   # Damage taken
                (agent_set_slot,":agent_id",slot_agent_hp,":current_hp"),
                (store_sub,":new_rate",":old_hp",":current_hp"),
                (gt,":new_rate",dmg_threshold),
               
                #debug start
                (str_store_agent_name,s1,":agent_id"),
                (assign,reg1,":new_rate"),
                (try_begin),
                    (agent_is_human,":agent_id"),
                    (display_message,"@{s1} recived {reg1} damage"),
                (else_try),
                    (display_message,"@{s1}s horse recived {reg1} damage"),
                (try_end),
                #debug end
               
                (val_sub,":new_rate",dmg_threshold),
                (store_random_in_range,":mul",dmg_low_range,dmg_hi_range),
                (val_mul,":new_rate",":mul"),
                (val_div,":new_rate",10),
               
                #debug start
                (assign,reg1,":new_rate"),
                (display_message,"@damage reduced to {reg1}"),
                #debug end
               
                (agent_get_slot,":old_rate",":agent_id",slot_agent_rate),
                (val_add,":new_rate",":old_rate"),
                (agent_set_slot,":agent_id",slot_agent_rate,":new_rate"),
            (else_try),
                (eq,":old_hp",0),   # Init agent
                (agent_set_slot,":agent_id",slot_agent_hp,":current_hp"),
            (try_end),
        (try_end),
    ]),
   
    ("bleed",
    [
        (try_for_agents,":agent_id"),
            (agent_is_alive,":agent_id"),
            (agent_get_slot,":rate",":agent_id",slot_agent_rate),
            (gt,":rate",0),
            (agent_get_slot,":blood",":agent_id",slot_agent_bleed),
            (val_add,":blood",":rate"),
            (store_div,":hp_loss",":blood",blood_per_hp),
            (try_begin),
                (gt,":hp_loss",0), # the agent has lost enough blood to lose hitpoints
                (store_agent_hit_points,":hp",":agent_id",absolute),
                (val_sub,":hp",":hp_loss"),
               
                #debug start
                (str_store_agent_name,s1,":agent_id"),
                (assign,reg1,":rate"),
                (assign,reg2,":hp"),
                (try_begin),
                    (agent_is_human,":agent_id"),
                    (display_message,"@{s1} is bleeding: rate = {reg1}, HP = {reg2}"),
                (else_try),
                    (display_message,"@{s1}s horse is bleeding: rate = {reg1}, HP = {reg2}"),
                (try_end),
                #debug end
               
                (try_begin),
                    (gt,":hp",0),
                    (agent_set_hit_points,":agent_id",":hp",absolute),
                    (agent_set_slot,":agent_id",slot_agent_hp,":hp"),
                    (store_mul,":tmp",":hp_loss",blood_per_hp),
                    (val_sub,":blood",":tmp"),
                    (agent_set_slot,":agent_id",slot_agent_bleed,":blood"),
                (else_try),
                    (call_script,"script_get_enemy_agent",":agent_id"),
                    (agent_deliver_damage_to_agent,reg0,":agent_id"),
                (try_end),
            (else_try),
                (agent_set_slot,":agent_id",slot_agent_bleed,":blood"),
            (try_end),
        (try_end),
    ]),
   
    ("get_enemy_agent",
    [
        (store_script_param,":target_agent_id",1),
        (try_begin),
            (agent_is_ally,":target_agent_id"),
            (agent_is_human,":target_agent_id"),    # a horse agent can not cause damage
            (assign,reg0,":target_agent_id"),
        (else_try),
            (get_player_agent_no,reg0),
        (try_end),
    ]),



]

Все, что между  #debug start  #debug end - это вывод данных на экран.
Думаю, потом это можно будет удалить. (Кстати, китайцы так и сделали).

Вывод  данных  на  экран  желательно  сделать  более   "красноречивым" -  Blood  loss  - 1 например ..  Этот скрипт  заставляет  рассчитывать силы  ,отводить  некоторые  войска  с поля  боя  ,экономить  время  ...  В  Brytenwalda  наблюдать интересно  как  валятся   раненые  в конце концов  ,  спешишь  закончить  все  в  свою  пользу  пока не потеряны  войска   и  т.п.

  Вопрос  с  этим  .Если  последние  скобки  вот  так  ],),   то   добавлять  следует  ], +template,
  ),      или все же   ] + template,
  ),  - убирая  запятую . ?  Имеет  это  значение   ?   

Все  расписал  как  указано    этот  раз  ,ошибок  компиляции  нет  ,но и  работы  скрипта  не  заметил  отчего то  пока.. :blink:

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: FinGall от 07 Мая, 2012, 14:44

Цитировать (выделенное)

Вопрос  с  этим  .Если  последние  скобки  вот  так  ],),   то   добавлять  следует  ], +template,
  ),      или все же   ] + template,
  ),  - убирая  запятую . ?  Имеет  это  значение   ?

Это последние скобки в сцене. Я всегда запятую убираю, когда добавляю с плюсом. После template вроде тоже нет запятой. (это я там ошибся).
]
 + template
),
 Вроде всегда срабатывало. (Но точно не знаю, как правельнее.)

Например, турнир записан вот так:
    ],
    tournament_triggers
  ),
Здесь без "+", но с ",".

Вообще, это как взять и вписать данные триггеры в сцену. То же самое. Если не работает, надо в скриптах искать причину.

Мне ещё непонятно:
# Agent slots, make sure these slots are not used for something else
slot_agent_bleed = 8
slot_agent_rate  = 9    # rate of blood loss
slot_agent_hp    = 12
Это ведь новые слоты для агентов, но слоты 8,9,12 уже заняты другими. Их наверно надо соответственно добвить после:
slot_agent_walker_occupation      = 25

slot_agent_bleed = 26
slot_agent_rate  = 27    # rate of blood loss
slot_agent_hp    = 28

И перед каждой сценой их надо заряжать.
Это если я правильно понял их назначение.  :blink:

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: lutar от 07 Мая, 2012, 15:24

Замечательно  ,Все  заработало.  :thumbup:

Константы не изменял.

Спасибо   вам ,    FinGall   и  Leon473   за  помощь .

Теперь  осталось  поправить только  вывод  данных  на  экран.а  то  эти    "имя пользователя  _  bleeding  horce  HP "  выглядит  странновато  ..  Лучше  просто  "... конь  теряет  кровь"    .или   " Герой  теряет  силы  ".. . А так  отлично  все.

Без  этого скрипта  реализма  меньше на мой взгляд.

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: Leon473 от 07 Мая, 2012, 20:01

Цитата: FinGall от 07 Мая, 2012, 06:10

Я всё-таки не понимаю. Зачем делат новые скрипты отдельным списком, а потом прибавлять его к списку scripts. Разве не проще, сразу добавить эти скрипты в список scripts.

Смысла в добавлении скриптов в module_scripts с помощью питоновских функций я тоже не вижу, но для mission_templates польза большая, так как не нужно самому вручную добавлять триггеры, можно просто добавить их автоматически во все миссии, с помощью одной простой функции, что намного проще и быстрее.

Название: Re: Скрипт потери сил в бою (blood loss)
Отправлено: HunterWolf от 07 Мая, 2012, 20:03

Цитата: lutar от 07 Мая, 2012, 15:24

Теперь  осталось  поправить только  вывод  данных  на  экран

Не ещё тему нормально оформить и всё подробно расписать, для чайников и переехать в раздел ОСП ;)