gor_mirror 1.6 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889
  1. # gor_mirror
  2. if $ARGS[0] = 'start':
  3. cla
  4. clr
  5. '<center><img src="<<FUNC(''$face_image'')>>"></center>'
  6. '<<$hair>> <<$mop>> <<$skin>> <<$vnesh>>'
  7. if kosmetica > 0:'Cosmetics <<kosmetica>>'
  8. if kosmetica = 0:'You have no makeup.'
  9. if hapri = 0:
  10. act 'coiffured':
  11. cla
  12. minut += 3
  13. hapri = 1
  14. act 'View results':gt 'gor_mirror', 'start'
  15. end
  16. end
  17. if mop = 1 and kosmetica > 0:
  18. act 'Apply makeup':
  19. cla
  20. *clr
  21. '<center><img src="images/etogame/mop.jpg"></center>'
  22. act 'Light make-up':
  23. cla
  24. minut += 3
  25. kosmetica -= 1
  26. mop = 2
  27. 'You legonechko summed eyes and lips a little tint.'
  28. act 'View results':gt 'gor_mirror', 'start'
  29. end
  30. if kosmetica >= 2:
  31. act 'normal makeup':
  32. cla
  33. minut += 5
  34. kosmetica -= 2
  35. mop = 3
  36. 'You lipstick, summed up his eyes and eyelids.'
  37. act 'View results':gt 'gor_mirror', 'start'
  38. end
  39. end
  40. if kosmetica >= 3:
  41. act 'calling makeup':
  42. cla
  43. minut += 10
  44. kosmetica -= 3
  45. vidageday -= 1
  46. mop = 4
  47. 'You heavily nakrasili eyes, eyelids and mascara, lip contour nakrasili pencil and lipstick.'
  48. act 'View results':gt 'gor_mirror', 'start'
  49. end
  50. end
  51. end
  52. end
  53. if lipbalm > 0 and lipbalmstat <= 0:
  54. act 'Smear lip balm moisturizing':
  55. cla
  56. minut += 10
  57. lipbalm -= 1
  58. lipbalmstat += 8
  59. lipkoef += rand(5, 15)
  60. if lipkoef > 50:
  61. lipkoef = 0
  62. lip += 1
  63. end
  64. 'You smeared lip moisturizing balm.'
  65. act 'View results':gt 'gor_mirror', 'start'
  66. end
  67. end
  68. act 'Move away from the mirror':
  69. cla
  70. gt 'dom_gor'
  71. end
  72. end
  73. --- gor_mirror ---------------------------------