123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133 |
- # init
- !Расчет инициативы
- !Обязательно проверять наличие станов
- !hod переменная отвечающая за то кто будет атаковать
- !hod = 0 игрок атакует hod = 1 противник атакует
- !<font color = red><<$name>></font>
- if GedoMazo = 1 and stunV > 0: set stunV = 0 & set mannaV -= 1000 & '<font color = red><<$nameV>> with a deafening roar, emits large amounts of energy allowing you to attack him again.</font>'
- set initi = react * 20/100
- set initi -= dospehVes
- if initi < 0: set initi = 0
- set init = RAND(react - initi, react + initi) + initBonus
- set initiV = reactV * 20/100
- set initiV -= dospehVesV
- if initiV < 0: set initiV = 0
- set initV = RAND(reactV - initiV, reactV + initiV) + initBonusV
- if hodtime >= 3 and stun = 0 and stunV = 0 and initBonus = 0:
- !игрок уже трижды атаковал
- '<font color = red><<$nameV>> took the initiative</font>'
- set hod = 1
- set hodtime = 0
- exit
- end
- if hodtimeV >= 3 and stun = 0 and stunV = 0 and initBonusV = 0:
- !противник уже трижды атаковал
- '<font color = green>You took the lead</font>'
- set hod = 0
- set hodtimeV = 0
- exit
- end
- if stun = 0 and stunV = 0 and hodtime < 3 and hodtimeV < 3 or stun = 0 and stunV = 0 and initBonus > 0 or stun = 0 and stunV = 0 and initBonusV > 0:
- !оба не в стане
- if tuman = 0 and tumanV = 0:
- !нет тумана
- if init > initV:
- !инициативу захватил игрок
- '<font color = green>You took the initiative</font>'
- set hod = 0
- set hodtime += 1
- exit
- end
- if init < initV:
- !инициативу захватил противник
- '<font color = red><<$nameV>> took the initiative</font>'
- set hod = 1
- set hodtimeV += 1
- exit
- end
- if init = initV:
- set hod = RAND(0,1)
- if hod = 0: '<font color = green>You hardly seized the initiative</font>'
- if hod = 1: '<font color = red><<$nameV>> hardly took the initiative</font>'
- exit
- end
- end
- if tuman > 0:
- !туман игрока
- set tuman -= 1
- set initV = reactV - initiV
- if init > initV:
- !инициативу захватил игрок
- '<font color = green>In your fog <<$nameV>> does not have time for you and you took the initiative</font>'
- set hod = 0
- set hodtime += 1
- exit
- end
- if init < initV:
- !инициативу захватил противник
- '<font color = red>In spite of your fog <<$nameV>> took the initiative</font>'
- set hod = 1
- set hodtimeV += 1
- exit
- end
- if init = initV:
- set hod = RAND(0,1)
- if hod = 0: '<font color = green>You hardly seized the initiative in spite of your fog</font>'
- if hod = 1: '<font color = red><<$nameV>> in spite of your fog still took the initiative</font>'
- exit
- end
- end
- if tumanV > 0:
- !туман противника
- set tumanV -= 1
- set init = react - initi
- if init > initV:
- !инициативу захватил игрок
- '<font color = green>In spite of the fog, you took the initiative</font>'
- set hod = 0
- set hodtime += 1
- exit
- end
- if init < initV:
- !инициативу захватил противник
- '<font color = red><<$nameV>> use your fog easily captures initiative</font>'
- set hod = 1
- set hodtimeV += 1
- exit
- end
- if init = initV:
- set hod = RAND(0,1)
- if hod = 0: '<font color = green>You hardly seized the initiative in spite of the fog</font>'
- if hod = 1: '<font color = red><<$nameV>> use your fog took the initiative</font>'
- exit
- end
- end
- end
- if stun > 0:
- !игрок в стане
- set stun -= 1
- set hod = 1
- if tuman > 0: set tuman -= 1
- if tumanV > 0: set tumanV -= 1
- '<font color = red>You can not move, and <<$nameV>> easily captures initiative</font>'
- exit
- end
- if stunV > 0:
- !противник в стане
- set stunV -= 1
- set hod = 0
- if tuman > 0: set tuman -= 1
- if tumanV > 0: set tumanV -= 1
- '<font color = green><<$nameV>> can not move and you can easily grab the initiative</font>'
- exit
- end
- --- init ---------------------------------
|