# mod_addedflavour_A69_Events if $ARGS[0] = 'A69-JuniorCupArrivalEv-1': *clr & cla menu_off = 1 minut += rand(1,2) gs 'mod_addedflavour_A19_Functions' , 'config' gs 'mod_addedflavour_A69_Functions' , 'config' gs 'mod_addedflavour_Volleyball' , 'SetupTournament' gs 'mod_addedflavour_Volleyball' , 'SetupLeagues' gs 'stat' '
' *nl if hour = 15: '"You finally got here then <<$pcs_firstname>>! We did say the bus left at 3pm; not to be here at any time including 3pm... Anyway, glad you are here now and as you are the last one we will get moving soon."' act 'Leave for the Junior Cup' : gt 'mod_addedflavour_A69_Events' , 'A69-JuniorCupArrivalEv-2' , 'Late' else '"Good to see you here ' + iif(rand(1,2) = 1,'<<$pcs_nickname>>','<<$pcs_firstname>>') + '; we are still waiting on one or two people but we will get moving soon."' act 'Wait on the Bus' : gt 'mod_addedflavour_A69_Events' , 'A69-JuniorCupArrivalEv-2' end end if $ARGS[0] = 'A69-JuniorCupArrivalEv-2': *clr & cla minut += ((1020 - ((hour * 60) + minut)) + rand(5,20)) gs 'stat' '
' *nl if $ARGS[1] = 'Late': 'You rush onto the Bus and sit in the first available seat you come across. The Bus gets moving as soon as you have sat down and within moments you are seeing the Community Centre disappear out of view' else 'You get on the Bus and find a good seat for you to set yourself up in and get comfortable for the long journey into the City. You see more and more people pile on as you wait before everyone is accounted for and the Coach tells the Driver to depart.' end *nl 'The journey goes on for over an hour but the time passes briskly allowing you to think on about the Event itself. You don''t have all the information yet but you understand that you will be facing at least Seven other teams in a tournament and that the competition will be over the weekend, but you are sure that Mr Nikolaevich will tell you more when you arrive.' act 'Arrive at Hotel' : gt 'mod_addedflavour_A69_Events' , 'A69-JuniorCupArrivalEv-3' end if $ARGS[0] = 'A69-JuniorCupArrivalEv-3': *clr & cla minut += rand(10,15) gs 'stat' '
' *nl 'Before long your Bus has arrived at the Hotel and pulled in outside for you all to start filing off. Once everyone is ready your Coach guides you all into the Main Hall for a quick talk about the rules.' act 'Listen to Coach' : gt 'mod_addedflavour_A69_Events' , 'A69-JuniorCupArrivalEv-4' end if $ARGS[0] = 'A69-JuniorCupArrivalEv-4': *clr & cla minut += rand(3,5) gs 'stat' '
' *nl '"Right everyone; bring it in and listen. First things first, the rules for the Hotel. Each Team has been given the use of a wing of the hotel which is exclusively for them for which we have been given the Western Wing of the Ground Floor. A Wing basically contains a Room with Ensuite for each Team Member and the coach with Team Members pairing up to share, with a Common Room at the end which will act as the hub for all of our free time outside of our respective rooms. During the event all Teams will be restricted to their Wing alone, the only exception being the Main Hall where any Team can collect items or gather for Games at the Stadium.' *nl '"As for the Event itself we are in one of two leagues of four teams which we will play out tomorrow with each team playing each other; then the top two of each league will play in a knockout Tournament on Sunday to decide the Winner. If you want more information then you can find it here. Right now though you all have free run of our Wing of the Hotel, just remember there is a 9pm curfew as you all need to assemble here at 8am tomorrow morning.' *nl '"Oh and before I forget, you will find your name on the door of your assigned room. It is all pre-determined and you share with who I say you share with.' act 'Go find your Room' : gt 'mod_addedflavour_A69_Events' , 'A69-JuniorCupArrivalEv-5' end if $ARGS[0] = 'A69-JuniorCupArrivalEv-5': *clr & cla minut += rand(1,2) gs 'stat' '
' *nl 'You reach the corridor and find you have been assigned Room 107. Walking straight in you are greeted with a well laid out room with all your amenties covered for. You are quite happy with how it turned out as it could have been a shithole after all but once you get off the initial high you zone in on the second bed.' *nl 'Oh yeah... I am sharing with someone. Oh Shit... I hope to god it is not Christina...' *nl 'With typical karmic timing you hear the door opening behind you.' *nl 'Please don''t be Christina. Please don''t be Christina...' act 'Greet your Room Share' : gt 'mod_addedflavour_A69_Events' , 'A69-JuniorCupArrivalEv-6' end if $ARGS[0] = 'A69-JuniorCupArrivalEv-6': *clr & cla modVar_AF_EventProgress['A19-ConfidenceEv'] = 1 gs 'stat' '
Avelina Starov
' '
' *nl 'The door opens and to your elated surprise it is not Christina; but instead it is Lina!' *nl '"Oh hi Lina, I didn''t expect to be sharing with you; if I was to guess I would have figured you would have gone with Christina"' *nl '"Yes, well, I expected so as well but it seems that Mr Nikolaevich has decided to separate us... he has put Lariska with her instead..."' *nl '"... well no worry! I''m glad I get to share with you. Barely think I''ve ever had the chance to spend any time with you anyway."' *nl '"... well anyway, I''ll get unpacked..."' *nl '"... Ok, I guess I''ll do the same."' act 'Go about your day' : gs 'mod_addedflavour_A69_Functions' , 'CupHotelSetup' , 'start' & gt 'mod_addedflavour_city_hotel_Bedr' , 'start' , 1 end if $ARGS[0] = 'A69-EventGather': *clr & cla menu_off = 1 minut += (60 - minut) minut += rand(1,2) gs 'stat' '
Hotel Entry Hall
' '
' *nl 'You mill around waiting as the rest of your Team all appear as well. With everyone in place you Coach brings you all to his attention...' if week = 6: act 'Listen' : gt 'mod_addedflavour_A69_Events' , 'A69-Saturday-1' elseif week = 7: act 'Listen' : gt 'mod_addedflavour_A69_Events' , 'A69-Sunday-1' end end if $ARGS[0] = 'A69-Saturday-1': *clr & cla menu_off = 1 minut += rand(1,2) gs 'stat' '
' *nl if $ARGS[1] = 'Late': '"<<$pcs_firstname>>! Did you forget the time we were to turn up here? Well you are here now so let''s continue..."' *nl end '"Now; soon we will all be going to the Stadium for the League Matches. To remind you: We are in League A and will have one match with each other team in the league over the course of the day. They have a court setup for each League so all we need to worry about is that we will have a match then the other in League will have theirs, giving us a rest. Then at the end of the day we will know if we have progressed to the Knockout Tournament tomorrow."' *nl '"Whatever happens though, just enjoy yourselves out there. Play well of course! But do enjoy it; we are lucky to even make it to the Junior Cup."' *nl '"Anyway, let''s all get on the Bus"' act 'Get on the Bus' : gt 'mod_addedflavour_A69_Events' , 'A69-Saturday-2' end if $ARGS[0] = 'A69-Saturday-2': *clr & cla minut += rand(3,5) gs 'stat' '
' *nl 'You all pile on and within minutes you are off to the stadium with the other Teams shortly behind you.' act 'Arrive' : gt 'mod_addedflavour_A69_Events' , 'A69-Saturday-3' end if $ARGS[0] = 'A69-Saturday-3': *clr & cla minut += rand(10,15) gs 'stat' '
' *nl 'It doesn''t take long to get to the venue and once there your Coach gets your attention once more...' *nl '"Welcome everyone to the Gazprom Arena!..."' *nl '"...''s smaller adjacent Volleyball Stadium... Now, let''s get inside..."' *nl 'With the completion of your Coach''s rousing speech you all head into the Stadium proper.' act 'Head-In' : gt 'mod_addedflavour_A69_Events' , 'A69-Saturday-4' end if $ARGS[0] = 'A69-Saturday-4': *clr & cla minut += (540 - ((hour * 60) + minut)) modVar_AF_EventProgress['A69-LeagueMatches'] = 1 gs 'stat' '
' *nl 'Your Team manages to spend the remaining time getting comfortable until finally you are heading to your first match...' act 'Play Volleyball!' : gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueA_Games[0] , $modArr_AF_VLeagueA_Games[1] & gt 'mod_addedflavour_Volleyball' , 'MatchBuildup' end if $ARGS[0] = 'A69-Saturday-5': *clr & cla minut += rand(3,6) KILLVAR '$modVar_AF_Row' $modVar_AF_Row[] = '<<$modArr_AF_VLeagueA_Games[0]>> <> - <> <<$modArr_AF_VLeagueA_Games[1]>>' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[0])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[0])] += modVar_AF_MatchPointsA modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[0])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[1])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[1])] += modVar_AF_MatchPointsB modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[1])] += modVar_AF_MatchPointsA modVar_AF_EventProgress['A69-LeagueMatches'] = 2 gs 'stat' '
' *nl 'With the game over you head to the Rest Area to get your energy back and check out the other games' act 'Prepare for next match' : gt 'mod_addedflavour_A69_Events' , 'A69-Saturday-6' , 'NextMatch' end if $ARGS[0] = 'A69-Saturday-6': *clr & cla if $ARGS[1] = 'NextMatch': minut += (660 - ((hour * 60) + minut)) gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueA_Games[2] , $modArr_AF_VLeagueA_Games[3] , 'Simulate' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[2])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[2])] += modVar_AF_MatchPointsA modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[2])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[3])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[3])] += modVar_AF_MatchPointsB modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[3])] += modVar_AF_MatchPointsA $modVar_AF_Row[] = '<<$modArr_AF_VLeagueA_Games[2]>> <> - <> <<$modArr_AF_VLeagueA_Games[3]>>' gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueB_Games[0] , $modArr_AF_VLeagueB_Games[1] , 'Simulate' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[0])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[0])] += modVar_AF_MatchPointsA modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[0])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[1])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[1])] += modVar_AF_MatchPointsB modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[1])] += modVar_AF_MatchPointsA $modVar_AF_Row[] = '<<$modArr_AF_VLeagueB_Games[0]>> <> - <> <<$modArr_AF_VLeagueB_Games[1]>>' gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueB_Games[2] , $modArr_AF_VLeagueB_Games[3] , 'Simulate' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[2])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[2])] += modVar_AF_MatchPointsA modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[2])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[3])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[3])] += modVar_AF_MatchPointsB modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[3])] += modVar_AF_MatchPointsA $modVar_AF_Row[] = '<<$modArr_AF_VLeagueB_Games[2]>> <> - <> <<$modArr_AF_VLeagueB_Games[3]>>' pcs_mood += 5 pcs_health += 10 pcs_hydra += 30 end gs 'stat' 'Games Played:' *nl '<<$modVar_AF_Row[0]>>' '<<$modVar_AF_Row[1]>>' '<<$modVar_AF_Row[2]>>' '<<$modVar_AF_Row[3]>>' *nl 'During the down time you get something to drink and mill around with your Team-mates. Soon enough it is time for the next match!' act 'Check Tournament Information' : $loc = 'mod_addedflavour_A69_Events' & $loc_arg = 'A69-Saturday-6' & gt 'mod_addedflavour_A69_Functions' , 'TournamentInformation' act 'Play Volleyball!' : gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueA_Games[4] , $modArr_AF_VLeagueA_Games[5] & gt 'mod_addedflavour_Volleyball' , 'MatchBuildup' end if $ARGS[0] = 'A69-Saturday-7': *clr & cla minut += rand(3,6) KILLVAR '$modVar_AF_Row' $modVar_AF_Row[] = '<<$modArr_AF_VLeagueA_Games[4]>> <> - <> <<$modArr_AF_VLeagueA_Games[5]>>' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[4])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[4])] += modVar_AF_MatchPointsA modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[4])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[5])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[5])] += modVar_AF_MatchPointsB modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[5])] += modVar_AF_MatchPointsA modVar_AF_EventProgress['A69-LeagueMatches'] = 3 gs 'stat' '
' *nl 'With the game over you head to the Rest Area to get your energy back and check out the other games' act 'Prepare for next match' : gt 'mod_addedflavour_A69_Events' , 'A69-Saturday-8' , 'NextMatch' end if $ARGS[0] = 'A69-Saturday-8': *clr & cla if $ARGS[1] = 'NextMatch': minut += (780 - ((hour * 60) + minut)) gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueA_Games[6] , $modArr_AF_VLeagueA_Games[7] , 'Simulate' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[6])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[6])] += modVar_AF_MatchPointsA modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[6])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[7])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[7])] += modVar_AF_MatchPointsB modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[7])] += modVar_AF_MatchPointsA $modVar_AF_Row[] = '<<$modArr_AF_VLeagueA_Games[6]>> <> - <> <<$modArr_AF_VLeagueA_Games[7]>>' gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueB_Games[4] , $modArr_AF_VLeagueB_Games[5] , 'Simulate' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[4])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[4])] += modVar_AF_MatchPointsA modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[4])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[5])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[5])] += modVar_AF_MatchPointsB modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[5])] += modVar_AF_MatchPointsA $modVar_AF_Row[] = '<<$modArr_AF_VLeagueB_Games[4]>> <> - <> <<$modArr_AF_VLeagueB_Games[5]>>' gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueB_Games[6] , $modArr_AF_VLeagueB_Games[7] , 'Simulate' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[6])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[6])] += modVar_AF_MatchPointsA modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[6])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[7])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[7])] += modVar_AF_MatchPointsB modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[7])] += modVar_AF_MatchPointsA $modVar_AF_Row[] = '<<$modArr_AF_VLeagueB_Games[6]>> <> - <> <<$modArr_AF_VLeagueB_Games[7]>>' pcs_mood += 5 pcs_health += 10 pcs_hydra += 30 end gs 'stat' 'Games Played:' *nl '<<$modVar_AF_Row[0]>>' '<<$modVar_AF_Row[1]>>' '<<$modVar_AF_Row[2]>>' '<<$modVar_AF_Row[3]>>' *nl 'During the down time you get something to drink and mill around with your Team-mates. Soon enough it is time for the next match!' act 'Check Tournament Information' : $loc = 'mod_addedflavour_A69_Events' & $loc_arg = 'A69-Saturday-8' & gt 'mod_addedflavour_A69_Functions' , 'TournamentInformation' act 'Play Volleyball!' : gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueA_Games[8] , $modArr_AF_VLeagueA_Games[9] & gt 'mod_addedflavour_Volleyball' , 'MatchBuildup' end if $ARGS[0] = 'A69-Saturday-9': *clr & cla minut += rand(3,6) KILLVAR '$modVar_AF_Row' $modVar_AF_Row[] = '<<$modArr_AF_VLeagueA_Games[8]>> <> - <> <<$modArr_AF_VLeagueA_Games[9]>>' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[8])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[8])] += modVar_AF_MatchPointsA modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[8])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[9])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[9])] += modVar_AF_MatchPointsB modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[9])] += modVar_AF_MatchPointsA modVar_AF_EventProgress['A69-LeagueMatches'] = 4 gs 'stat' '
' *nl 'With the game over you head to the Rest Area to get your energy back and check out the other games' act 'Check Results' : gt 'mod_addedflavour_A69_Events' , 'A69-Saturday-10' , 'NextMatch' end if $ARGS[0] = 'A69-Saturday-10': *clr & cla if $ARGS[1] = 'NextMatch': minut += (900 - ((hour * 60) + minut)) gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueA_Games[10] , $modArr_AF_VLeagueA_Games[11] , 'Simulate' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[10])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[10])] += modVar_AF_MatchPointsA modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[10])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueA_Wins[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[11])] += 1 modArr_AF_VLeagueA_PointsFor[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[11])] += modVar_AF_MatchPointsB modArr_AF_VLeagueA_PointsAgainst[arrpos('$modArr_AF_VLeagueA_TeamName',$modArr_AF_VLeagueA_Games[11])] += modVar_AF_MatchPointsA $modVar_AF_Row[] = '<<$modArr_AF_VLeagueA_Games[10]>> <> - <> <<$modArr_AF_VLeagueA_Games[11]>>' gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueB_Games[8] , $modArr_AF_VLeagueB_Games[9] , 'Simulate' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[8])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[8])] += modVar_AF_MatchPointsA modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[8])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[9])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[9])] += modVar_AF_MatchPointsB modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[9])] += modVar_AF_MatchPointsA $modVar_AF_Row[] = '<<$modArr_AF_VLeagueB_Games[8]>> <> - <> <<$modArr_AF_VLeagueB_Games[9]>>' gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_VLeagueB_Games[10] , $modArr_AF_VLeagueB_Games[11] , 'Simulate' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[10])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[10])] += modVar_AF_MatchPointsA modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[10])] += modVar_AF_MatchPointsB if modVar_AF_MatchPointsB > modVar_AF_MatchPointsA : modArr_AF_VLeagueB_Wins[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[11])] += 1 modArr_AF_VLeagueB_PointsFor[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[11])] += modVar_AF_MatchPointsB modArr_AF_VLeagueB_PointsAgainst[arrpos('$modArr_AF_VLeagueB_TeamName',$modArr_AF_VLeagueB_Games[11])] += modVar_AF_MatchPointsA $modVar_AF_Row[] = '<<$modArr_AF_VLeagueB_Games[10]>> <> - <> <<$modArr_AF_VLeagueB_Games[11]>>' pcs_mood += 5 pcs_health += 10 pcs_hydra += 30 end gs 'stat' 'Games Played:' *nl '<<$modVar_AF_Row[0]>>' '<<$modVar_AF_Row[1]>>' '<<$modVar_AF_Row[2]>>' '<<$modVar_AF_Row[3]>>' *nl 'During the down time you get something to drink and mill around with your Team-mates. Soon enough all the matches are completed and it is time to check the results!' act 'Check Results!' : gt 'mod_addedflavour_A69_Events' , 'A69-Saturday-11' end if $ARGS[0] = 'A69-Saturday-11': *clr & cla minut += rand(3,6) gs 'mod_addedflavour_Volleyball' , 'SortLeagues' if arrpos('$modArr_AF_VLeagueA_TeamName','Pavlovsk Falcons') = 0: $modVar_AF_TempStr = '1st' modVar_AF_Temp = 1 elseif arrpos('$modArr_AF_VLeagueA_TeamName','Pavlovsk Falcons') = 1: $modVar_AF_TempStr = '2nd' modVar_AF_Temp = 1 elseif arrpos('$modArr_AF_VLeagueA_TeamName','Pavlovsk Falcons') = 2: $modVar_AF_TempStr = '3rd' modVar_AF_Temp = 2 elseif arrpos('$modArr_AF_VLeagueA_TeamName','Pavlovsk Falcons') = 3: $modVar_AF_TempStr = '4th' modVar_AF_Temp = 2 end gs 'stat' '
' *nl '"Well, with all the games completed it turns out that we came <<$modVar_AF_TempStr>> in our league!"' *nl if modVar_AF_Temp = 1: '"That means we have qualified for the Knockout Tournament Tomorrow! It also means we will be heading back to the Hotel and staying another night so let''s head back."' act 'Head Back to the Hotel': *clr & cla minut += rand(10,15) gs 'stat' '
' *nl 'You head back to the Hotel with the rest of your Team in high spirits after your success...' act 'Reach the Hotel' : gt 'mod_addedflavour_city_hotel_Hall' , 'start' end elseif modVar_AF_Temp = 2: '"Unfortunately that means we have not qualified for the Knockout Tournament so for us the Cup is over. Anyone is welcome to stay in the city of come back with us to Pavlovsk."' act 'Stay in the City' : gt 'mod_addedflavour_city_vstadium' , 'start' act 'Head back to Pavlovsk' : minut += rand(65,80) & gt 'pav_residential' end end if $ARGS[0] = 'A69-Sunday-1': *clr & cla menu_off = 1 minut += rand(1,2) KILLVAR '$modArr_AF_Knockout_Games' if arrpos('$modArr_AF_VLeagueA_TeamName','Pavlovsk Falcons') = 0: $modArr_AF_Knockout_Games[] = $modArr_AF_VLeagueB_TeamName[1] $modArr_AF_Knockout_Games[] = $modArr_AF_VLeagueB_TeamName[0] $modArr_AF_Knockout_Games[] = $modArr_AF_VLeagueA_TeamName[1] elseif arrpos('$modArr_AF_VLeagueA_TeamName','Pavlovsk Falcons') = 1: $modArr_AF_Knockout_Games[] = $modArr_AF_VLeagueB_TeamName[0] $modArr_AF_Knockout_Games[] = $modArr_AF_VLeagueB_TeamName[1] $modArr_AF_Knockout_Games[] = $modArr_AF_VLeagueA_TeamName[0] end gs 'stat' '
' *nl if $ARGS[1] = 'Late': '"<<$pcs_firstname>>! 8am! I said 8am! Anyway..."' *nl end '"Now; the first match is us up against <<$modArr_AF_Knockout_Games[0]>>. Then the other match which is <<$modArr_AF_Knockout_Games[1]>> versus <<$modArr_AF_Knockout_Games[2]>>."' *nl '"So lets get to the stadium, do our best, and come out of all this with our heads held high. We have already done very well to get this far after all. And Remember, they''ll be some time before the first match to collect your thoughts if you need to."' act 'Get on the Bus' : gt 'mod_addedflavour_A69_Events' , 'A69-Sunday-2' end if $ARGS[0] = 'A69-Sunday-2': *clr & cla minut += rand(3,5) gs 'stat' '
' *nl 'You all pile on and within minutes you are off to the stadium with the other three Teams shortly behind you.' act 'Arrive' : gt 'mod_addedflavour_A69_Events' , 'A69-Sunday-3' end if $ARGS[0] = 'A69-Sunday-3': *clr & cla minut += rand(10,15) gs 'stat' '
' *nl 'It doesn''t take long to get to the venue and soon enough your Coach is guiding you into the Rest Area.' act 'Head-In' : gt 'mod_addedflavour_A69_Events' , 'A69-Sunday-4' end if $ARGS[0] = 'A69-Sunday-4': *clr & cla minut += (540 - ((hour * 60) + minut)) modVar_AF_EventProgress['A69-KnockoutMatches'] = 1 gs 'stat' '
' *nl 'Your Team manages to spend the remaining time getting comfortable until finally you are heading to your first match...' *nl '"Seriously though everyone; you are fantastic for getting this far, fantastic trying so hard and fantastic for what you are about to do. Don''t forget that and you will achieve something here today!"' act 'Play Volleyball!' : gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , 'Pavlovsk Falcons' , $modArr_AF_Knockout_Games[0] & gt 'mod_addedflavour_Volleyball' , 'MatchBuildup' end if $ARGS[0] = 'A69-Sunday-5': *clr & cla minut += rand(10,15) pcs_hydra += 30 modVar_AF_EventProgress['A69-KnockoutMatches'] = 2 gs 'stat' 'Games Played:' *nl 'Pavlovsk Falcons <> - <> <<$modArr_AF_Knockout_Games[0]>>' if modVar_AF_MatchPointsA < modVar_AF_MatchPointsB: $modArr_AF_Knockout_Games[] = $modArr_AF_Knockout_Games[0] gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_Knockout_Games[1] , $modArr_AF_Knockout_Games[2] , 'Simulate' '<<$modArr_AF_Knockout_Games[1]>> <> - <> <<$modArr_AF_Knockout_Games[2]>>' if modVar_AF_MatchPointsA < modVar_AF_MatchPointsB : $modArr_AF_Knockout_Games[] = $modArr_AF_Knockout_Games[2] if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : $modArr_AF_Knockout_Games[] = $modArr_AF_Knockout_Games[1] gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_Knockout_Games[3] , $modArr_AF_Knockout_Games[4] , 'Simulate' '<<$modArr_AF_Knockout_Games[3]>> <> - <> <<$modArr_AF_Knockout_Games[4]>>' *nl if modVar_AF_MatchPointsA < modVar_AF_MatchPointsB : '
<<$modArr_AF_Knockout_Games[4]>> wins the Junior Cup
' if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : '
<<$modArr_AF_Knockout_Games[3]>> wins the Junior Cup
' act 'Talk to your Coach' : gt 'mod_addedflavour_A69_Events' , 'A69-Sunday-6' elseif modVar_AF_MatchPointsA > modVar_AF_MatchPointsB: gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , $modArr_AF_Knockout_Games[1] , $modArr_AF_Knockout_Games[2] , 'Simulate' '<<$modArr_AF_Knockout_Games[1]>> <> - <> <<$modArr_AF_Knockout_Games[2]>>' if modVar_AF_MatchPointsA < modVar_AF_MatchPointsB : $modArr_AF_Knockout_Games[] = $modArr_AF_Knockout_Games[2] if modVar_AF_MatchPointsA > modVar_AF_MatchPointsB : $modArr_AF_Knockout_Games[] = $modArr_AF_Knockout_Games[1] $modVar_AF_Music = 'VolleyballFinal' act 'Play Volleyball!' : gs 'mod_addedflavour_Volleyball' , 'MatchSetup' , 'Tournament' , 'Pavlovsk Falcons' , $modArr_AF_Knockout_Games[3] & gt 'mod_addedflavour_Volleyball' , 'MatchBuildup' end end if $ARGS[0] = 'A69-Sunday-6': *clr & cla minut += rand(1,2) modVar_AF_EventProgress['A69-KnockoutMatches'] = 3 gs 'stat' '
' *nl '"Well, we unfortunately didn''t win. Still, you all should be very proud of your achievements here; you are part of the very few that even make it this far into a competition and for that you should be pleased with yourselves. Anyway, any of you are welcome to stay here in the city or come back with us on the Bus to Pavlovsk."' act 'Stay in the City' : gt 'mod_addedflavour_city_vstadium' , 'start' act 'Head back to Pavlovsk' : minut += rand(65,80) & gt 'pav_residential' end if $ARGS[0] = 'A69-Sunday-7': *clr & cla minut += rand(3,6) modVar_AF_EventProgress['A69-KnockoutMatches'] = 3 gs 'stat' 'Games Played:' *nl 'Pavlovsk Falcons <> - <> <<$modArr_AF_Knockout_Games[3]>>' if modVar_AF_MatchPointsA < modVar_AF_MatchPointsB: *nl '
<<$modArr_AF_Knockout_Games[3]>> wins the Junior Cup
' act 'Talk to your Coach' : gt 'mod_addedflavour_A69_Events' , 'A69-Sunday-6' elseif modVar_AF_MatchPointsA > modVar_AF_MatchPointsB: *nl '
Pavlovsk Falcons wins the Junior Cup
' act 'Talk to your Coach' : gt 'mod_addedflavour_A69_Events' , 'A69-Sunday-8' end end if $ARGS[0] = 'A69-Sunday-8': *clr & cla minut += rand(1,2) modVar_AF_EventProgress['A69-KnockoutMatches'] = 3 modVar_AF_EventOpen['A69-JuniorCupWinners'] = 1 gs 'stat' '
' *nl '"Fantastic Job Everyone!!! You are the 2017 winners of the Junior Cup!!!"' *nl '"Now before you all go mad we have a bus driver quite looking forward to getting home so you can celebrate on the bus or I will understand if you want to stay here in the city!"' act 'Stay in the City' : gt 'mod_addedflavour_city_vstadium' , 'start' act 'Head back to Pavlovsk' : minut += rand(65,80) & gt 'pav_residential' end if $ARGS[0] = 'A69-HotelSex-1': *clr & cla menu_off = 1 minut += rand(1,2) gs 'stat' '
' *nl 'After making sure you weren''t seen you open his Hotel Door and run in before he even has a chance to refuse you. Landing square on his bed wakes him up well enough but he is still a bit groggy...' *nl '"<<$pcs_nickname>>! What... what are you doing in here? What time is... Wait! No-one saw you did they?"' act 'Respond' : gt 'mod_addedflavour_A69_Events' , 'A69-HotelSex-2' end if $ARGS[0] = 'A69-HotelSex-2': *clr & cla minut += rand(1,2) gs 'stat' '
' *nl '"Of course no-one saw me; they are all in their curfew that you imposed! The curfew you imposed for this very reason I am sure..."' *nl '"I did it so you all could get some sleep for the early start tomorrow!"' *nl '"Sure you did! It couldn''t possible be to allow what I am about to do now..."' *nl '"... what are you about do... oh..."' act 'Suck him off' : gt 'mod_addedflavour_A69_Events' , 'A69-HotelSex-3' end if $ARGS[0] = 'A69-HotelSex-3': *clr & cla gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_BlowJob_Give' gs 'stat' '
' *nl 'While retaining you overall control of the situation you pull away the duvet and put his cock straight into your mouth. You suck hard and enthusiastically in order to rouse it quickly to its peak.' *nl '"Oh ' + iif(rand(1,2) = 1,'<<$pcs_nickname>>','<<$pcs_firstname>>') + ', we have to be quiet but don''t you stop..."' act 'Remove your clothes' : gt 'mod_addedflavour_A69_Events' , 'A69-HotelSex-4' end if $ARGS[0] = 'A69-HotelSex-4': *clr & cla gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_BlowJob_Give' gs 'stat' '
' *nl 'All the while keeping his hardening shaft lodged between your eager lips, you start removing your clothes. Then the feeling hits you and you know you need to get naked as soon as possible.' act 'Get more of his attention' : gt 'mod_addedflavour_A69_Events' , 'A69-HotelSex-5' end if $ARGS[0] = 'A69-HotelSex-5': *clr & cla gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagPlay_Recv' gs 'stat' '
' *nl 'There is no denying his desire now, he wants you and shows it with his hands preparing you for what is to come.' *nl '"I don''t how I could ever deny you. I want you now. I want your body on my cock until I blow."' act 'Get more of his attention' : gt 'mod_addedflavour_A69_Events' , 'A69-HotelSex-6' end if $ARGS[0] = 'A69-HotelSex-6': *clr & cla gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagPlay_Recv' gs 'stat' '
' *nl 'In one swift movement you release his cock from your oral grasp and swing a leg over, kissing his glands with your vaginal lips.' *nl '"I don''t know. I''m not sure you are really interested in me. It took a lot of convincing to get this far..."' *nl 'You can see the moment in his eyes where he understands you are waiting for him to act and meets it by grabbing your ass and pulling you down on his hard shaft.' act 'Get some fucking' : gt 'mod_addedflavour_A69_Events' , 'A69-HotelSex-7' end if $ARGS[0] = 'A69-HotelSex-7': *clr & cla gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagSex' gs 'stat' '
' *nl 'You ride his cock hard; enjoying the feel of it as it surges up into you before retreating to do so again. The whole act is amplified by the awareness that you could be caught at any time...' act 'Let him take control' : gt 'mod_addedflavour_A69_Events' , 'A69-HotelSex-8' end if $ARGS[0] = 'A69-HotelSex-8': *clr & cla gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagSex' gs 'stat' '
' *nl 'Just as you are losing yourself to the moment he pulls you over and lays you down on the bed, not allowing any time for his cock to be outside of your enticing pussy.' *nl 'He hammers into you hard causing your whole body to shake with every thrust. All he can think about is the act of fucking you with all his might.' act 'Change Position' : gt 'mod_addedflavour_A69_Events' , 'A69-HotelSex-9' end if $ARGS[0] = 'A69-HotelSex-9': *clr & cla gs 'mod_addedflavour_Functions' , 'pcs_reticence' , 'Player_VagSex' gs 'stat' '
' *nl 'You could feel how close he was to reaching his peak when he pulled out to turn you over onto your front, obviously wanting to get more time out of your body. Not that you are complaining; with every thrust you are surging to your own pleasurable peak...' act 'Cum Hard' : gt 'mod_addedflavour_A69_Events' , 'A69-HotelSex-10' end if $ARGS[0] = 'A69-HotelSex-10': *clr & cla $orgasm_or = 'yes' gs 'arousal' , 'vaginal' , 5 gs 'arousal', 'end' gs 'stat' '
' *nl 'There is only so long you can take being pounded into until your own orgasm explodes onto the scene, and sure it does!' *nl 'You do your best to contain your own audible elation while your body shakes with primal delight! The feeling of which is triggering the oncoming of his own so he pulls out and lays you down to greet it...' act 'Take his cum' : gt 'mod_addedflavour_A69_Events' , 'A69-HotelSex-11' end if $ARGS[0] = 'A69-HotelSex-11': *clr & cla minut += rand(1,3) gs 'boyStat', 'A69' sexpartkno = 1 spafinloc = 12 gs 'Cum_Manage' gs 'stat' '
' *nl 'You lay back, drowning in your own satisfaction, as he rains his cum into your waiting mouth.' *nl '"Damn ' + iif(rand(1,2) = 1,'<<$pcs_nickname>>','<<$pcs_firstname>>') + '; that was amazing. Don''t get me wrong I am damn glad we didn''t get caught but that was mind-blowing. Quickly now, you need to get back to your room!"' *nl 'You regain your composure quickly and head back to your room to get to sleep...' act 'Get back to your room' : gt 'mod_addedflavour_city_hotel_Bedr' , 'start' , 1 end if $ARGS[0] = 'A69-TeamResearch': *clr & cla minut += rand(175,190) modArr_AF_VBallT_PlayerSkill[arrpos('$modArr_AF_VBallT_PlayerName','<<$pcs_firstname>> <<$pcs_lastname>>')] += ((100 - modArr_AF_VBallT_PlayerSkill[arrpos('$modArr_AF_VBallT_PlayerName','<<$pcs_firstname>> <<$pcs_lastname>>')]) / 2) modVar_AF_EventLock['A69-JuniorCupResearch'] = daystart gs 'stat' '
' *nl 'You spend a considerable amount of time studying your opponents; getting to know their skill levels, how they play and how best to position yourself to exploit it...' act 'Return' : gt $loc, $loc_arg end --- mod_addedflavour_A69_Events ---------------------------------