# kikbox
if $ARGS[0] = 'start':
cla
if health <= 0:
'You lost by TKO'
xgt 'enderKik','lossKO'
exit
elseif healthV <= 0:
'<<$boy>> lost by TKO'
xgt 'enderKik','winKO'
exit
end
if round >= 1:
'
Round <>'
*nl
if sparing = 1:
''
else
''
end
cla
minround += 1
'= = = = = = = = = = = = = (ROUND <>) = = = = = = = = = = = = ='
if minround = 1:'Start of the round'
if minround = 2:'Time in round 0:30'
if minround = 3:'Time in round 1:00'
if minround = 4:'Time in round 1:30'
if minround = 5:'Time in round 2:00'
if minround = 6:'Time in round 2:30'
'<<$boy>> Life <>, Endurance <>'
'Your life <>, Endurance <>'
'= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = ='
'Your points <>Points opponent <>'
'= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = ='
gs 'initKik'
if hod = 0:
!!Player attacks
'You can attack'
act 'Fast Jab':
cla
damage = rand(stren/12, stren/8)
if damage <= 0:damage = 1
koefatak = (speed + react + jab) * 2
koefpop = koefatak * 20 / 100
popad = rand(koefatak - koefpop, koefatak + koefpop)
'You go for the quick jab and step forward.'
gs 'Kikatak', 'player'
xgt 'kikbox', 'sta'
end
act 'Power punch':
cla
damkoef = stren * 20 / 100
damage = rand(stren - damkoef, stren + damkoef)
if damage <= 0:damage = 1
koefatak = (speed + react + punch)
koefpop = koefatak * 20 / 100
popad = rand(koefatak - koefpop, koefatak + koefpop)
'You attempt a powerful punch.'
gs 'Kikatak', 'player'
xgt 'kikbox', 'sta'
end
act 'Big kick':
cla
damkoef = stren * 20 / 100
damage = rand((stren - damkoef) * 3, (stren + damkoef) * 3)
if damage <= 0:damage = 1
koefatak = (speed + react + kik) / 2
koefpop = koefatak * 20 / 100
popad = rand(koefatak - koefpop, koefatak + koefpop)
'You try a powerful kick.'
gs 'Kikatak', 'player'
xgt 'kikbox', 'sta'
end
else
!!Enemy attacks
'<<$boy>> attacks'
tiprand = rand(0, 2)
if tiprand = 0:
damage = rand(strenV / 12, strenV / 8)
if damage <= 0:damage = 1
koefatak = (speedV + reactV + JabV) * 2
koefpop = koefatak * 20 / 100
popad = rand(koefatak - koefpop, koefatak + koefpop)
'<<$boy>> deals with quick jab, stepping forward.'
gs 'Kikatak', 'enemy'
xgt 'kikbox', 'sta'
elseif tiprand = 1:
damkoef = strenV * 20/100
damage = rand(strenV - damkoef, strenV + damkoef)
if damage <= 0:damage = 1
koefatak = (speedV + reactV + punchV)
koefpop = koefatak * 20 / 100
popad = rand(koefatak - koefpop, koefatak + koefpop)
'<<$boy>> applies a power punch.'
gs 'Kikatak', 'enemy'
xgt 'kikbox', 'sta'
elseif tiprand = 2:
damkoef = strenV * 20 / 100
damage = rand((strenV - damkoef) * 3, (strenV + damkoef) * 3)
if damage <= 0:damage = 1
koefatak = (speedV + reactV + kikV) / 2
koefpop = koefatak * 20 / 100
popad = rand(koefatak - koefpop, koefatak + koefpop)
'<<$boy>> goes for a kick.'
gs 'Kikatak', 'enemy'
xgt 'kikbox', 'sta'
end
end
end
end
if $ARGS[0] = 'sta':
cla
ionce = 0
'= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = ='
if minround = 1:'Time in round 0:30'
if minround = 2:'Time in round 1:00'
if minround = 3:'Time in round 1:30'
if minround = 4:'Time in round 2:00'
if minround = 5:'Time in round 2:30'
if minround = 6:'Time in round 3:00'
'= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = ='
'<<$boy>> Life <>, Endurance <>'
'Your life <>, Endurance <>'
'= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = ='
act 'Further':gt 'kikbox', 'start'
if minround = 6:
cla
minround = 0
round += 1
'The bell rings indicating the end of round <>.'
if round <= formula:
act 'Back to the corner':
cls
''
'You try to rest as best as you can.'
act 'Return to the ring':gt 'kikbox', 'start'
end
elseif round > formula and sparing = 0:
act 'Go to the middle of the ring for the announcement':
cla
if pointKik > pointKikV:
gt 'enderKik', 'win'
elseif pointKik < pointKikV:
gt 'enderKik', 'loss'
elseif pointKik = pointKikV:
gt 'enderKik', 'draw'
end
end
elseif round > formula and sparing = 1:
if pointKik > pointKikV:
gt 'enderKik', 'win'
elseif pointKik < pointKikV:
gt 'enderKik', 'loss'
elseif pointKik = pointKikV:
gt 'enderKik', 'draw'
end
end
end
end
--- kikbox ---------------------------------