Sfoglia il codice sorgente

Added Arthur jobs in market

Added Arthur jobs to market
Cleaned up the English in the Market a bit as well.
Thekingofsweden 9 anni fa
parent
commit
afb15f7809
6 ha cambiato i file con 135 aggiunte e 41 eliminazioni
  1. 1 0
      glife.qproj
  2. BIN
      glife.txt
  3. 22 22
      locations/Grinok
  4. 94 0
      locations/arturQW
  5. 14 15
      locations/arturRinok
  6. 4 4
      locations/arturSex

+ 1 - 0
glife.qproj

@@ -377,6 +377,7 @@
       <Location name="arturkiosk"/>
       <Location name="arturend"/>
       <Location name="arturdin"/>
+	  <Location name="arturQW"/>
     </Folder>
     <Folder name="питомцы - Pets">
       <Location name="soba"/>

BIN
glife.txt


+ 22 - 22
locations/Grinok

@@ -4,28 +4,28 @@ $loc = $CURLOC
 clr
 gs 'stat'
 gs 'time'
-'<center><h4>market</h4></center>'
+'<center><h4>Market</h4></center>'
 '<center><img src="images/pic/Grinok.jpg"></center>'
 'This small market is location near the station.'
 
 act 'Go back to the station':minut += 3 & gt 'vokzalG'
 
 if hour < 12 or hour > 18:
-	'In the market there is no one.'
+	'There is no one in the market.'
 	if arturQW = 1 and (week = 6 or week = 7) and hour < 12:
-		act 'Wait for Arthur':hour = 12 & gt 'grinok'
+		act 'Wait for Arthur to arrive':hour = 12 & gt 'grinok'
 	end
 	exit
 end
 
-'In the market the sellers of goods and beckoning shoppers.'
+'In the market the sellers of goods are beckoning shoppers.'
 
 act 'Wander through the market':
 	cls
 	minut += 15
 	gs 'stat'
 
-	'Stroll on the market for hot deals (0:15)'
+	'You are strolling through the market looking for good deals.'
 	if arturKnow = 0:
 		temp = rand(0, 6)
 	else
@@ -33,14 +33,14 @@ act 'Wander through the market':
 	end
 
 	if temp = 0:
-		kosmpay = rand(3, 8) * 100
-		'You see that sell pretty cheap cosmetics for <<kosmpay>> rubles.'
+		tovpay = rand(3, 8) * 100
+		'You see that cosmetics are for sale for <<tovpay>> rubles.'
 
-		if money >= kosmpay:
+		if money >= tovpay:
 			act 'Buy':
 				cls
 				minut += 15
-				money -= kosmpay
+				money -= tovpay
 				kosmetica += rand(10, 40)
 				gs 'stat'
 				gt $curloc
@@ -48,7 +48,7 @@ act 'Wander through the market':
 		end
 	elseif temp = 1:
 		tovpay = rand(2, 5) * 100
-		'You see that sell for Vitaminki <<tovpay>> rubles.'
+		'You see vitamins for sale for <<tovpay>> rubles.'
 
 		if money >= tovpay:
 			act 'Buy':
@@ -61,7 +61,7 @@ act 'Wander through the market':
 		end
 	elseif temp = 2:
 		tovpay = rand(2, 8) * 10
-		'You see that sell condoms <<tovpay>> rubles.'
+		'You see a booth selling condoms for <<tovpay>> rubles.'
 
 		if money >= tovpay:
 			act 'Buy':
@@ -74,7 +74,7 @@ act 'Wander through the market':
 		end
 	elseif temp = 3:
 		tovpay = rand(5, 10) * 100
-		'You see that sell lip balm for <<tovpay>> rubles.'
+		'There is lip balm for sale for <<tovpay>> rubles.'
 
 		if money >= tovpay:
 			act 'Buy':
@@ -87,11 +87,11 @@ act 'Wander through the market':
 		end
 	elseif temp = 4:
 		tovpay = rand(1, 5) * 1000
-		'You see that sell for handbag <<tovpay>> rubles.'
+		'You see someone selling a handbag for <<tovpay>> rubles.'
 
 		if bag = 0:
 			if money >= tovpay:
-				act 'buy':
+				act 'Buy':
 					cls
 					minut += 15
 					bag = 1
@@ -100,11 +100,11 @@ act 'Wander through the market':
 				end
 			end
 		else
-			'Hmm, you already have a bag, why do you need another.'
+			'But you already have a bag, so you move on.'
 		end
 	elseif temp = 5:
 		if pornmarkonce = 0:pornmarkonce = 1
-		'Strolling on the market you accidentally wander into the far corner where they sell porn.'
+		'Strolling through the market you accidentally wander into the far corner where they sell porn.'
 
 		act 'Go to the area with the porn':gt 'Gpornmark'
 	else
@@ -117,7 +117,7 @@ act 'Wander through the market':
 end
 
 if pornmarkonce = 1:
-	act 'Go to the area with porn':gt 'Gpornmark'
+	act 'Go to the area with the porn':gt 'Gpornmark'
 end
 
 if arturKnow = 1 and arturQW = 0:
@@ -127,10 +127,10 @@ elseif arturQW = 1 and (week = 6 or week = 7):
 		act 'Go to Arthur':gt 'arturRinok', 'work_1'
 	end
 elseif arturQW = 2:
-	if hour = 16 and minut >= 0 and minut <= 30:
+	if hour = 16 and minut <= 30:
 		act 'Go to Arthur':gt 'arturRinok', 'work_2'
 	elseif hour < 16:
-		act 'Wait Arthur':hour = 16 & gt 'Grinok'
+		act 'Wait for Arthur to arrive':hour = 16 & minut = 0 & gt 'Grinok'
 	end
 end
 
@@ -147,20 +147,20 @@ act 'Go to the book tray':
 			money -= 150
 			f_book += 1
 			gs 'stat'
-			'You bought the book for fantasy 150 rubles.'
+			'You bought the fantasy book for 150 rubles.'
 
 			act 'Leave':gt $curloc
 		end
 	end
 
 	if money >= 300:
-		act 'Buy ladies'' novel (300 rubles)':
+		act 'Buy romance novel (300 rubles)':
 			cls
 			minut += 15
 			money -= 300
 			w_book += 1
 			gs 'stat'
-			'You bought a ladies'' novel for 300 rubles.'
+			'You bought a romance novel for 300 rubles.'
 
 			act 'Leave':gt $curloc
 		end

+ 94 - 0
locations/arturQW

@@ -0,0 +1,94 @@
+# arturQW
+if $ARGS[0] = 'arturQW_1':
+	if arturTimes >= 5 and GorSlut = 0 and vnesh >= 30:
+		cls
+		minut += 2
+		gs 'stat'
+
+		'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
+		'-Svetka, I TEBA uzhe long time and know Harashi, you clear the calf and fully deserved my respect.'
+		'-Oh, Thanks Arturchik, I''m so pleased to hear that.'
+		'-Zamechayu have tebya in seme is not all right with loot, I tebe help, prihadi to MNE on weekends and budesh zarabytyvat like a queen.'
+
+		act 'Agree':
+			cls
+			minut += 2
+			if arturQW = 0:arturQW = 1
+			gs 'stat'
+
+			'<center><img src="images/qwest/alter/arturQW/arturQW_1.jpg"></center>'
+			'-Well, if you''re really going to pay well, then I refuse sin, interested you say.'
+			'-Kanechna Beauty, I did not know what otkazheshsa from maego super predlazheniya.'
+			'Excited Arthur comes to your hard squeezes your ass.'
+			'-So Asli biznes case settled, we will go to eat barbecue, chacha drink!'
+
+			act 'Go with Arthur':gt 'arturHome'
+			act 'Leave':gt 'Grinok'
+		end
+		act 'Refuse':
+			cls
+			minut += 2
+			gs 'stat'
+
+			'<center><img src="images/qwest/alter/arturQW/arturQW_2.jpg"></center>'
+			'-Thank you for Arturchik tempting offer, but I have so much to do and, learning, dancing, volleyball, and so I do not have time to live.'
+			'-As you like Beauty, my business predlazhit, with sadness on her face I told you Arthur and added:'
+			'- Then ne forget inagda prihadit ka MNE visit, And now let''s go eat barbecue, chacha drink? grabbing you by the priest suggested dryly Arthur.'
+
+			act 'Go with Arthur':gt 'arturHome'
+			act 'Leave':gt 'Grinok'
+		end
+	else
+		cls
+		gs 'stat'
+
+		'Arthur smiled kindly and handed you a tangerine. "Come to eat barbecue, chacha drink!"'
+
+		act 'Go with Arthur':gt 'arturHome'
+		act 'Leave':gt 'Grinok'
+	end
+end
+
+if $ARGS[0] = 'arturQW_2':
+	cls
+	minut += 10
+	money += 5000
+	gs 'stat'
+
+	'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
+	'-Sveta, you are my treasure, because tebe our pradazhi doubled, always, said, that the need for a counter seat sexy girl.'
+	'-Thank Arturchik, but I''m tired of hanging around behind the counter, I think already on the termination of work you.'
+	'-What? Damn it, and thought. It is fine, It is fine, a girl like you should have a decent place.'
+	'I will go to increase, I fired my bookkeeper, the old hag. Now you enter on this post.'
+	'You will receive twice bolshe, but should come every day 16.00, otherwise I''ll fire, despite your elastic ass.'
+
+	act 'Agree':
+		cls
+		minut += 5
+		if arturQW = 1:arturQW = 2
+		gs 'stat'
+
+		'<center><img src="images/qwest/alter/arturQW/arturQW_5.jpg"></center>'
+		'-It changes everything, I now agree to work for you yet.'
+		'-Kanechno soglasishsya, now only budesh twist times a day and getting the booty I have great grandmother.'
+		'-Come Beauty, go eat barbecue, chacha drink, roughly grabbing you by the priest suggested Arthur.'
+
+		act 'Go with Arthur':gt 'arturHome'
+	end
+	act 'Refuse':
+		cls
+		minut += 5
+		gs 'stat'
+
+		'<center><img src="images/qwest/alter/arturQW/arturQW_2.jpg"></center>'
+		'-Thank you for Arturchik tempting offer, but I have so much to do and, learning, dancing, volleyball, and so I do not have time to live.'
+		'-As you like Beauty, my business predlazhit, with sadness on her face I told you Arthur and added:'
+		'-Then ne forget inagda prihadit ka MNE visit, And now let''s go eat barbecue, chacha drink? grabbing you by the priest suggested dryly Arthur.'
+
+		act 'Go with Arthur':gt 'arturHome'
+		act 'Leave':gt 'Grinok'
+	end
+end
+
+--- arturQW ---------------------------------
+

+ 14 - 15
locations/arturRinok

@@ -4,14 +4,14 @@ if $ARGS[0] = 'start':
 		cls
 		gs 'stat'
 		'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
-		'Caucasian friendly smiled and handed you a tangerine.'
+		'The Caucasian smiled at you and handed you a tangerine.'
 
 		act 'Take a tangerine':
 			cls
 			minut += 2
 			gs 'stat'
 			'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
-			'You took a tangerine from the hands of Caucasian, He smiled and said you "You''re so beautiful devushka. Wai. sponges persik. Come to eat barbecue, I''ll take this chacha!"'
+			'You took a tangerine from the hands of the Caucasian. He smiled and said you "You''re so beautiful devushka. Wai. sponges persik. Come to eat barbecue, I''ll take this chacha!"'
 
 			act 'Refuse':
 				cls
@@ -22,7 +22,7 @@ if $ARGS[0] = 'start':
 
 				gs 'stat'
 				'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
-				'You started to refuse and backs away from loving Caucasian. He "Wai, zachem offend? Nothing bad will not Tiebei, mom swear! Hochish, I ''ll give tebe <<$arturgift>>"'
+				'You started to refuse and back away from the loving Caucasian. He "Wai, zachem offend? Nothing bad will not Tiebei, mom swear! Hochish, I ''ll give you <<$arturgift>>"'
 
 				act 'Leave':gt 'Grinok'
 
@@ -34,14 +34,13 @@ if $ARGS[0] = 'start':
 					'You are interested in this property unfamiliar Caucasian. He is immediately zamtil and leaving the tray on the other Caucasians immediately came up to you and took you by the arm "Ne fear devochka, Uncle Arturik ne bites."'
 
 					act 'Leave':gt 'Grinok'
-					act 'Go to Arthur':gt 'arturHome'
+					act 'Go with Arthur':gt 'arturHome'
 				end
 			end
 		end
 	else
 		if arturday ! day:
-			!! The file arturQW is missing so this call does not work
-			!gt 'arturQW', 'arturQW_1'
+			gt 'arturQW', 'arturQW_1'
 		elseif arturday = day:
 			cls
 			minut += 5
@@ -49,12 +48,12 @@ if $ARGS[0] = 'start':
 
 			if arturblowday ! day:
 				'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
-				'Arthur smiled kindly and handed you a tangerine. "Wai, work to do, I''m_sorry. Unless by rapid."'
+				'Arthur smiled kindly and handed you a tangerine. "Wai, work to do, I''m sorry. Unless it''s quick."'
 
-				act 'Go to Arthur':gt 'arturkiosk'
+				act 'Go with Arthur':gt 'arturkiosk'
 			elseif arturblowday = day:
 				'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
-				'Arthur smiled amiably you. "Wai, work to do, I''m_sorry."'
+				'Arthur smiled amiably you. "Wai, work to do, I''m sorry."'
 
 				act 'Leave':gt 'Grinok'
 			end
@@ -82,7 +81,7 @@ if $ARGS[0] = 'work_1':
 		if arturDaysWorked1 >= 10:
 			gt 'arturQW', 'arturQW_2'
 		else
-			act 'Go to Arthur':
+			act 'Go with Arthur':
 				cls
 				minut += 5
 				money += 5000
@@ -105,9 +104,9 @@ if $ARGS[0] = 'work_2':
 
 	'<center><img src="images/qwest/alter/artur/artur.jpg"></center>'
 
-	if arturDaysWorked2 = 0:'-That`s my new super sexy secretary came.'
+	if arturDaysWorked2 = 0:'-That''s my new super sexy secretary came.'
 
-	'Quickly to work, we`ve got the usual paperwork complete ass.'
+	'Quickly to work, we''ve got the usual paperwork complete ass.'
 
 	act 'Work':
 		cls
@@ -118,7 +117,7 @@ if $ARGS[0] = 'work_2':
 		'<center><img src="images/qwest/alter/arturQW/arturQW_6.jpg"></center>'
 		'You hour working at a computer, checked checked buying and selling, calculated daily expenses and income.'
 
-		act 'Go to Arthur':
+		act 'Go with Arthur':
 			cls
 			minut += 5
 			money += 10000
@@ -128,9 +127,9 @@ if $ARGS[0] = 'work_2':
 			'-<<$name>> worked perfectly, Now I for papers can be calm.'
 			'-Yes, you got a mess, I still have to deal with it all and razbyratsya.'
 			'-Oh well, Óspakr Ögmundsson baby, have time to figure it out all over the spakoyno.'
-			'Now let`s go eat barbecue, chacha drink, grab you by the ass and strongly squeezing rolls, Arthur suggested.'
+			'Now let''s go eat barbecue, chacha drink, grab you by the ass and strongly squeezing rolls, Arthur suggested.'
 
-			act 'Go to Arthur':gt 'arturHome'
+			act 'Go with Arthur':gt 'arturHome'
 			act 'Escape':gt 'Grinok'
 		end
 	end

+ 4 - 4
locations/arturSex

@@ -44,11 +44,11 @@ act 'Enjoy':
 	horny += 10
 	gs 'stat'
 	'Arthur caresses you and undresses.'
-	tipsexart = rand(0, 2)
+	temp = rand(0, 2)
 
-	if tipsexart = 0:dynamic $d_art_bed
-	if tipsexart = 1:dynamic $d_art_bedmiss
-	if tipsexart = 2:dynamic $d_art_facefuck
+	if temp = 0:dynamic $d_art_bed
+	if temp = 1:dynamic $d_art_bedmiss
+	if temp = 2:dynamic $d_art_facefuck
 end
 
 --- arturSex ---------------------------------