1
0

portmirror 3.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146
  1. # portmirror
  2. $portmirror = {
  3. cla
  4. *clr
  5. '<center><img src="<<FUNC(''$face_image'')>>"></center>'
  6. '<<$hair>> <<$mop>> <<$skin>> <<$vnesh>>'
  7. if daystart < 10 and StoryLine = 0:'In the mirror, you looked quite strange woman''s face which is exactly copied all your actions. You hardly get to accept the idea that it is now is you.'
  8. if daystart >= 10 and daystart < 30 and StoryLine = 0:'From the mirror looks at you a woman''s face, to which you have become accustomed to, but sometimes, no, no and yes flash the idea that it is not your face.'
  9. if kosmetica > 0:'Cosmetics <<kosmetica>>'
  10. if kosmetica = 0:'You have no makeup.'
  11. if lipbalm > 0:'Lip Balm <<lipbalm>>'
  12. if lipbalm = 0:'You have no lip balm left.'
  13. if hapri = 0 and AutoHapri = 1:
  14. minut += 3
  15. hapri = 1
  16. 'You brush your hair'
  17. end
  18. if mop = 1 and kosmetica > 0 and AutoMakeup = 1:
  19. mop = AutoMakeupType
  20. if kosmetica < 3 and mop = 4:mop = 3
  21. if kosmetica < 2 and mop = 3:mop = 2
  22. if kosmetica < 1 and mop ! 1:
  23. mop = 1
  24. 'You have no make-up left'
  25. else
  26. if mop = 2:
  27. 'Applied light make-up'
  28. minut -= 3
  29. kosmetica -= 1
  30. end
  31. if mop = 3:
  32. 'Applied natural make-up'
  33. minut -= 5
  34. kosmetica -= 2
  35. end
  36. if mop = 4:
  37. 'Applied heavy make-up'
  38. minut -= 10
  39. vidageday -= 1
  40. kosmetica -= 3
  41. end
  42. end
  43. end
  44. if lipbalm > 0 and lipbalmstat <= 0 and AutoLipBalm = 1:
  45. minut -= 10
  46. lipbalm -= 1
  47. lipkoef += rand(5, 15)
  48. if lipkoef > 50:
  49. lipkoef = 0
  50. lip += 1
  51. end
  52. lipbalmstat += 8
  53. 'You smeared lip moisturizing balm'
  54. end
  55. if hapri = 0:
  56. act 'Brush your hair':
  57. cla
  58. minut += 3
  59. hapri = 1
  60. act 'View results':dynamic $portmirror
  61. end
  62. end
  63. if mop = 1 and kosmetica > 0:
  64. act 'Apply makeup':
  65. cla
  66. *clr
  67. '<center><img src="images/etogame/mop.jpg"></center>'
  68. act 'Light make-up':
  69. cla
  70. minut += 3
  71. kosmetica -= 1
  72. mop = 2
  73. recmop = mop
  74. 'You legonechko summed eyes and lips a little tint.'
  75. act 'View results':dynamic $portmirror
  76. end
  77. if kosmetica >= 2:
  78. act 'Natural makeup':
  79. cla
  80. minut += 5
  81. kosmetica -= 2
  82. mop = 3
  83. recmop = mop
  84. 'You lipstick, summed up his eyes and eyelids.'
  85. act 'View results':dynamic $portmirror
  86. end
  87. end
  88. if kosmetica >= 3:
  89. act 'Heavy makeup':
  90. cla
  91. minut += 10
  92. kosmetica -= 3
  93. vidageday -= 1
  94. mop = 4
  95. recmop = mop
  96. 'You densely nakrasili eyes, eyelids and mascara, lip contour nakrasili pencil and lipstick.'
  97. act 'View results':dynamic $portmirror
  98. end
  99. end
  100. end
  101. end
  102. if lipbalm > 0 and lipbalmstat <= 0:
  103. act 'Smear lip balm moisturizing':
  104. cla
  105. minut += 10
  106. lipbalm -= 1
  107. lipkoef += rand(5, 15)
  108. if lipkoef > 50:
  109. lipkoef = 0
  110. lip += 1
  111. end
  112. lipbalmstat += 8
  113. 'You smeared lip moisturizing balm.'
  114. act 'View results':dynamic $portmirror
  115. end
  116. end
  117. act 'Move away from the mirror':
  118. cla
  119. if $gt2 = '':
  120. if $gt1 = 'stwork':dynamic $striptoilet
  121. if $gt1 = 'kafedinamic':dynamic $kafetualet
  122. if $gt1 = 'vokzalGin':
  123. if vokzalToilet = 1:dynamic $din_vokzalg_toilet_f
  124. if vokzalToilet = 2:dynamic $din_vokzalg_toilet_m
  125. end
  126. if $gt1 ! 'stwork' and $gt1 ! 'kafedinamic' and $gt1 ! 'vokzalGin':gt '<<$gt1>>'
  127. else
  128. gt '<<$gt1>>', '<<$gt2>>'
  129. end
  130. end
  131. }
  132. --- portmirror ---------------------------------