# koncepod1 if $ARGS[0]='start': menu_off = 1 end if $ARGS[0]='prs': cls '
> src="images/locations/oldtown/vacanthouse/koncepod.jpg" >
' '"Go away please and don''t annoy me."' act 'Leave':gt'dvor' end if $ARGS[0]='krr2x1': cla *clr minut += 5 gs'stat' '
Stairs
' '
> src="images/locations/oldtown/vacanthouse/koncepod3.jpg" >
' if psiho = 0: 'You stop at the door and immediately open it. You have the eerie feeling of the presence of the old man, causing a chill to run down your spine.' 'You look at your hand and try to focus on it so that you can rid yourself of the feeling.' 'Your heart pounds, like the beating wings of a bird in a snare. Looking at the usual architecture, the flight of stairs, and the general atmosphere of the old building helps. You begin to calm down.' act 'Quickly go inside':gt'koncepod1','krr2x' end act 'Outside':pavserhom = 3 & psiha = 1 & gt'dvor' end if $ARGS[0]='krr2x': cla *clr killvar '$locclass' minut += 5 pavserpsiday = daystart gs 'stat' '
Corridor
' '
> src="images/locations/oldtown/vacanthouse/corridor.jpg" >
' if psiho = 0 and psi1day = 0:dynamic $pavser2 if psiho = 3 and psi1day = 0:dynamic $pavser7 if psi1day = 1:'Continue' act 'Go to the living room':gt'koncepod1','str2x' act 'Go to the kitchen':gt'koncepod1','khr2x' act 'Go to the bathroom':gt'koncepod1','vnr2x' if psiho > 0: act 'OUTSIDE': cls if $clothingworntype ! 'nude': xgt'dvor' elseif $clothingworntype = 'nude': 'You need to get dressed.' xgt $curloc end end end end if $ARGS[0]='str2x': cla *clr minut += 5 $locclass = 'livingr' gs'stat' '
Living Room
' '
> src="images/locations/oldtown/vacanthouse/hall.jpg" >
' if psiho = 0 and psi1day = 0:dynamic $pavser if psiho >= 1: act 'Go to the kitchen':gt'koncepod1','khr2x' act 'Go to the bedroom':gt'koncepod1','bdr2x' act 'Go to the hall':gt'koncepod1','krr2x' end end if $ARGS[0]='khr2x': cla *clr minut += 5 $locclass = 'kitr' gs'stat' '
Kitchen
' '
> src="images/locations/oldtown/vacanthouse/kitchen.jpg" >
' if psiho = 2 and psihb = 0 and psihc = 0 and psi1day = 0:dynamic $pavser5 if psiho = 2 and psihb = 1 and psihc = 1 and psi1day = 0:dynamic $pavser6 act 'Go to the living room':gt'koncepod1','str2x' act 'Go to the hall':gt'koncepod1','krr2x' end if $ARGS[0] = 'vnr2x': $metkaM = 'vnr2x' $locM = 'koncepod1' $metka = 'vnr2x' $loc = 'koncepod1' cls minut += 5 gs'stat' '
Bathroom
' '
> src="images/locations/oldtown/vacanthouse/bathroom.jpg" >
' 'Above the washbasin hangs an oval mirror.' if psiho = 2 and psihb = 1 and psihc = 0 and psi1day = 0:dynamic $pavser4 act 'Go to the hall':gt'koncepod1','krr2x' dynamic $tampon dynamic $quickwash dynamic $basin dynamic $publicpan end if $ARGS[0]='bdr2x': cla *clr minut += 5 $location_type = 'private' $locclass = 'bedr' gs'stat' '
Bedroom
' '
> src="images/locations/oldtown/vacanthouse/bedroom.jpg" >
' if psiho = 1 and psi1day = 0:dynamic $pavser3 act 'Go to the hall':gt'koncepod1','krr2x' end --- koncepod1 ---------------------------------