Kila_glife/locations/food_menu.qsrc

# food_menu

if night_mode = 1:
	$fcolor1 = '#FFFFFF'
	$bcolor1 = '#202020'
	$bcolor2 = '#303030'
else
	$fcolor1 = '#000000'
	$bcolor1 = '#FFFFFF'
	$bcolor2 = '#e6f2ff'
end

if $ARGS[0] = 'diner':
	*clr & cla
	act 'Back':gt $loc, $metka
	killvar '$_eat'
	$_eat['0,name'] = 'Onion Rings'
	$_eat['0,type'] = 'onring'
	$_eat['0,price'] = 80
	$_eat['1,name'] = 'Vegie Burger'
	$_eat['1,type'] = 'vegburg'
	$_eat['1,price'] = 240
	$_eat['2,name'] = 'Turkey Burger'
	$_eat['2,type'] = 'turburg'
	$_eat['2,price'] = 260
	$_eat['3,name'] = 'Battered Fish & Fries'
	$_eat['3,type'] = 'batfish'
	$_eat['3,price'] = 290
	$_eat['4,name'] = 'Cheeseburger & Fries'
	$_eat['4,type'] = 'cheburg'
	$_eat['4,price'] = 310
	$_str = '<table border="0" width="400" cellpadding="0" cellspacing="1">'
	i = 0
	:loop_diner_food
	$_str += '<tr bgcolor='+iif(i mod 2 = 0,'<<$bcolor1>>','<<$bcolor2>>')+'><td height="30" width="80%" align="center"><font color="<<$fcolor1>>">'+$_eat['<<i>>,name']+'</td><td height="30" width="20%" align="right">'+iif(money >= val($_eat['<<i>>,price']),'<a href="exec:gt''food'',$_eat[''<<i>>,type''],<<i>>">'+$_eat['<<i>>,price']+'</a>',$_eat['<<i>>,price'])+'<font color="<<$fcolor1>>"><b> ₽. </b></td></tr>'
	i += 1
	if i < arrsize('$_eat')/3:jump 'loop_diner_food'
	$_str += '</table></center></font>'
	'<center><img <<$set_imgh>> src="images/shared/food/dinerfood.jpg"</center><br>'
	'Your food order:<br><br>'+$_str
	killvar '$_str'
	killvar '$fcolor1'
	killvar '$bcolor1'
	killvar '$bcolor2'
end

if $ARGS[0] = 'gcafe':
	*clr & cla
	act 'Back':gt $loc, $metka
	killvar '$_eat'
	$_eat['0,name'] = 'Vegatarian Piroshki'
	$_eat['0,type'] = 'pirosh'
	$_eat['0,price'] = 0
	$_eat['1,name'] = 'Herring Blini'
	$_eat['1,type'] = 'blini'
	$_eat['1,price'] = 0
	$_eat['2,name'] = 'Golubtsy'
	$_eat['2,type'] = 'golub'
	$_eat['2,price'] = 0
	$_eat['3,name'] = 'Pozharsky Cutlets'
	$_eat['3,type'] = 'pozhar'
	$_eat['3,price'] = 0
	$_eat['4,name'] = 'Rueben Sandwich'
	$_eat['4,type'] = 'reuben'
	$_eat['4,price'] = 0
	$_str = '<table border="0" width="400" cellpadding="0" cellspacing="1">'
	i = 0
	:loop_gcafe_food
	$_str += '<tr bgcolor='+iif(i mod 2 = 0,'<<$bcolor1>>','<<$bcolor2>>')+'><td height="30" width="80%" align="center"><font color="<<$fcolor1>>">'+$_eat['<<i>>,name']+'</td><td height="30" width="20%" align="center"><a href="exec:gt''food'',$_eat[''<<i>>,type''],<<i>>">Free</a><font color="<<$fcolor1>>"><b></b></td></tr>'
	i += 1
	if i < arrsize('$_eat')/3:jump 'loop_gcafe_food'
	$_str += '</table></center></font>'
	'<center><img <<$set_imgh>> src="images/shared/food/cafefood.jpg"</center><br>'
	'Your food order:<br><br>'+$_str
	killvar '$_str'
	killvar '$fcolor1'
	killvar '$bcolor1'
	killvar '$bcolor2'
end

if $ARGS[0] = 'cafe':
	*clr & cla
	act 'Back':gt $loc, $metka
	killvar '$_eat'
	$_eat['0,name'] = 'Vegatarian Piroshki'
	$_eat['0,type'] = 'pirosh'
	$_eat['0,price'] = 100
	$_eat['1,name'] = 'Herring Blini'
	$_eat['1,type'] = 'blini'
	$_eat['1,price'] = 190
	$_eat['2,name'] = 'Golubtsy'
	$_eat['2,type'] = 'golub'
	$_eat['2,price'] = 210
	$_eat['3,name'] = 'Pozharsky Cutlets'
	$_eat['3,type'] = 'pozhar'
	$_eat['3,price'] = 290
	$_eat['4,name'] = 'Rueben Sandwich'
	$_eat['4,type'] = 'reuben'
	$_eat['4,price'] = 340
	$_str = '<table border="0" width="400" cellpadding="0" cellspacing="1">'
	i = 0
	:loop_cafe_food
	$_str += '<tr bgcolor='+iif(i mod 2 = 0,'<<$bcolor1>>','<<$bcolor2>>')+'><td height="30" width="80%" align="center"><font color="<<$fcolor1>>">'+$_eat['<<i>>,name']+'</td><td height="30" width="20%" align="right">'+iif(money >= val($_eat['<<i>>,price']),'<a href="exec:gt''food'',$_eat[''<<i>>,type''],<<i>>">'+$_eat['<<i>>,price']+'</a>',$_eat['<<i>>,price'])+'<font color="<<$fcolor1>>"><b> ₽. </b></td></tr>'
	i += 1
	if i < arrsize('$_eat')/3:jump 'loop_cafe_food'
	$_str += '</table></center></font>'
	'<center><img <<$set_imgh>> src="images/shared/food/cafefood.jpg"</center><br>'
	'Your food order:<br><br>'+$_str
	killvar '$_str'
	killvar '$fcolor1'
	killvar '$bcolor1'
	killvar '$bcolor2'
end

if $ARGS[0] = 'fancy':
	*clr & cla
	act 'Back':gt $loc, $metka
	killvar '$_eat'
	$_eat['0,name'] = 'Vareniki with Potatoes'
	$_eat['0,type'] = 'varenfan'
	$_eat['0,price'] = 760
	$_eat['1,name'] = 'Borscht and French Baguette'
	$_eat['1,type'] = 'borfan'
	$_eat['1,price'] = 900
	$_eat['2,name'] = 'Atlantic Salmon Steak'
	$_eat['2,type'] = 'salfan'
	$_eat['2,price'] = 1000
	$_eat['3,name'] = 'Beef & Mushroom Stroganoff'
	$_eat['3,type'] = 'strofan'
	$_eat['3,price'] = 1200
	$_eat['4,name'] = 'Red Caviar Blinchiki'
	$_eat['4,type'] = 'blifan'
	$_eat['4,price'] = 1360
	$_str = '<table border="0" width="400" cellpadding="0" cellspacing="1">'
	i = 0
	:loop_fancy_food
	$_str += '<tr bgcolor='+iif(i mod 2 = 0,'<<$bcolor1>>','<<$bcolor2>>')+'><td height="30" width="80%" align="center"><font color="<<$fcolor1>>">'+$_eat['<<i>>,name']+'</td><td height="30" width="20%" align="right">'+iif(money >= val($_eat['<<i>>,price']),'<a href="exec:gt''food'',$_eat[''<<i>>,type''],<<i>>">'+$_eat['<<i>>,price']+'</a>',$_eat['<<i>>,price'])+'<font color="<<$fcolor1>>"><b> ₽. </b></td></tr>'
	i += 1
	if i < arrsize('$_eat')/3:jump 'loop_fancy_food'
	$_str += '</table></center></font>'
	'<center><img <<$set_imgh>> src="images/shared/food/fancyfood.jpg"</center><br>'
	'Your food order:<br><br>'+$_str
	killvar '$_str'
	killvar '$fcolor1'
	killvar '$bcolor1'
	killvar '$bcolor2'
end

if $ARGS[0] = 'pub':
	*clr & cla
	act 'Back':gt $loc, $metka
	killvar '$_eat'
	$_eat['0,name'] = 'Toasted rye snacks'
	$_eat['0,type'] = 'ryesna'
	$_eat['0,price'] = 30
	$_eat['1,name'] = 'Bowl of flavoured crisps'
	$_eat['1,type'] = 'crisps'
	$_eat['1,price'] = 40
	$_str = '<table border="0" width="400" cellpadding="0" cellspacing="1">'
	i = 0
	:loop_pub_food
	$_str += '<tr bgcolor='+iif(i mod 2 = 0,'<<$bcolor1>>','<<$bcolor2>>')+'><td height="30" width="80%" align="center"><font color="<<$fcolor1>>">'+$_eat['<<i>>,name']+'</td><td height="30" width="20%" align="right">'+iif(money >= val($_eat['<<i>>,price']),'<a href="exec:gt''food'',$_eat[''<<i>>,type''],<<i>>">'+$_eat['<<i>>,price']+'</a>',$_eat['<<i>>,price'])+'<font color="<<$fcolor1>>"><b> ₽. </b></td></tr>'
	i += 1
	if i < arrsize('$_eat')/3:jump 'loop_pub_food'
	$_str += '</table></center></font>'
	'<center><img <<$set_imgh>> src="images/shared/food/barfood.jpg"</center><br>'
	'Your food order:<br><br>'+$_str
	killvar '$_str'
	killvar '$fcolor1'
	killvar '$bcolor1'
	killvar '$bcolor2'
end

--- food_menu ---------------------------------