NormPR 2.7 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485
  1. # NormPR
  2. if $ARGS[0] = '1':
  3. $metka = $ARGS[0]
  4. $loc = $CURLOC
  5. *clr
  6. cla
  7. set prosti = 0
  8. set minut += 15
  9. set sex += 1
  10. set protect = 1
  11. clr
  12. gs 'stat'
  13. set sexprostRand = rand(0, 1)
  14. if sexprostRand = 0:
  15. '<center><img src="images/img/prost/sexcar.jpg"></center>'
  16. 'You obediently lay naked in the back seat until your dick hole logged.'
  17. gs 'orgazm', 'start'
  18. end
  19. if sexprostRand = 1:
  20. '<center><img src="images/img/img/prost/sexcar2.jpg"></center>'
  21. 'Standing on all fours, you felt like you were planting confident movement on the penis.'
  22. gs 'orgazm', 'start'
  23. end
  24. act 'Leave.':gt $locSex, $metkaSex
  25. end
  26. if $ARGS[0] = '2':
  27. $metka = $ARGS[0]
  28. $loc = $CURLOC
  29. *clr
  30. cla
  31. set prosti = 0
  32. set minut += 15
  33. set sex += 1
  34. clr
  35. gs 'stat'
  36. set prostRand = rand(0, 100)
  37. if prostRand > 0 and prostRand <= 50:
  38. set picpRand = rand(1, 7)
  39. set pose = 1
  40. 'Becoming cancer, you feel hot prick seeking to get into the vagina.'
  41. gs 'orgazm', 'start'
  42. end
  43. if prostRand > 50 and prostRand <= 75:
  44. set picpRand = rand(8, 10)
  45. set pose = 1
  46. 'Standing on all fours, you felt like a hole braced member.'
  47. gs 'orgazm', 'start'
  48. end
  49. if prostRand > 75 and prostRand <= 100:
  50. set pose = 0
  51. set picpRand = rand(11, 17)
  52. 'You were ordered to undress and lie down on the hood of the car.'
  53. gs 'orgazm', 'start'
  54. end
  55. if picpRand = 1:'<center><img src="images/img/prost/sexcar3.jpg"></center>'
  56. if picpRand = 2:'<center><img src="images/img/prost/sexcar4.jpg"></center>'
  57. if picpRand = 3:'<center><img src="images/img/prost/sexcar5.jpg"></center>'
  58. if picpRand = 4:'<center><img src="images/img/prost/sexcar6.jpg"></center>'
  59. if picpRand = 5:'<center><img src="images/img/prost/sexcar7.jpg"></center>'
  60. if picpRand = 6:'<center><img src="images/img/prost/sexcar8.jpg"></center>'
  61. if picpRand = 7:'<center><img src="images/img/prost/sexcar9.jpg"></center>'
  62. if picpRand = 8:'<center><img src="images/img/prost/sexcar10.jpg"></center>'
  63. if picpRand = 9:'<center><img src="images/img/prost/sexcar11.jpg"></center>'
  64. if picpRand = 10:'<center><img src="images/img/prost/sexcar12.jpg"></center>'
  65. if picpRand = 11:'<center><img src="images/img/prost/sexcar13.jpg"></center>'
  66. if picpRand = 12:'<center><img src="images/img/prost/sexcar14.jpg"></center>'
  67. if picpRand = 13:'<center><img src="images/img/prost/sexcar15.jpg"></center>'
  68. if picpRand = 14:'<center><img src="images/img/prost/sexcar16.jpg"></center>'
  69. if picpRand = 15:'<center><img src="images/img/prost/sexcar17.jpg"></center>'
  70. if picpRand = 16:'<center><img src="images/img/prost/sexcar18.jpg"></center>'
  71. if picpRand = 17:'<center><img src="images/img/prost/sexcar19.jpg"></center>'
  72. act 'Leave.':gt $locSex, $metkaSex
  73. end
  74. --- NormPR ---------------------------------