# vladimirQW_loc
$location_type = 'event_outdoors'
if $ARGS[0] = '':
minut += 5
menu_off = 1
gs 'stat'
'
Man'
'> src="images/characters/city/vladimir/001.jpg">'
if pcs_makeup > 1 and pcs_hairbsh = 1:
'A man standing near the fence noticed your gaze and smiled.'
act 'Approach the man':
cla
'You approach the man and he leaves the fence to walk towards you.'
xgt 'vladimirQW_loc', 'qwvladdy'
end
act 'Smile':
cla
'You smile at the man and he leaves the fence to walk towards you.'
xgt 'vladimirQW_loc', 'qwvladdy'
end
act 'Ignore':
cla
'You decide to ignore the man and start walking away but hearing his footsteps behind you, you turn back around.'
xgt 'vladimirQW_loc', 'qwvladdy'
end
else
'The man returns your gaze for a moment before turning away.'
act 'Leave':gt 'city_park', 'luna'
end
end &! --- ---
if $ARGS[0] = 'qwvladdy':
'The man smiles at you. "My name is Vladimir. I couldn''t help but admire your beauty. Would you allow me the honor of your name?"'
gs 'vladimirQW_loc', 'qwnamedy'
act 'Sorry, I''m busy':
cla
vladimirQW['stage'] = 1
'"Sorry, I''m busy," you excuse yourself.'
'Vladimir shakes his head to that. "Well, what are you busy with? I will not bite. I would just like to know the name of a beautiful, young lady."'
gs 'vladimirQW_loc', 'qwnamedy'
act 'Leave anyway':
cla
vladimirQW['stage'] = 2
'You turn away from the man with a roll of your eyes and leave.'
act 'Leave':gt 'city_park', 'luna'
end
end
end &! --- qwladdy ---
if $ARGS[0] = 'qwnamedy':
act '<<$pcs_nickname>>':
cla
vladimirQW['stage'] = 10
'"<<$pcs_nickname>>," you introduce yourself.'
'Vladimir smiled. "A beautiful name that suits you perfectly. Unfortunately I have to go, but I would like to see you again. If you leave me your phone number, I could call you tomorrow. I could take you out to dinner at a restaurant."'
act 'No (Go)':
cla
vladimirQW['stage'] = 2
'You decline and walk away, leaving the man standing.'
act 'Leave':gt 'city_park', 'luna'
end
act 'Give him your number':
cla
vladimirQW['stage'] = 20
vladimirQW['day'] = daystart
gs 'telefon', 'AddContact', 'A108', 'icon_na', 1
gs 'telefon', 'SetCallSchedule', 'A108', "", "0", "gs 'vladimirQW_loc', 'telephone_call'", "vladimirQW['day'] ! daystart and hour >= 15 and hour <= 17"
gs 'stat'
'You tell Vladmimir your phone number and he writes it down in a small notebook with a leather cover.'
act 'Leave':gt 'city_park', 'luna'
end
end
end &! --- qwnamedy ---
if $ARGS[0] = '2':
gs 'stat'
'You answer the phone to hear a male voice speaking, "Hello <<$pcs_nickname>>, this is Vladimir. We met at the park, if you remember?"'
act 'Hello, of course I remember':
cla
vladimirQW['stage'] = 21
'"Hey, of course I remember. How could I forget?" You respond.'
'"The offer to take you to dinner at the restaurant is still on the table. Would you like to go?" Vladimir asks.'
act 'Oh, I have a lot to do today, I''m sorry.':
cla
vladimirQW['stage'] = 20
vladimirQW['day'] = daystart
'You explain that you simply can''t today, as busy as you are.'
'"Okay. Then I''ll call you tomorrow at 16:00." Vladimir promises.'
act 'Hang up':gt $loc, $loc_arg
end
act 'I wouldn''t mind':
cla
vladimirQW['stage'] = 21
vladimirQW['day'] = daystart
gs 'telefon', 'SetCallSchedule', 'A108', "", "0", "gs 'vladimirQW_loc', 'telephone_call'", "vladimirQW['day'] ! daystart and hour >= 15 and hour <= 17 and week = 6"
'"I would like that," you tell him.'
'"Wonderful!" says Vladimir. "Then I''ll meet you at the restaurant at 20:00."'
'"I''ll see you then!"'
act 'Hang up':gt $loc, $loc_arg
end
end
end
if $ARGS[0] = '3':
gs 'stat'
'You answer the phone to hear a male voice on the other end, "Hello <<$pcs_nickname>>, this is Vladimir. I happen to own a boat and wondered if you would like a ride on it?"'
act 'Oh, I have a lot to do today, I''m sorry':
cla
vladimirQW['day'] = daystart
'You explain that you simply can''t today, as busy as you are.'
'"Okay. Then I''ll call you another time." Vladimir promises.'
act 'Hang up':gt $loc, $loc_arg
end
act 'I''d like that':
cla
vladimirQW['stage'] = 30
vladimirQW['day'] = daystart
gs 'telefon', 'SetCallSchedule', 'A108', "", "0", "gs 'vladimirQW_loc', 'telephone_call'", "vladimirQW['day'] ! daystart and hour >= 15 and hour <= 17 and week = 6"
'"I''d like that." you tell him.'
'You can hear that Vladimir''s pleased over the phone. "Wonderful, my driver will come to pick you up."'
act 'Hang up':gt $loc, $loc_arg
end
end
if $ARGS[0] = '4':
gs 'stat'
'You pick up the phone to hear a male voice speaking, "Hello <<$pcs_nickname>>, it''s Vladimir. I was wondering if you have time to meet up?"'
act 'Oh, I have a lot to do today, I''m sorry':
cla
vladimirQW['day'] = daystart
'You explain that you simply can''t today, as busy as you are.'
'"Okay. Then I''ll call you another day." Vladimir promises.'
act 'Hang up':gt $loc, $loc_arg
end
act 'I''d like that':
cla
vladimirQW['stage'] = 40
vladimirQW['day'] = daystart
gs 'telefon', 'SetCallSchedule', 'A108', "", "0", "gs 'vladimirQW_loc', 'telephone_call'", "vladimirQW['day'] ! daystart and hour >= 15 and hour <= 17 and week = 6"
'"I''d like that." you tell him.'
'You can hear that Vladimir''s pleased over the phone. "Wonderful, my driver will come to pick you up."'
act 'Hang up':gt $loc, $loc_arg
end
end
if $ARGS[0] = 'telephone_call':
cla & clr
gs 'stat'
gs 'telefon','phone_ring'
if vladimirQW['stage'] = 20:
gt 'vladimirQW_loc', '2'
elseif vladimirQW['stage'] = 25 and week = 6:
gt 'vladimirQW_loc', '3'
elseif vladimirQW['stage'] = 35 and week = 6:
gt 'vladimirQW_loc', '4'
end
end
--- vladimirQW_loc ---------------------------------