# fight
if $ARGS[0] = 'start':
cla
inFight = 1
fcolor = rgb(0, 0, 0)
bcolor = rgb(255, 255, 255)
lcolor = rgb(106, 90, 205)
gs 'defence'
gs 'statBat'
if SasoriBody > 2 and healthV <= 0 or SasoriBody > 2 and mannaV <= 0 or SasoriBody > 2 and willpowerV <= 0:
set SasoriBody -= 1
gs 'priziv', 'sasori'
'Doll crumbled into parts, and immediately entered into battle other doll Sasori.'
'You´ve heard the sonorous voice Sasori "I have a lot of dolls, you can not win."'
end
if SasoriBody = 2 and healthV <= 0 or SasoriBody = 2 and mannaV <= 0 or SasoriBody = 2 and willpowerV <= 0:
set SasoriBody -= 1
gs 'priziv', 'sasori1'
'Last doll crumbled into pieces and entered the fight Sasori himself.'
end
if stunV > 0 and SasoriBody > 1:
set stunV = 0
'Doll began to move again.'
end
if stunV > 0 and SasoriBody = 1:
set stunV = 0
'again moves Sasori.'
end
if GedoMazo = 1 and healthV <= 0 or GedoMazo = 1 and mannaV <= 0 or GedoMazo = 1 and willpowerV <= 0:
set GedoMazo = 2
set barierV = 0
'<<$nameV>> fell to the ground turning into ashes'
gs 'priziv', 'tobi'
'<<$nameV>> attacked you'
end
if health <= 0 and heart = 0 and izanagi = 0:
'you lose'
xgt 'ender', 'loss'
exit
end
if healthV <= 0 and heartV = 0 and izanagiV = 0:
'<<$nameV>> lost'
xgt 'ender', 'win'
exit
end
if manna <= 0 and heart = 0 and izanagi = 0:
'you lose'
xgt 'ender', 'loss'
exit
end
if mannaV <= 0 and heartV = 0 and izanagiV = 0:
'<<$nameV>> lost'
xgt 'ender', 'win'
exit
end
if willpower <= 0 and heart = 0 and izanagi = 0:
'you lose'
xgt 'ender', 'loss'
exit
end
if willpowerV <= 0 and heartV = 0 and izanagiV = 0:
'<<$nameV>> lost'
xgt 'ender', 'win'
exit
end
if izanagiV > 0 and healthV <= 0 or izanagiV > 0 and mannaV <= 0 or izanagiV > 0 and willpowerV <= 0:
set izanagiV -= 1
'<<$nameV>> simply disappeared'
set healthV = vitalV * 10 + strenV * 5
set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
set willpowerV = willV * 10
set stunV = 0
if program = 6 and izanagiOnce = 0:set izanagiOnce = 1 & set unmaterialV = 40 & set tobizanagi = 0
'<<$nameV>> was in front of you completely healthy. He folded his hands and Arcanum said Izanagi - perfect illusion.'
'One of his eyes closed for ever, paying for it with a spell.'
end
if heartV > 0 and healthV <= 0 or heartV > 0 and mannaV <= 0 or heartV > 0 and willpowerV <= 0:
set heartV -= 1
'<<$nameV>> staggered and his heart burst'
set healthV = vitalV * 10 + strenV * 5
set mannaV = intelV * magikV + magikV * 100 + vitalV * 10
set willpowerV = willV * 10
set stunV = 0
'<<$nameV>> stood up and rushed into the fray. He has run another heart.'
end
if izanagi > 0 and health <= 0 or izanagi > 0 and manna <= 0 or izanagi > 0 and willpower <= 0:
set izanagi -= 1
'You are gone'
set health = vital * 10 + stren * 5
set willpower = intel * 5 + will * 5
set manna = intel * magik + magik * 100 + vital * 10 + rikudo
set stun = 0
set zerkaloV = 0
set poisonV = 0
set bloodV = 0
'Immediately before the enemy appeared completely healthy.'
end
if heart > 0 and health <= 0 or heart > 0 and manna <= 0 or heart > 0 and willpower <= 0:
set heart -= 1
set zerkaloV = 0
set poisonV = 0
set bloodV = 0
'Your heart gave out and snapped.'
set health = vital * 10 + stren * 5
set willpower = intel * 5 + will * 5
set manna = intel * magik + magik * 100 + vital * 10 + rikudo
set stun = 0
'You´re not dead, you run another heart.'
end
gs 'before'
'=========================================================='
'======================== (ROUND <>) ==========================='
'=========================================================='
'<<$nameV>> Life <>, manna <>, the force will (9 )<>'
if defenceV > 0:'Protection <> units'
if defenceMV > 0:'Protection of manna <> units'
if defenceWV > 0:'will protection <> units'
'Your life <>, the manna <>, willpower <> ( 5)'
if defence > 0:'Protection <> units'
if defenceM > 0:'Protection from the effects of manna <> units'
if defenceW > 0:'Protection from the effects at will <> units'
if defenceAct > 0:'<> moves the regeneration of protection'
if defenceActM > 0:'<> moves the protection from the effects of regeneration manna'
if unmaterial > 0:', Left <> moves not materiality.'
'=========================================================='
gs 'init'
if hod = 0:
!!Player attacks
'You can attack'
if gun > 0:
!!Boomstick
if bulletIn > 0:
'<> load cartridges in gun'
act 'Shoot a gun':
cla
bulletIn -= 1
gunpower = 150
buu = 1
gunpricel = 1
Gcrime += 1
gt 'strelba'
end
end
if bulletIn <= 0:
if bullet = 0:'Ammunition for the gun ran.'
if bullet > 0:
'<> ammunition for the pistol'
act 'Reload':
cla
if bullet < 7:
bulletIn = bullet
bullet = 0
'You loaded any remaining bullets in the gun.'
end
if bullet >= 7:
bullet -= 7
bulletIn = 7
'You loaded 7m rounds in the gun.'
end
act 'Further':gt 'fight', 'sta'
end
end
end
end
if Mgun > 0:
!!Boomstick
if mbulletIn > 0:
'<> load cartridges in the machine'
act 'Of single machine':
cla
mbulletIn -= 1
buu = 1
gunpower = 300
gunpricel = 2
Gcrime += 1
gt 'strelba'
end
if mbulletIn >= 3:
act 'A short burst of machine':
cla
mbulletIn -= 3
buu = 3
gunpower = 300
gunpricel = 1
Gcrime += buu
gt 'strelba'
end
end
if mbulletIn >= 3:
act 'Long queue of machine':
cla
buu = mbulletIn
mbulletIn = 0
gunpower = 300
gunpricel = 0
Gcrime += buu
gt 'strelba'
end
end
end
if mbulletIn <= 0:
if mbullet = 0:'Chucks for machine ran.'
if mbullet > 0:
'<> ammunition for the machine'
act 'Reload':
cla
if mbullet < 7:
mbulletIn = mbullet
mbullet = 0
'You loaded any remaining ammunition into the machine.'
end
if mbullet >= 30:
mbullet -= 30
mbulletIn = 30
'You loaded the 30 rounds in the machine.'
end
act 'Further':gt 'fight', 'sta'
end
end
end
end
if tragun > 0:
!!Travmatik
if tbulletIn > 0:
'travmatik loaded'
act 'Shoot a gun':
cla
tbulletIn -= 1
gunpower = 50
buu = 1
gunpricel = 0
gt 'strelba'
end
end
if tbulletIn <= 0:
if tbullet = 0:'Cartridges ran travmatika.'
if tbullet > 0:
'<> cartridges for travmatika'
act 'Reload':
cla
if tbullet >= 1:
tbullet -= 1
tbulletIn = 1
'You loaded the cartridge in travmatik.'
end
act 'Further':gt 'fight', 'sta'
end
end
end
end
act 'Physical Attack':xgt 'boxing'
if magik > 0:
act 'Magical Attack':gt 'magik'
end
end
if hod = 1:
!!Enemy attacks
'<<$nameV>> attacks'
act 'Further':xgt 'enemy', 'start'
end
end
if $ARGS[0] = 'sta':
cla
set damTip = 0
set damTipM = 0
set damTipV = 0
set damTipMV = 0
set magweapbonus = 0
set magweapbonusV = 0
set bonusSh = 0
set bonusShV = 0
set eleSh = 0
set eleShV = 0
set poisonAV = 0
set hidanAtk = 0
'=========================================================='
'<<$nameV>> Life <>, manna <>, the force will (9 )<>'
if defenceV > 0:'Protection <> units'
if defenceMV > 0:'Protection of manna <> units'
if defenceWV > 0:'will protection <> units'
'Your life <>, the manna <>, willpower <> ( 5)'
if defence > 0:'Protection <> units'
if defenceM > 0:'Protection from the effects of manna <> units'
if defenceW > 0:'Protection from the effects at will <> units'
if defenceAct > 0:'<> moves the regeneration of protection'
if defenceActM > 0:'<> moves the protection from the effects of regeneration manna'
'=========================================================='
act 'Further':gt 'fight', 'start'
end
--- fight ---------------------------------