471_automatics 3.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158
  1. # automatics
  2. $automatica = {
  3. gs 'stat'
  4. clr
  5. if AutoHapri = 0:$AutoHapri = 'OFF'
  6. if AutoHapri = 1:$AutoHapri = 'ON'
  7. if AutoMakeup = 0:$AutoMakeup = 'OFF'
  8. if AutoMakeup = 1:$AutoMakeup = 'ON'
  9. if AutoMakeupSleep = 0:$AutoMakeupSleep = 'Wash after waking then apply makeup'
  10. if AutoMakeupSleep = 1:$AutoMakeupSleep = 'Always apply makeup'
  11. if AutoLipBalm = 0:$AutoLipBalm = 'OFF'
  12. if AutoLipBalm = 1:$AutoLipBalm = 'ON'
  13. if AutoEnema = 0:$AutoEnema = 'OFF'
  14. if AutoEnema = 1:$AutoEnema = 'ON'
  15. if AutoTissue = 0:$AutoTissue = 'OFF'
  16. if AutoTissue = 1:$AutoTissue = 'ON'
  17. if AutoMakeupType = 2:$AutoMakeupType = 'Light'
  18. if AutoMakeupType = 3:$AutoMakeupType = 'Natural'
  19. if AutoMakeupType = 4:$AutoMakeupType = 'Heavy'
  20. if AutoVibrator=0:$AutoVibrator='OFF'
  21. if AutoVibrator=1:$AutoVibrator='ON'
  22. if AutoButtPlug=0:$AutoButtPlug='OFF'
  23. if AutoButtPlug=1:$AutoButtPlug='ON'
  24. if AutoVitamins=0:$AutoVitamins='OFF'
  25. if AutoVitamins=1:$AutoVitamins='ON'
  26. pl 'Automatic hair brushing <a href="exec:dynamic $auto_hapri"><<$AutoHapri>></a>'
  27. pl 'Automatic makeup <a href="exec:dynamic $auto_makeup_select"><<$AutoMakeupType>></a> <a href="exec:dynamic $auto_makeup"><<$AutoMakeup>></a>'
  28. pl '<a href="exec:dynamic $auto_makeupsleep"><<$AutoMakeupSleep>></a>'
  29. pl 'Automatic lip moisturizing <a href="exec:dynamic $auto_lipbalm"><<$AutoLipBalm>></a>'
  30. pl 'Automatic enema after waking <a href="exec:dynamic $auto_enema"><<$AutoEnema>></a>'
  31. !pl 'Automatic tissue use <a href="exec:dynamic $auto_tissue"><<$AutoTissue>></a>'
  32. }
  33. $auto_hapri = {
  34. if AutoHapri = 0:
  35. AutoHapri = 1
  36. gs 'stat'
  37. dynamic $automatica
  38. exit
  39. end
  40. if AutoHapri = 1:
  41. AutoHapri = 0
  42. gs 'stat'
  43. dynamic $automatica
  44. end
  45. }
  46. $auto_makeup = {
  47. if AutoMakeup = 0:
  48. AutoMakeup = 1
  49. gs 'stat'
  50. dynamic $automatica
  51. exit
  52. end
  53. if AutoMakeup = 1:
  54. AutoMakeup = 0
  55. gs 'stat'
  56. dynamic $automatica
  57. end
  58. }
  59. $auto_makeup_select = {
  60. AutoMakeupType += 1
  61. if AutoMakeupType > 4: AutoMakeupType = 2
  62. dynamic $automatica
  63. }
  64. $auto_makeupsleep = {
  65. if AutoMakeupSleep = 0:
  66. AutoMakeupSleep = 1
  67. gs 'stat'
  68. dynamic $automatica
  69. exit
  70. end
  71. if AutoMakeupSleep = 1:
  72. AutoMakeupSleep = 0
  73. gs 'stat'
  74. dynamic $automatica
  75. end
  76. }
  77. $auto_lipbalm = {
  78. if AutoLipBalm = 0:
  79. AutoLipBalm = 1
  80. gs 'stat'
  81. dynamic $automatica
  82. exit
  83. end
  84. if AutoLipBalm = 1:
  85. AutoLipBalm = 0
  86. gs 'stat'
  87. dynamic $automatica
  88. end
  89. }
  90. $auto_enema = {
  91. if AutoEnema = 0:
  92. AutoEnema = 1
  93. gs 'stat'
  94. dynamic $automatica
  95. exit
  96. end
  97. if AutoEnema = 1:
  98. AutoEnema = 0
  99. gs 'stat'
  100. dynamic $automatica
  101. end
  102. }
  103. $auto_tissue = {
  104. if AutoTissue = 0:
  105. AutoTissue = 1
  106. gs 'stat'
  107. dynamic $automatica
  108. exit
  109. end
  110. if AutoTissue = 1:
  111. AutoTissue = 0
  112. gs 'stat'
  113. dynamic $automatica
  114. end
  115. }
  116. $auto_vibrator={
  117. if AutoVibrator=0:
  118. AutoVibrator=1
  119. gs'stat'
  120. dynamic $automatica
  121. exit
  122. end
  123. if AutoVibrator=1:
  124. AutoVibrator=0
  125. gs'stat'
  126. dynamic $automatica
  127. end
  128. }
  129. $auto_buttplug={
  130. if AutoButtPlug=0:
  131. AutoButtPlug=1
  132. gs'stat'
  133. dynamic $automatica
  134. exit
  135. end
  136. if AutoButtPlug=1:
  137. AutoButtPlug=0
  138. gs'stat'
  139. dynamic $automatica
  140. end
  141. }
  142. $auto_vitamins={
  143. if AutoVitamins=0:
  144. AutoVitamins=1
  145. gs'stat'
  146. dynamic $automatica
  147. exit
  148. end
  149. if AutoVitamins=1:
  150. AutoVitamins=0
  151. gs'stat'
  152. dynamic $automatica
  153. end
  154. }
  155. --- automatics ---------------------------------