boyfrend 2.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117
  1. # boyfrend
  2. if $ARGS[0] = 'start':
  3. if arrsize('pcs_lovers') > 2:
  4. 'Hmm, you are already three boyfriend, why do you need a fourth?'
  5. else
  6. gs 'boyfrend', 'add'
  7. end
  8. end
  9. if $ARGS[0] = 'add':
  10. i = arrsize('pcs_lovers')
  11. $lover[i] = $boy
  12. $loverdesc[i] = $boydesc
  13. loverbodyrand[i] = boybodyrand
  14. $loverbody[i] = $boybody
  15. loverbodrand[i] = boybodrand
  16. $loverbod[i] = $boybod
  17. loverfacerand[i] = boyfacerand
  18. $loverface[i] = $boyface
  19. loverdick[i] = dick
  20. $loverdick_girth[i] = $dick_girth
  21. loversilaVag[i] = silaVag
  22. loverfinance[i] = finance
  23. vneshlover[i] = vneshBoy
  24. $loverClo[i] = $boyClo
  25. figurlover[i] = figurBoy
  26. titlover[i] = titBoy
  27. hairlover[i] = hairBoy
  28. haraklover[i] = harakBoy
  29. loverday[i] = daystart
  30. loverrelation[i] = 3
  31. loverdays[i] = 0
  32. boyonce[i] = 0
  33. loverizvrat[i] = izvrat
  34. giftDay[i] = 0
  35. giftNum[i] = 0
  36. loverlove[i] = 0
  37. loverscompliance[i] = 0
  38. boypic[i] = picrand
  39. meethour[i] = 0
  40. svidanie[i] = 0
  41. meetday[i] = 0
  42. !!new preferences
  43. clotTypePref[i] = clotTypePref
  44. clotQualPref[i] = clotQualPref
  45. clotTopPref[i] = clotTopPref
  46. bottShorPref[i] = bottShorPref
  47. clotThinPref[i] = clotThinPref
  48. bimbPref[i] = bimbPref
  49. pierPref[i] = pierPref
  50. tattPref[i] = tattPref
  51. lipsPref[i] = lipsPref
  52. bodyPref[i] = bodyPref
  53. makePref[i] = makePref
  54. IQPref[i] = IQPref
  55. pcs_lovers[i] = 1
  56. pcs_lover +=1
  57. end
  58. if $ARGS[0] = 'remove':
  59. killvar '$lover', ARGS[1]
  60. killvar '$loverdesc', ARGS[1]
  61. killvar 'loverbodyrand', ARGS[1]
  62. killvar '$loverbody', ARGS[1]
  63. killvar 'loverbodrand', ARGS[1]
  64. killvar '$loverbod', ARGS[1]
  65. killvar 'loverfacerand', ARGS[1]
  66. killvar '$loverface', ARGS[1]
  67. killvar 'loverdick', ARGS[1]
  68. killvar '$loverdick_girth', ARGS[1]
  69. killvar 'loversilaVag', ARGS[1]
  70. killvar 'loverfinance', ARGS[1]
  71. killvar 'vneshlover', ARGS[1]
  72. killvar '$loverClo', ARGS[1]
  73. killvar 'figurlover', ARGS[1]
  74. killvar 'titlover', ARGS[1]
  75. killvar 'hairlover', ARGS[1]
  76. killvar 'haraklover', ARGS[1]
  77. killvar 'loverday', ARGS[1]
  78. killvar 'loverrelation', ARGS[1]
  79. killvar 'loverdays', ARGS[1]
  80. killvar 'boyonce', ARGS[1]
  81. killvar 'loverizvrat', ARGS[1]
  82. killvar 'giftDay', ARGS[1]
  83. killvar 'giftNum', ARGS[1]
  84. killvar 'loverlove', ARGS[1]
  85. killvar 'loverscompliance', ARGS[1]
  86. killvar 'boypic', ARGS[1]
  87. killvar 'meethour', ARGS[1]
  88. killvar 'svidanie', ARGS[1]
  89. killvar 'meetday', ARGS[1]
  90. !!new preferences
  91. killvar 'clotTypePref', ARGS[1]
  92. killvar 'clotQualPref', ARGS[1]
  93. killvar 'clotTopPref', ARGS[1]
  94. killvar 'bottShorPref', ARGS[1]
  95. killvar 'clotThinPref', ARGS[1]
  96. killvar 'bimbPref', ARGS[1]
  97. killvar 'pierPref', ARGS[1]
  98. killvar 'tattPref', ARGS[1]
  99. killvar 'lipsPref', ARGS[1]
  100. killvar 'bodyPref', ARGS[1]
  101. killvar 'makePref', ARGS[1]
  102. killvar 'IQPref', ARGS[1]
  103. killvar 'pcs_lovers', ARGS[1]
  104. pcs_lover -=1
  105. end
  106. --- boyfrend ---------------------------------