Advertisement
Guest User

Untitled

a guest
Oct 20th, 2019
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 13.41 KB | None | 0 0
  1. pause 1
  2. put #goto 42
  3. waitforre The hustle of crowds making their way between
  4.  
  5.  
  6.  
  7. CRO.CLIMB:
  8. if $Climbing.LearningRate >= 30 then goto QUIT
  9. counter add 1
  10.  
  11. MIND.CHECK:
  12. matchre MIND.MURK Overall state of mind: (very|dense|thick|stagnant|frozen)
  13. match CLIMB.EXP EXP HELP
  14. put exp
  15. matchwait
  16.  
  17. MIND.MURK:
  18. ECHO
  19. ECHO *** MIND MURKED UP - PAUSING! ***
  20. ECHO
  21. put sleep
  22. put hide
  23. pause 45
  24. goto MIND.CHECK
  25.  
  26.  
  27.  
  28. CLIMB.EXP:
  29. put exp
  30. waitfor EXP HELP
  31. if $Climbing.LearningRate > 30 then goto QUIT
  32. else
  33. goto CLIMB
  34.  
  35. CLIMB:
  36. startclimb:
  37. #This Script created by the player of Kraelyst
  38. #Climb Crossing Walls
  39. #debuglevel 5
  40. ECHO
  41. ECHO *** STARTING CLIMBING SESSION #%c ***
  42. ECHO
  43. pause 2
  44.  
  45. put set roomname
  46. put awake
  47. wait
  48. pause
  49.  
  50. CLIMBGO:
  51. pause
  52. move NORTHWEST
  53. move NORTH
  54. move NORTH
  55. move NORTH
  56. move NORTH
  57. move NORTH
  58. move NORTH
  59. move EAST
  60. move EAST
  61. move NORTH
  62. move EAST
  63. move EAST
  64. move NORTH
  65. move NORTH
  66. move EAST
  67. move go stair
  68. move SOUTH
  69.  
  70. CLIMB-001:
  71. if ($stamina < 70) then gosub FATIGUE_WAIT
  72. matchre CLIMB-001 /\.\.\.wait|type ahead/i
  73. match PASS-001 [Outside East Wall, Footpath]
  74. matchre FAIL-001 This climb is|You finish practicing|You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  75. match FALLEN slip after a few feet
  76. put app break quick
  77. pause 2
  78. pause
  79. put climb break
  80. matchwait
  81.  
  82. PASS-001:
  83. pause
  84. move NORTH
  85. move go gate
  86. move WEST
  87. move go stair
  88. move SOUTH
  89. goto CLIMB-002
  90.  
  91. FAIL-001:
  92. pause
  93. goto CLIMB-002
  94.  
  95. CLIMB-002:
  96. if ($stamina < 70) then gosub FATIGUE_WAIT
  97. matchre CLIMB-002 /\.\.\.wait|type ahead/i
  98. match PASS-002 [Northeast Wilds, Outside Northeast Gate]
  99. matchre FAIL-002 This climb is|You finish practicing|You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  100. match FALLEN slip after a few feet
  101. put climb embrasure
  102. matchwait
  103.  
  104. FAIL-002:
  105. pause
  106. move n
  107. move go stair
  108. move e
  109. move go gate
  110. PASS-002:
  111. move go footpath
  112. goto CLIMB-01
  113.  
  114. CLIMB-01:
  115. if ($stamina < 70) then gosub FATIGUE_WAIT
  116. SAVE FAIL-01
  117. matchre CLIMB-01 /\.\.\.wait|type ahead/i
  118. match PASS-01 [Crossing,
  119. matchre FAIL-01 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  120. match FALLEN slip after a few feet
  121. put climb wall
  122. matchwait
  123.  
  124. PASS-01:
  125. pause
  126. move n
  127. move go stair
  128. move e
  129. move go gate
  130. move go footpath
  131. goto FAIL-01
  132.  
  133. FAIL-01:
  134. pause 0.5
  135. move s
  136. move down
  137. move s
  138. move s
  139. move sw
  140. goto CLIMB-02
  141.  
  142. CLIMB-02:
  143. if ($stamina < 70) then gosub FATIGUE_WAIT
  144. SAVE FAIL-02
  145. matchre RETREAT You are engraged|You cannot
  146. matchre CLIMB-02 /\.\.\.wait|type ahead/i
  147. match PASS-02 [Crossing,
  148. matchre FAIL-02 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  149. match FALLEN slip after a few feet
  150. put climb wall
  151. matchwait
  152.  
  153. PASS-02:
  154. pause
  155. move s
  156. move go stair
  157. move go gate
  158. move go bush
  159. move n
  160. goto CLIMB-03
  161.  
  162. FAIL-02:
  163. pause
  164. move s
  165. goto CLIMB-03
  166.  
  167. CLIMB-03:
  168. pause 0.5
  169. if ($stamina < 70) then gosub FATIGUE_WAIT
  170. SAVE FAIL-03
  171. matchre RETREAT You are engraged|You cannot
  172. matchre CLIMB-03 /\.\.\.wait|type ahead/i
  173. match PASS-03 [Crossing,
  174. matchre FAIL-03 You continue|This climb is|You finish practicing|You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  175. match FALLEN slip after a few feet
  176. put climb practice wall
  177. matchwait
  178.  
  179. PASS-03:
  180. pause 0.5
  181. move s
  182. move go stair
  183. move go gate
  184. goto CLIMB-04
  185.  
  186. FAIL-03:
  187. pause 0.5
  188. put stop climb
  189. wait
  190. move s
  191. goto CLIMB-04
  192.  
  193. CLIMB-04:
  194. pause .5
  195. if ($stamina < 70) then gosub FATIGUE_WAIT
  196. SAVE FAIL-04
  197. matchre RETREAT You are engraged|You cannot
  198. matchre CLIMB-04 /\.\.\.wait|type ahead/i
  199. match PASS-04 [Crossing, East Gate Battlements]
  200. match PASS-041 [Crossing, East Wall Battlements]
  201. matchre FAIL-04 You finish|You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  202. match FALLEN slip after a few feet
  203. put climb wall
  204. matchwait
  205.  
  206. PASS-041:
  207. pause
  208. move s
  209. goto CLIMB-05
  210.  
  211. PASS-04:
  212. pause
  213. goto CLIMB-05
  214.  
  215. FAIL-04:
  216. put ret
  217. wait
  218. put ret
  219. move go gate
  220. move go stair
  221. goto CLIMB-05
  222.  
  223. CLIMB-05:
  224. if ($stamina < 70) then gosub FATIGUE_WAIT
  225. SAVE FAIL-05
  226. matchre RETREAT You are engraged|You cannot
  227. matchre CLIMB-05 /\.\.\.wait|type ahead/i
  228. match PASS-05 [Eastern Tier, Outside Gate]
  229. matchre FAIL-05 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  230. match FALLEN slip after a few feet
  231. put climb embrasure
  232. matchwait
  233.  
  234. PASS-05:
  235. pause 0.5
  236. put ret
  237. wait
  238. put ret
  239. move go gate
  240. move go stair
  241. FAIL-05:
  242. pause 0.5
  243. move n
  244. goto CLIMB-06
  245.  
  246. CLIMB-06:
  247. if ($stamina < 70) then gosub FATIGUE_WAIT
  248. SAVE FAIL-06
  249. matchre RETREAT You are engraged|You cannot
  250. matchre CLIMB-06 /\.\.\.wait|type ahead/i
  251. match PASS-06 [Outside East Wall, Footpath]
  252. matchre FAIL-06 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  253. match FALLEN slip after a few feet
  254. put climb break
  255. matchwait
  256.  
  257. PASS-06:
  258. pause 0.5
  259. move s
  260. move go gate
  261. move go stair
  262. move n
  263. goto CLIMB-07
  264.  
  265. FAIL-06:
  266. pause
  267. goto CLIMB-07
  268.  
  269. CLIMB-07:
  270. if ($stamina < 70) then gosub FATIGUE_WAIT
  271. SAVE FAIL-07
  272. matchre RETREAT You are engraged|You cannot
  273. matchre CLIMB-07 /\.\.\.wait|type ahead/i
  274. match PASS-07 [Outside East Wall, Footpath]
  275. matchre FAIL-07 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  276. match FALLEN slip after a few feet
  277. put climb embrasure
  278. matchwait
  279.  
  280. PASS-07:
  281. pause 0.5
  282. move s
  283. move s
  284. move go gate
  285. goto TRAVEL-08
  286.  
  287. FAIL-07:
  288. pause 0.5
  289. move s
  290. move go stair
  291. goto TRAVEL-08
  292.  
  293. TRAVEL-08:
  294. pause 0.5
  295. move w
  296. move w
  297. move w
  298. move w
  299. pause
  300.  
  301. move nw
  302. move n
  303. move n
  304. move n
  305. move n
  306. move n
  307. move n
  308. move w
  309. move w
  310. move w
  311. move w
  312. move go bridge
  313. move w
  314. move w
  315. move w
  316. move w
  317. move go stair
  318. move s
  319.  
  320. CLIMB-08:
  321. if ($stamina < 70) then gosub FATIGUE_WAIT
  322. SAVE FAIL-08
  323. matchre RETREAT You are engraged|You cannot
  324. matchre CLIMB-08 /\.\.\.wait|type ahead/i
  325. match PASS-08 [Mycthengelde, Flatlands]
  326. matchre FAIL-08 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  327. match FALLEN slip after a few feet
  328. put climb embrasure
  329. matchwait
  330.  
  331. PASS-08:
  332. pause
  333. goto CLIMB-09
  334.  
  335. FAIL-08:
  336. pause
  337. move n
  338. move go stair
  339. move go gate
  340. move nw
  341. goto CLIMB-09
  342.  
  343. CLIMB-09:
  344. if ($stamina < 70) then gosub FATIGUE_WAIT
  345. SAVE FAIL-09
  346. matchre RETREAT You are engraged|You cannot
  347. matchre CLIMB-09 /\.\.\.wait|type ahead/i
  348. match PASS-09 [Crossing, West Wall Battlements]
  349. matchre FAIL-09 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  350. match FALLEN slip after a few feet
  351. put climb wall
  352. matchwait
  353.  
  354. PASS-09:
  355. pause
  356. move n
  357. goto CLIMB-10
  358.  
  359. FAIL-09:
  360. pause
  361. move se
  362. move go gate
  363. move go stair
  364. goto CLIMB-10
  365.  
  366. CLIMB-10:
  367. if ($stamina < 70) then gosub FATIGUE_WAIT
  368. SAVE FAIL-10
  369. matchre RETREAT You are engraged|You cannot
  370. matchre CLIMB-10 /\.\.\.wait|type ahead/i
  371. match PASS-10 [Mycthengelde, Flatlands]
  372. matchre FAIL-10 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  373. match FALLEN slip after a few feet
  374. put climb embrasure
  375. matchwait
  376.  
  377. PASS-10:
  378. pause
  379. move go gate
  380. move go stair
  381. FAIL-10:
  382. move e
  383. goto CLIMB-11
  384.  
  385. CLIMB-11:
  386. if ($stamina < 70) then gosub FATIGUE_WAIT
  387. SAVE FAIL-11
  388. matchre RETREAT You are engraged|You cannot
  389. matchre CLIMB-11 /\.\.\.wait|type ahead/i
  390. match PASS-11 [Northwall Trail, Wooded Grove]
  391. matchre FAIL-11 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  392. match FALLEN slip after a few feet
  393. put climb break
  394. matchwait
  395.  
  396. PASS-11:
  397. pause
  398. move s
  399. move go gate
  400. move go stair
  401. move e
  402. goto CLIMB-12
  403.  
  404. FAIL-11:
  405. pause
  406. goto CLIMB-12
  407.  
  408. CLIMB-12:
  409. if ($stamina < 70) then gosub FATIGUE_WAIT
  410. SAVE FAIL-12
  411. matchre RETREAT You are engraged|You cannot
  412. matchre CLIMB-12 /\.\.\.wait|type ahead/i
  413. match PASS-12 [Northwall Trail, Wooded Grove]
  414. matchre FAIL-12 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  415. match FALLEN slip after a few feet
  416. put climb embrasure
  417. matchwait
  418.  
  419. PASS-12:
  420. pause
  421. goto CLIMB-13
  422.  
  423. FAIL-12:
  424. pause
  425. move w
  426. move go stair
  427. move go gate
  428. move go trail
  429. move ne
  430. goto CLIMB-13
  431.  
  432. CLIMB-13:
  433. if ($stamina < 70) then gosub FATIGUE_WAIT
  434. SAVE FAIL-13
  435. matchre RETREAT You are engraged|You cannot
  436. matchre CLIMB-13 /\.\.\.wait|type ahead/i
  437. match PASS-13 [Crossing, North Wall Battlements]
  438. matchre FAIL-13 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  439. match FALLEN slip after a few feet
  440. put climb wall
  441. matchwait
  442.  
  443. PASS-13:
  444. pause
  445. move w
  446. move go stair
  447. move go gate
  448. move go trail
  449. goto CLIMB-14
  450.  
  451. FAIL-13:
  452. pause
  453. move sw
  454. goto CLIMB-14
  455.  
  456. CLIMB-14:
  457. if ($stamina < 70) then gosub FATIGUE_WAIT
  458. SAVE FAIL-14
  459. matchre RETREAT You are engraged|You cannot
  460. matchre CLIMB-14 /\.\.\.wait|type ahead/i
  461. match PASS-14 [Crossing, North Wall Battlements]
  462. matchre FAIL-14 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  463. match FALLEN slip after a few feet
  464. put climb wall
  465. matchwait
  466.  
  467. PASS-14:
  468. pause
  469. move w
  470. move go stair
  471. move go gate
  472. goto CLIMB-15
  473.  
  474. FAIL-14:
  475. pause
  476. move s
  477. goto CLIMB-15
  478.  
  479. CLIMB-15:
  480. if ($stamina < 70) then gosub FATIGUE_WAIT
  481. SAVE FAIL-15
  482. matchre RETREAT You are engraged|You cannot
  483. matchre CLIMB-15 /\.\.\.wait|type ahead/i
  484. match PASS-15 [Crossing, West Gate Battlements]
  485. matchre FAIL-15 You must be standing|steepness is intimidating|can't seem to find purchase|find it hard going|your footing is questionable|A wave of dizziness hits you|Struck by vertigo
  486. match FALLEN slip after a few feet
  487. put climb wall
  488. matchwait
  489.  
  490. PASS-15:
  491. move go stair
  492. goto TRAVEL-15
  493.  
  494. FAIL-15:
  495. move go gate
  496. goto TRAVEL-15
  497.  
  498. TRAVEL-15:
  499. pause 0.5
  500. move e
  501. move e
  502. move e
  503. move e
  504. move e
  505. move e
  506. move e
  507. move e
  508. move e
  509. move s
  510. move s
  511. move s
  512. move s
  513. move s
  514. move s
  515. move se
  516. goto CLIMB.EXP
  517.  
  518.  
  519. FATIGUE_WAIT:
  520. echo
  521. echo *** PAUSING TO RESTORE FATIGUE... ***
  522. echo
  523. if ($stamina = 100) then return
  524. pause 5
  525. goto FATIGUE_WAIT
  526.  
  527. #======================
  528.  
  529.  
  530. FALLEN:
  531. pause
  532. matchre STOOD You stand|You are already standing
  533. matchre FALLEN cannot manage to stand|The weight of all your possessions
  534. matchre FALLEN ^\.\.\.wait|^Sorry, you may only type
  535. put stand
  536. matchwait
  537.  
  538. STOOD:
  539. goto %s
  540.  
  541. QUIT:
  542. pause 1
  543. put #parse DONE CLIMBING
  544. pause .5
  545. put #parse CLIMBING LOCKED
  546. put glance
  547. exit
  548.  
  549. RETREAT:
  550. put ret
  551. put ret
  552. pause
  553. goto %S
  554.  
  555. RETURN:
  556. pause 0.1
  557. RETURN
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement