# cardgame_durak !-----------------------------------------------! !-----Playing cards with the guys on the strip-----! !===============================================! if $ARGS[0] = 'start': CLOSE ALL cls minut += 5 !count-in the clothing on the players card_game_durak_clothes = 5 card_game_durak_npc_vasya = 4 card_game_durak_npc_den = 4 card_game_durak_npc_vitek = 4 !choice of set pictures for you cgd_clothes_set = RAND(1,20) !zero out the loss NPC: cgd_loss_vasya = 0 cgd_loss_den = 0 cgd_loss_vitek = 0 !zero out winnings NPC: cgd_win_vasya = 0 cgd_win_den = 0 cgd_win_vitek = 0 gs'stat' '
' '<<$cgd_clothes>>. <<$cgd_vasya_clothes>>. <<$cgd_den_clothes>>. <<$cgd_vitek_clothes>>.' if card_game_durak_clothes <= 0: card_game_durak_nude += 1 playcardgame_day = daystart playcardgame_count -= 1 rnd_cgd_win_npc = RAND(1,3) if rnd_cgd_win_npc = 1: $rnd_cgd_win_npc = 'Vasily' cgd_win_vasya = 1 end if rnd_cgd_win_npc = 2: $rnd_cgd_win_npc = 'Dan' cgd_win_den = 1 end if rnd_cgd_win_npc = 3: $rnd_cgd_win_npc = 'Vitek' cgd_win_vitek = 1 end 'The game is over! You have no clothes left, you lose!' 'Winner: <<$rnd_cgd_win_npc>>.' 'You will have to carry out his wish.' if GorSlut < 3: act 'Continue': gs 'cardgame_durak', 'card_game_nosex' end if GorSlut >=3 and cg_clother_cum < 5: if RAND(1,100) <= 90: if RAND(1,100) <= 40: act 'Continue': gs 'cardgame_durak', 'card_game_gsex' else act 'Continue': gs 'cardgame_durak', 'card_game_rough_sex' end else act 'Continue': gs 'cardgame_durak', 'card_game_nosex' end end if GorSlut >=3 and cg_clother_cum >= 5: if RAND(1,100) <= 70: if RAND(1,100) <= 40: act 'Continue': gs 'cardgame_durak', 'card_game_gsex' else act 'Continue': gs 'cardgame_durak', 'card_game_rough_sex' end elseif RAND(1,30) > 10: act 'Continue': gs 'cardgame_durak', 'card_game_casual_sex' else act 'Continue': gs 'cardgame_durak', 'card_game_nosex' end end end if card_game_durak_npc_vasya <= 0 or card_game_durak_npc_den <= 0 or card_game_durak_npc_vitek <= 0: horny += 10 health += 10 manna += 5 playcardgame_day = daystart playcardgame_count -= 1 if card_game_durak_npc_vasya <= 0: $cgd_name_igrok = 'Vasily' cgd_loss_vasya = 1 end if card_game_durak_npc_den <= 0: $cgd_name_igrok = 'Dan' cgd_loss_den = 1 end if card_game_durak_npc_vitek <= 0: $cgd_name_igrok = 'Vitek' cgd_loss_vitek = 1 end '' 'The game is over! <<$cgd_name_igrok>> has no clothes left and loses!.' if GorSlut < 3: if RAND(1,100) <= 70: act 'Continue': gs 'cardgame_durak', 'card_game_ggwin_clother' else act 'Continue': gs 'cardgame_durak', 'card_game_ggwin_penis' end end if GorSlut >= 3: if RAND(1,100) <= 70: if RAND(1,100) <= 50: act 'Continue': gs 'cardgame_durak', 'card_game_ggwin_clothercum' elseif RAND(1,50) < 40: act 'Continue': gs 'cardgame_durak', 'card_game_ggwin_clother' else act 'Continue': gs 'cardgame_durak', 'card_game_ggwin_penis' end else if RAND(1,100) <= 70: act 'Continue': gs 'cardgame_durak', 'card_game_gg_lick' else act 'Continue': gs 'cardgame_durak', 'card_game_gg_sex' end end end end if card_game_durak_clothes > 0 and card_game_durak_npc_vasya > 0 and card_game_durak_npc_den > 0 and card_game_durak_npc_vitek > 0: if RAND(1,100) <= 60: card_game_durak_win += 1 horny += 5 manna += 5 rnd_card_game_npc = RAND(1,3) if RAND(1,3) = 1: card_game_durak_npc_vasya -= 1 $cgd_name_npc = 'Vasily' elseif RAND(1,2) = 1: card_game_durak_npc_den -= 1 $cgd_name_npc = 'Dan' else card_game_durak_npc_vitek -= 1 $cgd_name_npc = 'Vitek' end '' 'You have a great set of cards in your hand, and easily win the round. <<$cgd_name_npc>> loses, and reluctantly takes off an article of clothing.' act 'Deal': gs 'cardgame_durak', 'card_game_durak_play' elseif RAND(1,40) < 35: card_game_durak_loss += 1 card_game_durak_clothes -= 1 '' 'Your hand is very poor, and you don''t stand a chance. You slowly undress for the guys, removing an article of clothing.' act 'Deal': gs 'cardgame_durak', 'card_game_durak_play' else card_game_durak_draw += 1 '' 'Your hand is not very good, but with some skill you manage to squeeze out a draw. That was close, but you get to keep your clothes on for now!' act 'Deal': gs 'cardgame_durak', 'card_game_durak_play' end end ' |