API tools faq
paste
Advertisement
LoveAbleElf

pirates game

LoveAbleElf
Aug 19th, 2019
468
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 18.64 KB | None | 0 0
raw download clone embed print report
  1. [Addon]
  2. Script=Pirates-GamePad
  3. Version=1.3
  4. Author=DR DevTeam
  5. Desc=!Pirates Game Pad
  6. For=DragonRyder v13.5
  7. Date=May 29th 2019
  8. ;NOTE: !UNO mod done with permission
  9. ;[Mon. Apr. 23 2007 2:41pm] <Ryu> you mind if i mod it to make it so it will do cd
  10. ;[Mon. Apr. 23 2007 2:41pm] <lurk3r> np, do what yer like lol
  11. ;
  12. ;My son introduced me to QuietSilence, whom took my modified !UNO to !Pirates
  13. ;and fixed it and turned it into a very AWESOME dialog GamePad for !Pirates
  14. ;Hope you don't mind me bragging on your scripting skills QuietSilence
  15.  
  16. menu channel {
  17. !Pirates GamePad: {
  18. set %pirates.chan $iif(%pirates.chan != $chan,$iif($$input(Change !Pirates channel to $chan $+ ?,y,Pirates Channel is %pirates.chan),$chan,%pirates.chan),$chan)
  19. if (%pirates.chan == $chan) { dialog $iif(!$dialog(DRDT-PiratesAddon),-mdo,-ev) DRDT-PiratesAddon DRDT-PiratesAddon }
  20. }
  21. }
  22.  
  23. dialog DRDT-PiratesAddon {
  24. title "!Pirates Game Pad v1.0"
  25. size 300 300 290 156
  26. option dbu
  27. tab "Player", 1000, 3 2 284 152
  28. button "Bored", 18, 180 38 32 10, tab 1000
  29. button "Awake", 44, 113 112 32 10, tab 1000
  30. button "Bot", 40, 252 38 32 10, tab 1000
  31. button "Brig", 219, 146 58 32 10, tab 1000
  32. button "Weapon", 220, 219 28 32 10, tab 1000
  33. button "Dig", 19, 76 38 32 10, tab 1000
  34. button "Fish", 25, 76 28 32 10, tab 1000
  35. button "Crabbin", 26, 76 48 32 10, tab 1000
  36. button "Work", 27, 76 68 32 10, tab 1000
  37. button "Steal", 221, 182 112 32 10, tab 1000
  38. button "Love", 28, 4 122 32 10, tab 1000
  39. button "Hate", 29, 4 132 32 10, tab 1000
  40. button "Legends", 30, 146 48 32 10, tab 1000
  41. button "Scour", 31, 41 112 32 10, tab 1000
  42. button "Maps", 32, 180 28 32 10, tab 1000
  43. button "Mutiny", 315, 4 142 32 10, tab 1000
  44. button "Party", 316, 146 112 32 10, tab 1000
  45. button "Rusty", 402, 180 48 32 10, tab 1000
  46. button "Search", 41, 41 122 32 10, tab 1000
  47. button "Daily", 13, 113 38 32 10, tab 1000
  48. button "Goals", 14, 113 48 32 10, tab 1000
  49. button "Heal", 314, 252 48 32 10, tab 1000
  50. button "Lockpick", 211, 182 122 32 10, tab 1000
  51. button "Snatch", 16, 182 132 32 10, tab 1000
  52. button "Dive", 17, 76 58 32 10, tab 1000
  53. button "Top", 401, 113 28 32 10, tab 1000
  54. button "Brandy", 312, 219 58 32 10, tab 1000
  55. button "Mercy", 313, 113 122 32 10, tab 1000
  56. button "Stamina", 212, 219 38 32 10, tab 1000
  57. button "Ship status", 42, 219 112 32 10, tab 1000
  58. button "Troll", 213, 76 132 32 10, tab 1000
  59. button "Tasks", 1, 146 28 32 10, tab 1000
  60. button "Carry", 2, 4 58 32 10, tab 1000
  61. button "About", 11, 180 58 32 10, tab 1000
  62. button "Achievement", 12, 113 78 65 10, tab 1000
  63. button "Rest", 21, 146 122 32 10, tab 1000
  64. button "Capn Favor", 22, 252 132 32 10, tab 1000
  65. button "Capn Stats", 24, 252 112 32 10, tab 1000
  66. button "Rig", 8, 4 48 32 10, tab 1000
  67. button "Steer", 9, 41 48 32 10, tab 1000
  68. button "Repair", 7, 41 38 32 10, tab 1000
  69. button "Fix", 5, 41 58 32 10, tab 1000
  70. button "Lookout", 6, 4 38 32 10, tab 1000
  71. button "Cook", 4, 41 28 32 10, tab 1000
  72. button "Age", 10, 113 58 32 10, tab 1000
  73. button "Clean", 3, 4 28 32 10, tab 1000
  74. button "Swab", 15, 4 68 32 10, tab 1000
  75. button "Info", 214, 146 38 32 10, tab 1000
  76. button "Power", 215, 219 48 32 10, tab 1000
  77. button "Level", 216, 252 28 32 10, tab 1000
  78. button "Request", 39, 4 112 32 10, tab 1000
  79. button "Insult", 217, 76 122 32 10, tab 1000
  80. button "DaveyJones", 218, 76 112 32 10, tab 1000
  81. text "Players", 500, 76 100 32 10, tab 1000 center
  82. text "Miscellaneous", 501, 113 100 65 10, tab 1000 center
  83. text "Lvl 1-5", 502, 4 18 32 10, tab 1000 center
  84. text "Lvl 6-9", 503, 41 18 32 10, tab 1000 center
  85. text "Lvl 10+", 504, 76 18 32 10, tab 1000 center
  86. text "Info", 505, 113 18 99 10, tab 1000 center
  87. text "Fight", 506, 219 18 65 10, tab 1000 center
  88. text "Theft", 507, 182 100 32 10, tab 1000 center
  89. text "Captain", 508, 4 100 32 10, tab 1000 center
  90. text "Quick Captain Commands", 509, 219 100 65 10, tab 1000 center
  91. text "Find", 510, 41 100 32 10, tab 1000 center
  92. button "Train", 317, 76 78 32 10, tab 1000
  93. button "Cap Cmd", 318, 219 122 32 10, tab 1000
  94. button "Aye", 52, 146 132 32 10, tab 1000
  95. button "Stash", 53, 113 132 32 10, tab 1000
  96. button "Chest", 46, 113 142 32 10, tab 1000
  97. button "Use", 61, 146 142 32 10, tab 1000
  98. button "Relations", 33, 146 68 32 10, tab 1000
  99. button "www", 34, 179 78 32 10, tab 1000
  100. button "Rum", 561, 252 58 32 10, tab 1000
  101. button "Wench", 254, 252 68 32 10, tab 1000
  102. tab "Buy and Sell", 1001
  103. button "BlackPowder", 551, 68 28 40 10, tab 1001
  104. button "Bribe", 552, 4 68 32 10, tab 1001
  105. button "Sell Gun", 250, 4 38 32 10, tab 1001
  106. button "Sell Sword", 251, 4 48 32 10, tab 1001
  107. button "Buy Sword", 252, 36 48 32 10, tab 1001
  108. button "Buy Gun", 253, 36 38 32 10, tab 1001
  109. button "Spouse", 553, 36 78 32 10, tab 1001
  110. button "Sharpen", 554, 36 28 32 10, tab 1001
  111. button "Youth", 155, 4 78 32 10, tab 1001
  112. button "Parlay", 48, 36 68 32 10, tab 1001
  113. button "Rum", 556, 4 28 32 10, tab 1001
  114. button "Nickname", 50, 68 78 40 10, tab 1001
  115. button "Chest", 45, 114 18 32 20, tab 1001
  116. button "Rename Gun", 37, 68 58 40 10, tab 1001
  117. button "Repair Gun", 558, 68 38 40 10, tab 1001
  118. button "Repair Sword", 559, 68 48 40 10, tab 1001
  119. button "Rename Sword", 38, 68 68 40 10, tab 1001
  120. button "Custom", 60, 36 58 32 10, tab 1001
  121. button "Male", 63, 8 106 32 10, tab 1001
  122. button "Female", 64, 40 106 32 10, tab 1001
  123. button "Undisclosed", 65, 72 106 32 10, tab 1001
  124. button "Native", 66, 40 142 32 10, tab 1001
  125. button "English", 67, 8 132 32 10, tab 1001
  126. button "Jesuit", 68, 72 142 32 10, tab 1001
  127. button "Spanish", 71, 72 132 32 10, tab 1001
  128. button "French", 69, 40 132 32 10, tab 1001
  129. button "Dutch", 70, 8 142 32 10, tab 1001
  130. text "Buy Faction", 511, 4 122 104 10, tab 1001 center
  131. text "Buy Gender", 512, 4 96 104 10, tab 1001 center
  132. text "Fruit", 514, 114 90 66 10, tab 1001 center
  133. text "Chest Locks", 516, 216 18 32 10, tab 1001 center
  134. text "Chest Traps", 517, 250 92 32 10, tab 1001 center
  135. text "Chests", 518, 182 92 32 10, tab 1001 center
  136. text "Goods", 519, 216 92 32 10, tab 1001 center
  137. text "Herbs", 520, 182 18 32 10, tab 1001 center
  138. text "Poisons", 521, 148 18 32 10, tab 1001 center
  139. text "Ship Store", 523, 4 18 104 10, tab 1001 center
  140. button "Bomb", 85, 250 142 32 10, tab 1001
  141. button "Spike", 86, 250 132 32 10, tab 1001
  142. button "Poison", 87, 250 122 32 10, tab 1001
  143. button "Acid", 88, 250 112 32 10, tab 1001
  144. button "Curse", 89, 250 102 32 10, tab 1001
  145. button "large", 83, 182 112 32 10, tab 1001
  146. button "Medium", 84, 182 102 32 10, tab 1001
  147. button "Guava", 90, 114 122 32 10, tab 1001
  148. button "Gooseberries", 91, 114 132 34 10, tab 1001
  149. button "Genips", 92, 114 112 32 10, tab 1001
  150. button "Chayote", 93, 114 102 32 10, tab 1001
  151. button "Ugli", 94, 150 132 30 10, tab 1001
  152. button "Orange", 95, 148 122 32 10, tab 1001
  153. button "Noni", 96, 148 112 32 10, tab 1001
  154. button "Star", 97, 148 142 32 10, tab 1001
  155. button "Soursop", 98, 114 142 32 10, tab 1001
  156. button "Mameyl", 99, 148 102 32 10, tab 1001
  157. button "Luxuries", 150, 216 142 32 10, tab 1001
  158. button "Materials", 146, 216 132 32 10, tab 1001
  159. button "Sugar", 147, 216 122 32 10, tab 1001
  160. button "Spice", 148, 216 112 32 10, tab 1001
  161. button "Food", 149, 216 102 32 10, tab 1001
  162. button "Anzid", 80, 148 28 32 10, tab 1001
  163. button "Green", 47, 182 28 32 10, tab 1001
  164. button "Sell", 56, 114 38 32 20, tab 1001
  165. button "Sell All", 57, 114 58 32 20, tab 1001
  166. button "Steel", 154, 216 58 32 10, tab 1001
  167. button "Brass", 151, 216 48 32 10, tab 1001
  168. button "Copper", 152, 216 38 32 10, tab 1001
  169. button "Iron", 153, 216 28 32 10, tab 1001
  170. button "Disease", 35, 114 78 66 10, tab 1001
  171. button "Water", 72, 250 28 30 10, tab 1001
  172. button "Rum", 73, 250 38 30 10, tab 1001
  173. button "Mead", 74, 250 48 30 10, tab 1001
  174. button "Wine", 75, 250 58 30 10, tab 1001
  175. button "Whiskey", 76, 250 68 30 10, tab 1001
  176. button "Brandy", 77, 250 78 30 10, tab 1001
  177. text "Tavern", 78, 250 18 30 10, tab 1001 center
  178. button "LockPick", 55, 216 74 32 10, tab 1001
  179. button "Lottery", 319, 4 58 32 10, tab 1001
  180. tab "Captain", 1002
  181. button "Capn Rep", 23, 252 18 32 10, tab 1002
  182. tab "Sail to", 1003
  183. button "Antigua", 100, 4 30 56 10, tab 1003
  184. button "Barbados", 101, 4 40 56 10, tab 1003
  185. button "Bermuda", 102, 4 50 56 10, tab 1003
  186. button "Campeche", 103, 4 60 56 10, tab 1003
  187. button "Caracas", 104, 4 70 56 10, tab 1003
  188. button "Cartagena", 105, 4 80 56 10, tab 1003
  189. button "Coro", 106, 4 90 56 10, tab 1003
  190. button "Cumana", 145, 4 120 56 10, tab 1003
  191. button "Curacao", 107, 4 100 56 10, tab 1003
  192. button "Eluthera", 108, 4 110 56 10, tab 1003
  193. button "Florida_Keys", 109, 60 30 56 10, tab 1003
  194. button "Gibraltar", 110, 60 40 56 10, tab 1003
  195. button "Gran_Grenada", 111, 60 50 56 10, tab 1003
  196. button "Grand_Bahama", 112, 60 60 56 10, tab 1003
  197. button "Guadeloupe", 113, 60 70 56 10, tab 1003
  198. button "Havana", 114, 60 80 56 10, tab 1003
  199. button "Leogane", 115, 60 90 56 10, tab 1003
  200. button "Maracaibo", 116, 60 100 56 10, tab 1003
  201. button "Margarita", 117, 60 110 56 10, tab 1003
  202. button "Martinique", 118, 116 30 56 10, tab 1003
  203. button "Montserrat", 119, 116 40 56 10, tab 1003
  204. button "Nassau", 120, 116 50 56 10, tab 1003
  205. button "Nevis", 121, 116 60 56 10, tab 1003
  206. button "Nombre_de_Dios", 122, 116 70 56 10, tab 1003
  207. button "Panama", 123, 116 80 56 10, tab 1003
  208. button "Petit_Goave", 124, 116 90 56 10, tab 1003
  209. button "Port-de-Paix", 125, 116 100 56 10, tab 1003
  210. button "Puerto_Bello", 126, 116 110 56 10, tab 1003
  211. button "Puerto_Cabello", 127, 172 30 56 10, tab 1003
  212. button "Puerto_Principe", 128, 172 40 56 10, tab 1003
  213. button "Rio_de_la_Hacha", 129, 172 50 56 10, tab 1003
  214. button "San_Juan", 130, 172 60 56 10, tab 1003
  215. button "Santa_Catalina", 131, 172 70 56 10, tab 1003
  216. button "Santa_Marta", 132, 172 80 56 10, tab 1003
  217. button "Santiago", 133, 172 90 56 10, tab 1003
  218. button "Santiago_de_La_Vega", 134, 172 100 56 10, tab 1003
  219. button "Santo_Domingo", 135, 172 110 56 10, tab 1003
  220. button "Sint_Maarten", 136, 228 30 56 10, tab 1003
  221. button "St. Augustine", 137, 228 40 56 10, tab 1003
  222. button "St. Eustatius", 138, 228 50 56 10, tab 1003
  223. button "St. Kitts", 139, 228 60 56 10, tab 1003
  224. button "St. Martin", 140, 228 70 56 10, tab 1003
  225. button "Tortuga", 141, 228 80 56 10, tab 1003
  226. button "Trinidad", 142, 228 90 56 10, tab 1003
  227. button "Vera_Cruz", 143, 228 100 56 10, tab 1003
  228. button "Villa_Hermosa", 144, 228 110 56 10, tab 1003
  229. text "Sail to Location", 522, 4 18 280 10, tab 1003 center
  230. tab "Miscellaneous", 1004
  231. text "Requests", 437, 6 18 101 8, tab 1004 center
  232. text "Ports", 454, 110 18 67 8, tab 1004 center
  233. button "Crew Bonus", 420, 6 28 32 10, tab 1004
  234. button "Find", 421, 6 40 32 10, tab 1004
  235. button "Mass Find", 422, 6 52 32 10, tab 1004
  236. button "Monster", 423, 6 64 32 10, tab 1004
  237. button "Party", 424, 6 76 32 10, tab 1004
  238. button "Quest", 425, 6 88 32 10, tab 1004
  239. button "Rest", 426, 40 28 32 10, tab 1004
  240. button "Share", 427, 40 40 32 10, tab 1004
  241. button "Rumor", 428, 40 52 32 10, tab 1004
  242. button "Bonus", 429, 40 64 32 10, tab 1004
  243. button "Map", 430, 40 76 32 10, tab 1004
  244. button "Parlay", 431, 40 88 32 10, tab 1004
  245. button "Punish", 432, 74 28 32 10, tab 1004
  246. button "Rum", 433, 74 40 32 10, tab 1004
  247. button "Voucher", 434, 74 52 32 10, tab 1004
  248. button "Sail", 435, 74 64 32 10, tab 1004
  249. button "Doubloons", 438, 6 112 32 10, tab 1004
  250. button "Ornamental", 439, 6 124 32 10, tab 1004
  251. button "Power", 440, 6 136 32 10, tab 1004
  252. button "Random", 441, 42 112 32 10, tab 1004
  253. button "Stamina", 442, 42 124 32 10, tab 1004
  254. button "Voucher", 443, 42 136 32 10, tab 1004
  255. text "Rewards", 444, 6 100 69 8, tab 1004 center
  256. button "Port", 445, 110 28 32 10, tab 1004
  257. button "Faction", 446, 110 40 32 10, tab 1004
  258. button "Closest", 447, 110 52 32 10, tab 1004
  259. button "Claimed", 448, 110 64 32 10, tab 1004
  260. button "Status", 449, 144 28 32 10, tab 1004
  261. button "Today", 450, 144 40 32 10, tab 1004
  262. button "Unclaimed", 451, 144 52 32 10, tab 1004
  263. button "Winner", 452, 144 64 32 10, tab 1004
  264. button "Rep", 453, 110 76 32 10, tab 1004
  265. button "Charisma", 455, 178 34 32 10, tab 1004
  266. button "Defense", 456, 212 34 32 10, tab 1004
  267. button "Fishing", 457, 246 34 32 10, tab 1004
  268. button "Luck", 458, 178 46 32 10, tab 1004
  269. button "Meditation", 459, 212 46 32 10, tab 1004
  270. button "Marksmanship", 460, 178 58 44 10, tab 1004
  271. button "Thievery", 461, 246 46 32 10, tab 1004
  272. button "Swordsmanship", 462, 234 58 44 10, tab 1004
  273. text "Quit", 463, 178 110 101 8, tab 1004 center
  274. text "Forget", 464, 178 68 101 8, tab 1004 center
  275. text "Start", 465, 178 26 103 8, tab 1004 center
  276. text "Skills", 466, 178 18 103 8, tab 1004 center
  277. button "Charisma", 467, 178 76 32 10, tab 1004
  278. button "Defense", 468, 212 76 32 10, tab 1004
  279. button "Fishing", 469, 246 76 32 10, tab 1004
  280. button "Luck", 470, 178 88 32 10, tab 1004
  281. button "Meditation", 471, 212 88 32 10, tab 1004
  282. button "Marksmanship", 472, 178 100 44 10, tab 1004
  283. button "Thievery", 473, 246 88 32 10, tab 1004
  284. button "Swordsmanship", 474, 234 100 44 10, tab 1004
  285. button "Charisma", 475, 178 118 32 10, tab 1004
  286. button "Defense", 476, 212 118 32 10, tab 1004
  287. button "Fishing", 477, 246 118 32 10, tab 1004
  288. button "Luck", 478, 178 130 32 10, tab 1004
  289. button "Meditation", 479, 212 130 32 10, tab 1004
  290. button "Marksmanship", 480, 178 142 44 10, tab 1004
  291. button "Thievery", 481, 246 130 32 10, tab 1004
  292. button "Swordsmanship", 482, 234 142 44 10, tab 1004
  293. button "Button", 54, 348 18 37 12
  294. button "butTon", 36, 348 48 37 12
  295. button "Button", 43, 346 36 37 12
  296. button "Button", 51, 352 76 37 12
  297. button "Button", 58, 356 90 37 12
  298. button "Button", 59, 346 106 37 12
  299. button "Button", 62, 356 120 37 12
  300. button "button", 436, 354 138 32 10
  301. }
  302.  
  303. on *:dialog:DRDT-PiratesAddon:init:*:{
  304. var %pirates.play
  305. dialog -t $dname $dialog($dname).title Now playing in %pirates.chan
  306. }
  307. on *:dialog:DRDT-PiratesAddon:sclick:1-47,55-57,61,63-77,80,83-154,211-221,250-253,311-320,401-402,411-413,420-482,550-561: {
  308.  
  309. if ($did isnum 1-46) {
  310. %pirates.len = $len($did($did))
  311. %pirates.play = P $left($did($did),%pirates.len)
  312. }
  313. elseif ($did isnum 47) {
  314. %pirates.len = $len($did($did))
  315. %pirates.play = P Market Buy Herb $left($did($did),%pirates.len)
  316. }
  317.  
  318. elseif ($did isnum 55) {
  319. %pirates.play = P Market Buy Lockpick
  320. }
  321.  
  322. elseif ($did isnum 56) {
  323. %pirates.play = P Market Sell $?="enter Item Number:"
  324. }
  325. if ($did isnum 57) {
  326. %pirates.len = $len($did($did))
  327. %pirates.play = P Market Sell All Ornamental Aye
  328. }
  329. elseif ($did isnum 61) {
  330. %pirates.play = P Use $?="enter Item Number:"
  331. }
  332. elseif ($did isnum 63-65) {
  333. %pirates.len = $len($did($did))
  334. %pirates.play = P store buy gender $left($did($did),%pirates.len)
  335. }
  336.  
  337. elseif ($did isnum 66-71) {
  338. %pirates.len = $len($did($did))
  339. %pirates.play = P Store Buy Faction $left($did($did),%pirates.len)
  340. }
  341. elseif ($did isnum 72-77) {
  342. %pirates.len = $len($did($did))
  343. %pirates.play = p Tavern $left($did($did),%pirates.len)
  344. }
  345.  
  346. if ($did isnum 80) {
  347. %pirates.len = $len($did($did))
  348. %pirates.play = P Market Buy Poison $left($did($did),%pirates.len)
  349. }
  350. elseif ($did isnum 83-84) {
  351. %pirates.len = $len($did($did))
  352. %pirates.play = p Market buy Chests $left($did($did),%pirates.len)
  353. }
  354. elseif ($did isnum 85-89) {
  355. %pirates.len = $len($did($did))
  356. %pirates.play = p Market buy Chest Traps $left($did($did),%pirates.len)
  357. }
  358. elseif ($did isnum 90-99) {
  359. %pirates.len = $len($did($did))
  360. %pirates.play = p Market buy Fruit $left($did($did),%pirates.len)
  361. }
  362. elseif ($did isnum 100-145) {
  363. %pirates.len = $len($did($did))
  364. %pirates.play = p sail $left($did($did),%pirates.len)
  365. }
  366. if ($did isnum 146-150) {
  367. %pirates.len = $len($did($did))
  368. %pirates.play = p Market Buy Goods $left($did($did),%pirates.len)
  369. }
  370.  
  371. if ($did isnum 151-154) {
  372. %pirates.len = $len($did($did))
  373. %pirates.play = p Market Buy Chest Lock $left($did($did),%pirates.len)
  374. }
  375. elseif ($did isnum 211-221) {
  376. %pirates.play = p lockpick|p stamina|p troll|p Info|p Power|p Level|p Insult|P DaveyJones|p brig|p weapon|p rob
  377. %pirates.name = $?="enter pirate name $crlf or blank for your self:"
  378. %pirates.did = $did - 210
  379. %pirates.play = $gettok(%pirates.play,%pirates.did,124)
  380. %pirates.play = %pirates.play %pirates.name
  381. }
  382. if ($did isnum 250-253) {
  383. %pirates.len = $len($did($did))
  384. %pirates.play = p store $left($did($did),%pirates.len) Aye
  385. }
  386.  
  387. elseif ($did isnum 312-320) {
  388. %pirates.play = p tavern rum|p mercy aye|p heal aye|p mutiny aye|p party aye|p skill train|p Capn Cmd|P Store Buy Lottery Auto 10|p Wench Aye
  389. %pirates.did = $did - 311
  390. %pirates.play = $gettok(%pirates.play,%pirates.did,124)
  391. }
  392. elseif ($did isnum 401-402) {
  393. %pirates.play = P top|P rusty
  394. %pirates.var = $?="blank for top 5 $crlf 2 for top 6-10 $crlf 3 for top 11-15 ect.:"
  395. %pirates.did = $did - 400
  396. %pirates.play = $gettok(%pirates.play,%pirates.did,124)
  397. %pirates.play = %pirates.play %pirates.var
  398. }
  399. if ($did isnum 420-428) {
  400. %pirates.len = $len($did($did))
  401. %pirates.play = P Request $left($did($did),%pirates.len)
  402. }
  403. if ($did isnum 428-434) {
  404. %pirates.len = $len($did($did))
  405. %pirates.play = P Request $left($did($did),%pirates.len) $?="enter pirate name $crlf or blank for your self:"
  406. }
  407. if ($did isnum 435) {
  408. %pirates.len = $len($did($did))
  409. %pirates.play = P Request sail $left($did($did),%pirates.len) $?="Enter city name or cell:"
  410. }
  411. if ($did isnum 438-443) {
  412. %pirates.len = $len($did($did))
  413. %pirates.play = P Rewards $left($did($did),%pirates.len) Aye
  414. }
  415. if ($did isnum 445-453) {
  416. %pirates.len = $len($did($did))
  417. %pirates.play = P Port $left($did($did),%pirates.len)
  418. }
  419. if ($did isnum 455-462) {
  420. %pirates.len = $len($did($did))
  421. %pirates.play = P Skill Start $left($did($did),%pirates.len)
  422. }
  423. if ($did isnum 467-474) {
  424. %pirates.len = $len($did($did))
  425. %pirates.play = P Skill Forget $left($did($did),%pirates.len) $?="Are you sure you want to Forget this Skill $crlf If so Enter skill name If not Cancel :"
  426. }
  427. if ($did isnum 475-482) {
  428. %pirates.len = $len($did($did))
  429. %pirates.play = P Skill Quit $left($did($did),%pirates.len)
  430. }
  431.  
  432. elseif ($did isnum 550-561) {
  433. %pirates.len = $len($did($did))
  434. %pirates.play = p store buy $left($did($did),%pirates.len) Aye
  435. }
  436.  
  437. msg %pirates.chan %pirates.play
  438. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!