소스 검색

:wrench: birthcontrol shot changes from EKay and a few small fixes.

KevinSmarts 9 년 전
부모
커밋
2f8b0b43f5
6개의 변경된 파일15개의 추가작업 그리고 4개의 파일을 삭제
  1. 1 1
      locations/MEastbed
  2. 1 1
      locations/MRear
  3. 10 0
      locations/cikl
  4. 1 1
      locations/gpoli
  5. 1 1
      locations/poli
  6. 1 0
      locations/shop

+ 1 - 1
locations/MEastbed

@@ -52,7 +52,7 @@ if $ARGS[0] = 'guestC':
 		horny += 10
 		gs 'stat'
 		'<center><img src="images/BDSM_Club/Bedrooms/bedrand8.gif"></center>'
-		'A man and two women are having a threesome, you can't tell who is sub or dom, but they are so carried away in their act that you don''t suppose that''s important right now.'
+		'A man and two women are having a threesome, you can''t tell who is sub or dom, but they are so carried away in their act that you don''t suppose that''s important right now.'
 		act 'Return':gt 'MEastbed', 'guestC'
 	elseif rand (0,100) < 3:
 		cls

+ 1 - 1
locations/MRear

@@ -13,7 +13,7 @@ if $ARGS[0] = 'garden':
 
 	if $BDSMrole = 's' and rand (0, 100) < 5 and vagina > 0:
 		gt 'MRear', 'gEV1'
-	elseif rand (0,100) < 3
+	elseif rand (0,100) < 3:
 		cls
 		horny += 5
 		gs 'stat'

+ 10 - 0
locations/cikl

@@ -97,6 +97,16 @@ elseif tabletkishot <= 0:
 	pillcon -= 1
 end
 if tabletkicheck = 2:
+	if tabletkishot ! 0:
+		cycle = 1
+		mesec = 0
+		if rand(0,1000) = 1000:
+			EggRH = rand(20,80)
+		else
+			EggRH = 0
+		end
+		FocH = EggRH
+	end
 	if tabletkishot <= 0:
 		'The chemicals regulating your fertility cycle are wearing off.'
 		pillcon -= 29

+ 1 - 1
locations/gpoli

@@ -161,7 +161,7 @@ if hour >= 6 and hour <= 21:
 		act 'Get a birth control shot':
 			cls
 			minut += 15
-			tabletkishot = 40
+			tabletkishot = rand(84,91)
 			tabletkicheck = 2
 			pillcon = 40
 			money -= 1000

+ 1 - 1
locations/poli

@@ -69,7 +69,7 @@ if $ARGS[0] = 'start':
 			act 'Get a birth control shot':
 				cls
 				minut += 15
-				tabletkishot = 40
+				tabletkishot = rand(84,91)
 				tabletkicheck = 2
 				pillcon = 40
 				money -= 1000

+ 1 - 0
locations/shop

@@ -715,6 +715,7 @@ if $shoplocation = 'megafon':
 		end
 	end
 	act 'Buy card for internet access':
+		cla
 		if money >= 60:
 			act 'Buy 5 hour card (60 rubles)': intinp += 5 & money -= 60 & gt 'shop', 'move'
 		end