glife/locations/larek.qsrc

# larek
!!2021/04/15
*NL
ACT 'Logout':
	gt 'dvor'
END
gs 'stat'
'<center><img <<$set_imgh>> src="images/locations/pushkin/cafe/larek.jpg" ></center>'
if $ARGS[0]='start':
cla
*clr
set minut = minut + 1
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
$sofood={
if hour >= 8 and hour <= 20:
minut+=3
gt 'larek', 'food'
else
'The grocery department is closed'
end
}

'<center><img <<$set_imgh>> src="images/locations/pushkin/cafe/larek.jpg" ></center>'
'<a href="exec: dynamic $sofood ">Select Products</a>'
     act 'Leave the store':gt $loc
end
if $ARGS[0]='food':
cla
*clr
set minut = minut + 1
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

$buyfood={
if hour >= 8 and hour <= 20:
     if money >= 50:
	 cla
	 *clr
	 set minut = minut + 15
	'<center><img <<$set_imgh>> src="images/locations/pushkin/cafe/larek.jpg" ></center>' 
	 portion = input ("How many servings would you like to buy?")
		 if portion<=0:portion=1
		 if portion*50 > money:
		 'You don''t have enough money.'
		 end
		 if portion*50 <= money:
		 set mc_inventory['food_basic'] = mc_inventory['food_basic'] + portion
		 set money = money - portion*50
		
		 'You paid cash for the food.'
		 end
	 act 'Move away from the counter':gt 'larek', 'food'
	 else
	 'You don''t have enough money'
	 end
else
'The grocery department is closed'
end
}
$buyfood2={
if hour >= 8 and hour <= 20:
     if money >= 250:
	 cla
	 *clr
	 set minut = minut + 15
	 portion = input ("How many servings would you like to buy?")
		 if portion<=0:portion=1
		 if portion*250 > money:
		 'You don''t have enough money.'
		 end
		 if portion*250 <= money:
		 set mc_inventory['food_diet'] = mc_inventory['food_diet'] + portion
		 set money = money - portion*250
		 '<center><img <<$set_imgh>> src="images/locations/pushkin/cafe/larek.jpg" ></center>'
		 'You paid cash for the food.'
		 end
	 act 'Move away from the counter':gt 'larek', 'food'
	 else
	 'You don''t have enough money'
	 end
else
'The grocery department is closed'
end
}
!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
'<center><B><font color=maroon>Grocery department</font></B></center>'
'<center><img <<$set_imgh>> src="images/locations/pushkin/cafe/larek.jpg" ></center>'
'<a href="exec: dynamic $buyfood ">One serving food - 50 RUB</a>
<a href="exec: dynamic $buyfood2 ">One serving of diet friendly food - 250 RUB</a>'
clr
gs'stat'
gs 'themes', 'indoors'


act 'Exit Department':gt 'larek', 'start'

     if money>=300:
         act 'Buy tea biscuits (300 RUB)':
         cls
         money-=300
         mc_inventory['food_biscuits']+=10
         'You bought a bag of biscuits that go well with tea. You figure there''s about ten servings inside.'
         act 'Exit Department':gt 'larek', 'food'
         end
     end
     if money>=50 and bottle=0 and bag>0:
         act 'Buy a bottle of water (50 RUB)':
         cls
         money-=50
         mc_inventory['food_water'] = 1
         'You bought a bottle of water and put it in your purse.'
         act 'Exit Department':gt 'larek', 'food'
         end
     end
     if money>=100 and mc_inventory['food_sandwich']=0 and bag>0:
         act 'Buy a sandwich (100 RUB)':
         cls
         money-=100
         mc_inventory['food_sandwich'] = 1
         'You bought a sandwich and put it in your purse.'
         act 'Exit Department':gt 'larek', 'food'
         end
     end
     if money >= 500 and mc_inventory['food_wine'] = 0 and bag > 0:
         act 'Buy a bottle of cheap wine (500 RUB)':
         cls
         money -= 500
         mc_inventory['food_wine'] = 1
         'You bought a bottle of wine and put it in your purse.'
         act 'Exit Department':gt 'larek', 'food'
         end
     end
end





--- larek ---------------------------------