# FSfight minut += 1 gs 'stat' 'Your health <>.' '<<$FSnameV>>Health <>' !конец боя 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 <> coins and <> experience' act 'Disengage': gt 'FSgame' exit end !инициатива 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 !ходы 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 ---------------------------------