loadg 1.5 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576
  1. # loadg
  2. ! WD: Set variable to store Image needed HTML code
  3. if $ImageNeededPlacholder = '':
  4. set $ImageNeededPlacholder = '<center><img src="images/community/Image_needed.png"></center>'
  5. end
  6. gs 'din_pav'
  7. gs 'dinSex2'
  8. gs 'dina'
  9. gs 'din2'
  10. gs 'din_van'
  11. gs 'din_bad'
  12. gs 'Cheatmenu_din'
  13. gs 'obj_din'
  14. gs 'BanSexType'
  15. if vshrink = 0 and vshrinkdays = 0 and ashrink = 0 and ashrinkdays = 0:vshrink = 1 & vshrinkdays = 6 & ashrink = 1 & ashrinkdays = 3
  16. if bankAccount = 0 and karta > 0:
  17. bankAccount = 1
  18. if bankDebtLimit = 0: bankDebtLimit = 5000
  19. end
  20. if $cycreport_txt = '':
  21. temp[1] = daystart-daylastperiod
  22. $cycreport_txt = 'It has been <<temp[1]>> days since you last had a period.'
  23. end
  24. if menoage = 0:
  25. menoage = rand(40,50)
  26. temprand = rand(0,10)
  27. if temprand = 0:
  28. menoage += rand(0,5)
  29. elseif temprand < 4:
  30. menoage += rand(3,10)
  31. elseif temprand < 9:
  32. menoage += rand(5,12)
  33. else
  34. menoage += rand(7,13)
  35. end
  36. end
  37. monthsEnd[0] = 31
  38. monthsEnd[1] = 31
  39. monthsEnd[2] = 28
  40. monthsEnd[3] = 31
  41. monthsEnd[4] = 30
  42. monthsEnd[5] = 31
  43. monthsEnd[6] = 30
  44. monthsEnd[7] = 31
  45. monthsEnd[8] = 31
  46. monthsEnd[9] = 30
  47. monthsEnd[10] = 31
  48. monthsEnd[11] = 30
  49. monthsEnd[12] = 31
  50. monthsEnd[13] = 31
  51. !MJ: Months names.
  52. $monthName[1] = 'January'
  53. $monthName[2] = 'February'
  54. $monthName[3] = 'March'
  55. $monthName[4] = 'April'
  56. $monthName[5] = 'May'
  57. $monthName[6] = 'June'
  58. $monthName[7] = 'July'
  59. $monthName[8] = 'August'
  60. $monthName[9] = 'September'
  61. $monthName[10] = 'October'
  62. $monthName[11] = 'November'
  63. $monthName[12] = 'December'
  64. $month = $monthName[month]
  65. --- loadg ---------------------------------