1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162 |
- # FSfight
- minut += 1
- gs 'stat'
- 'Your health <<FSHP>>.'
- '<<$FSnameV>>Health <<FSHPV>>'
- !!end of the fight
- if FSHP <= 0:
- FSloss += 1
- 'You lost the fight'
- act 'Leave':gt 'FSgame'
- exit
- end
- if FSHPV <= 0:
- FSWin += 1
- '<<$FSnameV>> fell. You win the fight.'
- 'You got <<FSPrizeM>> coins and <<FSPrizeExp>> experience'
- act 'Disengage':gt 'FSgame'
- exit
- end
- !!initiative
- KGOLiniV = rand(FSreaktV / 2, FSreaktV * 2)
- KGOLini = rand(FSreakt / 2, FSreakt * 2)
- if KGOLini = KGOLiniV:
- hodrand = rand(0, 1)
- if hodrand = 0:KGOLini = 1 & KGOLiniV = 0
- if hodrand = 1:KGOLini = 0 & KGOLiniV = 1
- end
- if KGOLini > KGOLiniV:KGOLiniSUM += 1
- if KGOLini < KGOLiniV:KGOLiniSUM -= 1
- if KGOLiniSUM > 3:KGOLini = 0 & KGOLiniV = 1 & KGOLiniSUM = 0
- if KGOLiniSUM < -3:KGOLini = 1 & KGOLiniV = 0 & KGOLiniSUM = 0
- !!moves
- if KGOLini > KGOLiniV:
- 'Now your turn'
- act 'Attack':
- cls
- ''
- dynamic $FSatk
- act 'Further':gt $curloc
- end
- else
- 'Now opponents'
- '<<$FSnameV>> attacks you'
- dynamic $FSatkV
- act 'Further':gt $curloc
- end
- --- FSfight ---------------------------------
|