123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354 |
- # kikbox
- <<<<<<< 062_kikbox
- if $args[0] = 'start':
- '<center><b>Round 1</b></center>'
- *nl
- '<center><img src="images\community\ring1.jpg"></center>'
- act 'Start Fight':
- gt 'kikbox','fight'
- end
- end
- if $ARGS[0] = 'fight':
- gs 'befKik'
- '<B>======================== (ROUND <<round>>) ================= ==========</B>'
- if minround = 1: '<B>the fight 0:30</B>'
- if minround = 2: '<B>the fight 1:00</B>'
- if minround = 3: '<B>the fight 1:30</B>'
- if minround = 4: '<B>the fight 2:00</B>'
- if minround = 5: '<B>the fight 2:30</B>'
- '<B><<$nameV>></B> Life <B><font color = red><<healthV>></font></B>, Endurance <B><font color = green><<staminaV>></font></B>'
- 'Your life <B><font color = red><<health>></font></B>, Endurance <B><font color = green><<stamina>></font></B>'
- '<B>=============================================== ===========</B>'
- 'Your points <<pointKik>>Points opponent <<pointKikV>>'
- '<B>=============================================== ===========</B>'
- gs 'initKik'
- if hod = 0:
- !игрок атакует
- '<font color = green>You can attack</font>'
- act 'Apply fast Jeb':
- cla
- set damage = RAND(stren/12, stren/8)
- if damage <= 0: set damage = 1
- set koefatak = (speed + reakt + jab)*2
- set koefpop = koefatak * 20/100
- set popad = RAND(koefatak - koefpop, koefatak + koefpop)
- '<font color = green>You deal with a quick jab step forward.</font>'
- gs 'Kikatak','player'
- xgt 'kikbox','sta'
- end
- act 'Apply power punch':
- cla
- set damkoef = stren * 20/100
- set damage = RAND(stren - damkoef, stren + damkoef)
- if damage <= 0: set damage = 1
- set koefatak = (speed + reakt + punch)
- set koefpop = koefatak * 20/100
- set popad = RAND(koefatak - koefpop, koefatak + koefpop)
- '<font color = green>You apply a powerful punch.</font>'
- gs 'Kikatak','player'
- xgt 'kikbox','sta'
- end
- act 'Footed strike':
- cla
- set damkoef = stren * 20/100
- set damage = RAND ((stren - damkoef)*3,(stren + damkoef)*3)
- if damage <= 0: set damage = 1
- set koefatak = (speed + reakt + kik)/2
- set koefpop = koefatak * 20/100
- set popad = RAND(koefatak - koefpop, koefatak + koefpop)
- '<font color = green>You apply a kick powerful.</font>'
- gs 'Kikatak','player'
- xgt 'kikbox','sta'
- end
- end
- if hod = 1:
- !противник атакует
- '<font color = red><<$nameV>> attacks</font>'
- set tiprand = RAND(0,2)
- if tiprand = 0:
- set damage = RAND(strenV/12, strenV/8)
- if damage <= 0: set damage = 1
- set koefatak = (speedV + reaktV + JabV)*2
- set koefpop = koefatak * 20/100
- set popad = RAND(koefatak - koefpop, koefatak + koefpop)
- '<font color = red><<$nameV>> deals with quick jab step forward.</font>'
- gs 'Kikatak','enemy'
- xgt 'kikbox','sta'
- end
- if tiprand = 1:
- set damkoef = strenV * 20/100
- set damage = RAND(strenV - damkoef, strenV + damkoef)
- if damage <= 0: set damage = 1
- set koefatak = (speedV + reaktV + punchV)
- set koefpop = koefatak * 20/100
- set popad = RAND(koefatak - koefpop, koefatak + koefpop)
- '<font color = red><<$nameV>> applies the power punch.</font>'
- gs 'Kikatak','enemy'
- xgt 'kikbox','sta'
- end
- if tiprand = 2:
- set damkoef = strenV * 20/100
- set damage = RAND ((strenV - damkoef)*3,(strenV + damkoef)*3)
- if damage <= 0: set damage = 1
- set koefatak = (speedV + reaktV + kikV)/2
- set koefpop = koefatak * 20/100
- set popad = RAND(koefatak - koefpop, koefatak + koefpop)
- '<font color = red><<$nameV>> tries for a kick.</font>'
- gs 'Kikatak','enemy'
- xgt 'kikbox','sta'
- end
- end
- =======
- if $ARGS[0]='start':
- cla
- if health <= 0:
- '<B><font color=red>You lost by TKO</font></B>'
- xgt'enderKik','loss'
- exit
- end
- if healthV <= 0:
- '<B><font color=green><<$nameV>> lost by TKO</font></B>'
- xgt'enderKik','win'
- exit
- end
- gs'befKik'
- '<B>========================(ROUND <<round>>)===========================</B>'
- if minround = 1:'<B>the battle 0:30</B>'
- if minround = 2:'<B>the battle 1:00</B>'
- if minround = 3:'<B>the battle 1:30</B>'
- if minround = 4:'<B>the battle 2:00</B>'
- if minround = 5:'<B>the battle 2:30</B>'
- '<B><<$nameV>></B> life <B><font color=red><<healthV>></font></B>, endurance <B><font color=green><<staminaV>></font></B>'
- 'Your life <B><font color=red><<health>></font></B>, endurance <B><font color=green><<stamina>></font></B>'
- '<B>==========================================================</B>'
- 'your points <<pointKik>>, points rival <<pointKikV>>'
- '<B>==========================================================</B>'
- gs'initKik'
- if hod = 0:
- !player attacks
- '<font color=green>You can attack</font>'
- act 'Apply fast Jeb':
- cla
- set damage = RAND (stren/12,stren/8)
- if damage <= 0:set damage = 1
- set koefatak = (speed + reakt + jab)*2
- set koefpop = koefatak*20/100
- set popad = RAND (koefatak - koefpop,koefatak + koefpop)
- '<font color=green>You deal with a quick jab step forward.</font>'
- gs'Kikatak','player'
- xgt'kikbox','sta'
- end
-
- act 'Apply power punch':
- cla
- set damkoef = stren*20/100
- set damage = RAND (stren - damkoef,stren + damkoef)
- if damage <= 0:set damage = 1
- set koefatak = (speed + reakt + punch)
- set koefpop = koefatak*20/100
- set popad = RAND (koefatak - koefpop,koefatak + koefpop)
- '<font color=green>You apply a powerful punch.</font>'
- gs'Kikatak','player'
- xgt'kikbox','sta'
- end
-
- act 'Apply kick':
- cla
- set damkoef = stren*20/100
- set damage = RAND ((stren - damkoef)*3,(stren + damkoef)*3)
- if damage <= 0:set damage = 1
- set koefatak = (speed + reakt + kik)/2
- set koefpop = koefatak*20/100
- set popad = RAND (koefatak - koefpop,koefatak + koefpop)
- '<font color=green>You put a powerful kick leg.</font>'
- gs'Kikatak','player'
- xgt'kikbox','sta'
- end
- end
-
- if hod = 1:
- !enemy attacks
- '<font color=red><<$nameV>> attacks</font>'
- set tiprand = RAND (0,2)
- if tiprand = 0:
- set damage = RAND (strenV/12,strenV/8)
- if damage <= 0:set damage = 1
- set koefatak = (speedV + reaktV + JabV)*2
- set koefpop = koefatak*20/100
- set popad = RAND (koefatak - koefpop,koefatak + koefpop)
- '<font color=red><<$nameV>> causes a quick jab with a step forward.</font>'
- gs'Kikatak','enemy'
- xgt'kikbox','sta'
- end
-
- if tiprand = 1:
- set damkoef = strenV*20/100
- set damage = RAND (strenV - damkoef,strenV + damkoef)
- if damage <= 0:set damage = 1
- set koefatak = (speedV + reaktV + punchV)
- set koefpop = koefatak*20/100
- set popad = RAND (koefatak - koefpop,koefatak + koefpop)
- '<font color=red><<$nameV>> causes a power punch.</font>'
- gs'Kikatak','enemy'
- xgt'kikbox','sta'
- end
-
- if tiprand = 2:
- set damkoef = strenV*20/100
- set damage = RAND ((strenV - damkoef)*3,(strenV + damkoef)*3)
- if damage <= 0:set damage = 1
- set koefatak = (speedV + reaktV + kikV)/2
- set koefpop = koefatak*20/100
- set popad = RAND (koefatak - koefpop,koefatak + koefpop)
- '<font color=red><<$nameV>> tries for a kick.</font>'
- gs'Kikatak','enemy'
- xgt'kikbox','sta'
- end
- end
- >>>>>>> 062_kikbox
- end
- <<<<<<< 062_kikbox
- if $ARGS[0] = 'sta':
- cla
- set ionce = 0
- '<B>=============================================== ===========</B>'
- if minround = 1: '<B>the fight 1:00</B>'
- if minround = 2: '<B>the fight 1:30</B>'
- if minround = 3: '<B>the fight 2:00</B>'
- if minround = 4: '<B>the fight 2:30</B>'
- if minround = 5: '<B>the fight 3:00</B>'
- '<B>=============================================== ===========</B>'
- '<B><<$nameV>></B> Life <B><font color = red><<healthV>></font></B>, Endurance <B><font color = green><<staminaV>></font></B>'
- 'Your life <B><font color = red><<health>></font></B>, Endurance <B><font color = green><<stamina>></font></B>'
- '<B>=============================================== ===========</B>'
- if health <= 0:
- '<B><font color = red>You lost by TKO</font></B>'
- gt 'enderKik','lossKO'
- exit
- end
- if healthV <= 0:
- '<B><font color = green><<$nameV>> lost by TKO</font></B>'
- gt 'enderKik','winKO'
- exit
- end
- act 'Further': gt 'kikbox','fight'
- if minround = 5:
- cla
- *clr
- 'Rang the gong indicating the end of the round <<round>>.'
- set minround = 0
- set round += 1
- act 'Back to the corner':
- cla
- *clr
- '<center><img src="images\community\kickboxing_corner.jpg"></center>'
- 'You try to rest as best as you can.'
- act 'Prepare':
- if round <= formula:
- cla
- *clr
- '<center><b>Round <<round>></b></center>'
- *nl
- '<center><img src="images\community\ring<<round>>.jpg"></center>'
- act 'In the ring': gt 'kikbox','fight'
- else
- if pointKik > pointKikV:
- gt 'enderKik','win'
- end
- if pointKik < pointKikV:
- gt 'enderKik','loss'
- end
- if pointKik = pointKikV:
- gt 'enderKik','draw'
- end
- end
- end
- end
- end
- end
- =======
- if $ARGS[0]='sta':
- cla
- set ionce = 0
- '<B>==========================================================</B>'
- if minround = 1:'<B>the battle 1:00</B>'
- if minround = 2:'<B>the battle 1:30</B>'
- if minround = 3:'<B>the battle 2:00</B>'
- if minround = 4:'<B>the battle 2:30</B>'
- if minround = 5:'<B>the battle 3:00</B>'
- '<B>==========================================================</B>'
- '<B><<$nameV>></B> life <B><font color=red><<healthV>></font></B>, endurance <B><font color=green><<staminaV>></font></B>'
- 'Your life <B><font color=red><<health>></font></B>, endurance <B><font color=green><<stamina>></font></B>'
- '<B>==========================================================</B>'
- act 'further':gt'kikbox','start'
- if minround = 5:
- cla
- set minround = 0
- set round = round + 1
- 'Rang the gong indicating the end of the round'
- if round <= formula:
- act 'Vacationing in the corner':
- cla
- 'You rest in his corner.'
- act 'In the ring':gt'kikbox','start'
- end
- end
-
- if round > formula and sparing = 0:
- act 'Get out in the middle of announcing the winner':
- cla
- if pointKik > pointKikV:
- 'you won.'
- act 'Leave the ring':gt'enderKik','win'
- end
- if pointKik < pointKikV:
- 'you lost.'
- act 'Leave the ring':gt'enderKik','loss'
- end
- if pointKik = pointKikV:
- 'draw.'
- act 'Leave the ring':gt'enderKik','draw'
- end
- end
- end
-
- if round > formula and sparing = 1:
- act 'Leave the ring':gt'fit','start'
- end
-
- end
- end
- >>>>>>> 062_kikbox
- --- kikbox ---------------------------------
|