# TerminalOffice $location_type = 'public_indoors' minut += 1 gs 'stat' ! In the office if he knows we can buy a product or to perform a task boss of bystrousky. ! About the possibility of the sale of goods GG learns at the train station in Pavlovo in the dynamics $d_vokzal_vera_talk location vokdinvera ! verakassir > 0 - you can buy the product ! TerminalPapper = 1 and DayTerminalPapper = daystart - you can fulfill the order ! ! In the office, several offices, one for the purchase of the goods, the second for documents from bystrousky, and the third for a bright future ! ! Administration accounting and Director work in better conditions than managery :))) ! The conditions at the time require elaboration ! TerminalOfficeDirWorkTime = 0 TerminalOfficeBuhWorkTime = 0 if ((hour >= 9 and hour <= 12) or (hour >= 14 and hour <= 17)) and week < 6: TerminalOfficeDirWorkTime = 1 if ((hour >= 9 and hour <= 12) or (hour >= 14 and hour <= 19)) and week < 6: TerminalOfficeBuhWorkTime = 1 if $ARGS[0] = 'TerminalOfficeScreen': !1 - title !2 - the name of the picture file *clr '
'+$ARGS[1]+'
' '
> src="images/locations/city/industrial/terminal/'+$ARGS[2]+'.jpg">
' '' end !================================================== !Hall 00 !================================================== if $ARGS[0] = '00': gs 'TerminalOffice', 'TerminalOfficeScreen', 'Hall office space', 'terminal4' 'You in the lobby, office space.' cla act 'Leaving the office': minut += 5 & gt 'Terminal' act 'Go to the sales Department': minut += 1 & gt 'TerminalOffice', '11' act 'Go to the accounting Department': minut += 1 & gt 'TerminalOffice', '21' act 'Go to the Director': minut += 1 & gt 'TerminalOffice', '31' end !================================================== !Office a Manager = 1x !================================================== if $ARGS[0] = '11': !You can buy the item if you know that you can buy !Can try to give the documents from Anatoly Chubais !Can I ask when running accounting !Can I ask when works Director cla gs 'TerminalOffice', 'TerminalOfficeScreen', 'Sales', 'terminal2' *PL '- What can I do to help? - Smiling affably asks you Manager.' act 'To leave the office': minut += 1 & gt 'TerminalOffice', '00' if verakassir > 0: !Buy goods !Flag zapolanski storage, reduction !this flag allows you to go shopping DoNotBuy = 2 !Amount and Quantity that we can buy(store) MaxQuantityA = 0 MaxQuantity1 = 0 MaxQuantity2 = 0 MaxCost = 0 !Description size of storage TovarLimitRepository1 = 30 TovarLimitRepository2 = 100 *NL 'You spoke with the Manager about buying small things...' !Get current balances TovarRepository1 = tovarL if TovarRepository1 => TovarLimitRepository1: *P ' At home you are all full up.' else DoNotBuy -= 1 *P ' Now you have kept '+ TovarRepository1 +' PCs., at home you will be able to place only <> PCs.' MaxQuantity1 = TovarLimitRepository1 - TovarRepository1 end if YouCanGar > 0: !Get the current balances in the garage TovarRepository2 = GarTorgItem if TovarRepository2 => TovarLimitRepository2: *P ' In the garage there is no space.' else DoNotBuy -= 1 *P ' And garage stored '+ TovarRepository2 +' PCs., high in the garage, you will be able to place <> PCs.' MaxQuantity2 = TovarLimitRepository2 - TovarRepository2 end end if DoNotBuy = 2: *P ' After some thought, you realized that you just have nowhere to store the goods and decided to abandon the purchase.' else !Produce purchase act 'Buy small goods on 100 rubles, putting a specific number': minut += 13 MaxQuantityA = input("How much product you want to buy for the price 100 rubles apiece?") if MaxQuantityA > (MaxQuantity1 + MaxQuantity2): *NL 'You have nowhere to store the surplus <> PCs. !!!' cla act 'Clear': gt 'TerminalOffice', '11' end MaxCost = MaxQuantityA * 100 if MaxCost > money: !If not enough money *NL 'You don`t have enough cash, you will have to withdraw from the purchase.' if (money + karta >= MaxCost) or (karta >= MaxCost): !The player can be plastic money *P ' You have money on the card and you offer the Manager to pay by Bank card.' ' - We don`t have a terminal for card payments, says Manager. - Unfortunately, we can only accept cash.' end cla act 'Clear': gt 'TerminalOffice', '11' else !If the money is written off money to fill warehouses money -= MaxCost 'You purchased <> PCs. goods worth <>' !First populate channelise 1 if MaxQuantityA => MaxQuantity1: tovarL = TovarRepository1 + MaxQuantity1 MaxQuantityA -= MaxQuantity1 if YouCanGar > 0 : *P ', in t.h. <> PCs. storage room, garage <> PCs.' else if YouCanGar > 0 : *P ', in t.h. <> PCs. storage room, garage 0 PCs.' tovarL = TovarRepository1 + MaxQuantityA MaxQuantityA = 0 end !Now fill channelise 2 if MaxQuantityA > 0: GarTorgItem = TovarRepository2 + MaxQuantityA end if YouCanGar = 0 and money > 100: *NL 'By purchasing, you thought that would buy more goods, but a place to store it? May try to talk to the stepfather about the allocation of space for items in his garage...' end cla act 'To complete your purchase': gt 'TerminalOffice', '11' end end act 'Buy small goods on 100 rubles under "eyeballs" - it <<(MaxQuantity1 + MaxQuantity2)>> PCs.': !Purchase spend time minut += 13 MaxQuantityA = MaxQuantity1 + MaxQuantity2 MaxCost = MaxQuantityA * 100 !Hammered warehouses if MaxCost > money: !If not enough money *NL 'You don`t have enough cash, you will have to withdraw from the purchase.' if (money + karta >= MaxCost) or (karta >= MaxCost): !The player can be plastic money *P ' You have money on the card and you offer the Manager to pay by Bank card.' ' - We don`t have a terminal for card payments, says Manager. - Unfortunately, we can only accept cash.' end cla act 'Clear': gt 'TerminalOffice', '11' else !If the money is written off money to fill warehouses money -= MaxCost 'You purchased <> PCs. goods worth <>' !First populate channelise 1 if MaxQuantityA => MaxQuantity1: tovarL = TovarRepository1 + MaxQuantity1 MaxQuantityA -= MaxQuantity1 if YouCanGar > 0 : *P ', in t.h. <> PCs. storage room, garage <> PCs.' else if YouCanGar > 0 : *P ', in t.h. <> PCs. storage room, garage 0 PCs.' tovarL = TovarRepository1 + MaxQuantityA MaxQuantityA = 0 end !Now fill channelise 2 if MaxQuantityA > 0: GarTorgItem = TovarRepository2 + MaxQuantityA end if YouCanGar = 0 and money > 100: *NL 'By purchasing, you thought that would buy more goods, but a place to store it? May try to talk to the stepfather about the allocation of space for items in his garage...' end cla act 'To complete your purchase': gt 'TerminalOffice', '11' end end end end if YouNotOpenDoorDir = 1: !Where the Director, the Door was closed dir act 'Ask about the Director': '- Please tell me - you ask - how to see your supervisor?' 'The Manager barely noticeable grimace meets: Yuri himself is usually from Monday to Friday, 9-00 to 18-00. Well, still can go for lunch 13 to 14' cla act 'Clear': YouNotOpenDoorDir = 0 & gt 'TerminalOffice', '11' end end !Where is the accountant? Buch the door was closed if YouNotOpenDoorBuh = 1: act 'Ask about the accountant': '- Please tell me - I ask you - and how to see your accountant?' 'The Manager responds with a smile: Elizabeth is usually in the office Monday through Friday, 9-00 to 20-00. Well, still can go for lunch 13 to 14' cla act 'Clear': YouNotOpenDoorBuh = 0 & gt 'TerminalOffice', '11' end end !He Has papers, but a Manager should say to go to the accounting Department. if AboutDocsManager=0 and TerminalPapper = 1 and DayTerminalPapper = daystart: *NL '- I`m from Anatoly Chubais from the company "OOO Bystroushka limited", I am directed to request you the documents.' act 'Give documents': '- You better contact the accounts Department to Elizabeth, she needs to know. It is you the next door along the corridor.' cla act 'Clear': AboutDocsManager=1 & gt 'TerminalOffice', '11' end end !The GG yet topics of conversation. if verakassir = 0 and YouNotOpenDoorDir = 0 and YouNotOpenDoorBuh = 0 and TerminalPapper = 0: *NL 'You have nothing to say and nothing left to do how to get out of the office.' end end !================================================== !The office of the accountant = 2x !================================================== if $ARGS[0] = '21': ! Time control of the work of Buch disconnect until the issue is resolved temporal compatibility of obtaining a job in bystroushka if TerminalOfficeBuhWorkTime = 1: !You can give the documents cla gs 'TerminalOffice', 'TerminalOfficeScreen', 'The office of the accountant', 'terminal3' act 'To leave the office': minut += 1 & gt 'TerminalOffice', '00' !GG not a complete idiot, so will limit communication with only Buch documents, then that thread again *PL '- What you want? - Looking up from the monitor and turning to you on the couch asks cute girl.' if TerminalPapper = 1 and DayTerminalPapper = daystart: '"I''m from Anatoly Chubais from the company ''OOO Bystroushka limited'', I was instructed to deliver these documents."' '"Yes, I''ve been expecting these, may I?" She holds out a hand.' act 'Give documents': cla minut += 1 TerminalPapper = 2 gs 'stat' 'You hand the girl the folder, she opens it and quickly checks the contents.' '"Tell Anatoly Borisovich Elizabeth says thank you."' 'The girl smiles then returns her attention to her monitor and starts rapidly typing away on the number pad of her keyboard.' act 'To leave the office': minut += 1 & gt 'TerminalOffice', '00' end else *NL 'You have nothing to say and nothing left to do how to get out of the office.' end else !Accountant is not in place cla gs 'TerminalOffice', 'TerminalOfficeScreen', 'A door with a sign', 'terminal6' act 'Move away from the door': minut += 1 & gt 'TerminalOffice', '00' 'You knocked, but silence. Pushing down on the handle of the door you realized that the door was locked. May try to come at a different time or somebody to ask how much of a better approach? - thought you.' YouNotOpenDoorBuh = 1 end end !================================================== !The Director`s office = 3x !================================================== if $ARGS[0] = '31': if TerminalOfficeDirWorkTime = 1: !You can try to give the documents !You can try to talk cla gs 'TerminalOffice', 'TerminalOfficeScreen', 'The Director`s office', 'terminal1' act 'To leave the office': minut += 1 & gt 'TerminalOffice', '00' !Before the development of the plot 'Talk' the Director will constantly be on the phone and send he tries out of the office *PL 'You knocked and opened the door. Behind a massive Desk a man. The man was talking on the phone and apparently was not in the mood. You`re obviously not the person the man was expecting, so he dismissively waved his hand, clearly indicating that you need to leave the office.' if AboutBussines = 0: act 'Talk': gs 'TerminalOffice', 'TerminalOfficeScreen', 'The Director`s office', 'terminal1' *PL '
Dear player, here`s an elegant place for your story.' 'Ideal if it will be the beginning of a good, legitimate and profitable trading business for HS' *NL 'And yet close the door on the other side :)))
' AboutBussines = 1 delact 'Talk' end end if AboutDocs = 0 and TerminalPapper = 1 and DayTerminalPapper = daystart: act 'Give documents': gs 'TerminalOffice', 'TerminalOfficeScreen', 'The Director`s office', 'terminal1' *PL 'However, you ignored the gestures of men, because you have an important assignment from BOS.' '- I`m from Anatoly Chubais from the company "OOO Bystroushka limited", I am directed to request you the documents.' 'The man stopped talking on the phone, frowned, and putting you on the door said - Go accounting.' AboutDocs = 1 delact 'Give documents' end end if AboutBussines = 1 or AboutDocs = 1: *NL 'You have nothing left to do how to get out of the office.' else !The Director is not in place cla gs 'TerminalOffice', 'TerminalOfficeScreen', 'A door with a sign', 'terminal5' act 'Move away from the door': minut += 1 & gt 'TerminalOffice', '00' 'You knocked, but silence. Pushing down on the handle of the door you realized that the door was locked. May try to come at a different time or somebody to ask how much of a better approach? - thought you.' YouNotOpenDoorDir = 1 end end --- TerminalOffice ---------------------------------