Advertisement
Guest User

Untitled

a guest
Apr 26th, 2017
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.39 KB | None | 0 0
  1.  
  2. (defrule
  3.  
  4. (goal TSA on)
  5. (goal cycle yes)
  6. (goal TSA-timer off)
  7. =>
  8. (enable-timer TSA-loop 30)
  9. (chat-local-to-self "TSA looped")
  10. (set-goal TSA-timer on)
  11. )
  12.  
  13. (defrule
  14. (timer-triggered TSA-loop)
  15. (goal TSA on)
  16. =>
  17. (disable-timer TSA-loop)
  18. (set-goal cycle no)
  19. (set-goal TSA-timer off)
  20. (chat-local-to-self "TSA looping")
  21. )
  22.  
  23.  
  24. (defrule
  25. (goal TSA on)
  26. (goal enemybuildings no)
  27. (strategic-number sn-maximum-town-size == 29)
  28. =>
  29. (set-strategic-number sn-maximum-town-size 34)
  30. (chat-local-to-self "TSA 34up")
  31. (set-goal cycle yes)
  32. )
  33.  
  34. (defrule
  35. (goal TSA on)
  36. (goal enemybuildings no)
  37. (strategic-number sn-maximum-town-size == 24)
  38. =>
  39. (set-strategic-number sn-maximum-town-size 29)
  40. (chat-local-to-self "TSA 29up")
  41. (set-goal cycle yes)
  42. )
  43.  
  44. ;*******************Decrease******************
  45.  
  46. (defrule
  47. (goal TSA on)
  48. (goal enemybuildings yes)
  49. (goal cycle no)
  50. (strategic-number sn-maximum-town-size == 29)
  51. =>
  52. (set-strategic-number sn-maximum-town-size 24)
  53. (chat-local-to-self "TSA 24")
  54. )
  55.  
  56.  
  57. (defrule
  58. (goal TSA on)
  59. (goal enemybuildings yes)
  60. (goal cycle no)
  61. (strategic-number sn-maximum-town-size == 34)
  62. =>
  63. (set-strategic-number sn-maximum-town-size 29)
  64. (chat-local-to-self "TSA 29")
  65. )
  66.  
  67. (defrule
  68. (goal TSA on)
  69. (goal enemybuildings yes)
  70. (goal cycle no)
  71. (strategic-number sn-maximum-town-size == 39)
  72. =>
  73. (set-strategic-number sn-maximum-town-size 34)
  74. (chat-local-to-self "TSA 24")
  75. )
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement