API tools faq
paste
0veride

Untitled

0veride
Jan 4th, 2019
95
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 66.62 KB | None | 0 0
raw download clone embed print report
  1. pause 1
  2. if ("$charactername" = "Ghimly") then put #script abort all except cross
  3. pause 1
  4. send .afk1
  5. pause 1
  6. if ("$charactername" = "Ghimly") then send .teachfa
  7. pause 1
  8. if ("$charactername" = "Ghimly") then send .afk3
  9. pause 1
  10. if ("$charactername" = "Ghimly") then put #script abort afk1
  11.  
  12. START:
  13. pause 1
  14. send exp
  15. pause 1
  16. gosub clear
  17. pause 1
  18. send #goto 355
  19. pause 6
  20. send stop play
  21. pause 1
  22. send stow my mort
  23. pause 1
  24. send stow my pestle
  25. pause 1
  26. send get flower from my mort
  27. pause 1
  28. send put my flower in bin
  29. pause 1
  30. send rel spell
  31. pause 1
  32. send stand
  33. pause 1
  34. send put my grass in bin
  35. pause 1
  36. send put my grass in bin
  37. pause 1
  38. if ("$charactername" = "Ghimly") then send rem my badge
  39. pause 1
  40. if ("$charactername" = "Ghimly") then send pray my badge
  41. pause
  42. if ("$charactername" = "Ghimly") then send wear my badge
  43. pause 1
  44. send touch vess
  45. pause 1
  46. send listen to ghim
  47. pause 1
  48. send Hunt
  49. pause 1
  50. if ($Appraisal.LearningRate < 30) then {
  51. send app my stick
  52. pause
  53. }
  54. pause 1
  55. if ($Appraisal.LearningRate < 30) then {
  56. send app my bund
  57. pause
  58. }
  59.  
  60. pause 1
  61. if ($Appraisal.LearningRate < 30) then {
  62. send app my pouch
  63. pause
  64. }
  65. pause 1
  66. send pow
  67. pause 1
  68. goto empcheck
  69.  
  70. EMPCHECK:
  71.  
  72. pause 1
  73. if ("$guild" = "Empath") && ($Empathy.LearningRate < 20) then goto Empathy
  74.  
  75. pause 1
  76. if ("$guild" = "Moon Mage") && ($Astrology.LearningRate < 15) then goto ASTRO
  77.  
  78. pause 1
  79. if ("$guild" = "Warrior Mage") && ($Summoning.LearningRate < 15) then goto sum
  80.  
  81. pause 1
  82. goto start2
  83.  
  84. START2:
  85. pause 1
  86. if ($Athletics.LearningRate < 20) then {
  87. gosub Climb
  88. }
  89.  
  90. pause 1
  91. if ($Outdoorsmanship.LearningRate < 20) then {
  92. gosub collect
  93. }
  94.  
  95. pause 1
  96. if ($Performance.LearningRate < 20) then {
  97. gosub play
  98. }
  99.  
  100. pause 1
  101. if ($Mechanical_Lore.LearningRate < 20) then {
  102. gosub BBRAID
  103. }
  104.  
  105. pause 1
  106. if ($Alchemy.LearningRate < 20) then {
  107. gosub Crush
  108. }
  109.  
  110. pause 1
  111. if ("$guild" = "Thief") then gosub Thief
  112.  
  113. pause 1
  114. if ($Utility.LearningRate < 10) then {
  115. gosub research_Utility
  116. }
  117.  
  118. pause 1
  119. if ($Primary_Magic.LearningRate < 10) then {
  120. gosub research_MAGIC
  121. }
  122.  
  123. pause 1
  124. if ($Augmentation.LearningRate < 10) then {
  125. gosub research_augmentation
  126. }
  127.  
  128. pause 1
  129. if ($Attunement.LearningRate < 10) then {
  130. gosub research_Attunement
  131. }
  132.  
  133. pause 1
  134. if ($Warding.LearningRate < 10) then {
  135. gosub research_warding
  136. }
  137.  
  138. pause 1
  139. goto start
  140.  
  141. research_warding:
  142. pause
  143. put prep gauge flow 15
  144. pause 25
  145. send cast
  146. pause 5
  147.  
  148. RESEARCHward:
  149. put research ward 60
  150. match researchward there is still more to learn
  151. match DONE Breakthrough!
  152. matchwait
  153.  
  154. research_Attunement:
  155. pause
  156. put prep gauge flow 15
  157. pause 25
  158. send cast
  159. pause 5
  160.  
  161. RESEARCHATT:
  162. put research stream 60
  163. match researchATT there is still more to learn
  164. match DONE Breakthrough!
  165. matchwait
  166.  
  167. research_augmentation:
  168. pause
  169. put prep gauge flow 15
  170. pause 25
  171. send cast
  172. pause 5
  173.  
  174. RESEARCHAug:
  175. put research aug 60
  176. match researchaug there is still more to learn
  177. match DONE Breakthrough!
  178. matchwait
  179.  
  180. research_MAGIC:
  181. pause
  182. put prep gauge flow 15
  183. pause 25
  184. send cast
  185. pause 5
  186.  
  187. RESEARCHM:
  188. put research fund 60
  189. match researchM there is still more to learn
  190. match DONE Breakthrough!
  191. matchwait
  192.  
  193.  
  194. RESEARCH_UTILITY:
  195. pause
  196. put prep gauge flow 15
  197. pause 25
  198. send cast
  199. pause 5
  200.  
  201. RESEARCHU:
  202. put research Utility 60
  203. match researchU there is still more to learn
  204. match DONE Breakthrough!
  205. matchwait
  206.  
  207. COLLECT:
  208. pause 1
  209. send stand
  210. pause 1
  211. send kick pile
  212. pause 1
  213. put collect rock
  214. pause 1
  215. goto CHECK_IF_DONE
  216.  
  217. CHECK_IF_DONE:
  218. put kick pile
  219. match COLLECT EXP HELP
  220. match DONE mind lock
  221. put exp outdoorsmanship
  222. matchwait
  223.  
  224. APP:
  225. pause
  226. send app my bun
  227. pause 4
  228. send app my gem po
  229. pause 4
  230. goto start
  231.  
  232. HUNT:
  233. pause
  234. send hunt
  235. pause
  236. goto start
  237.  
  238.  
  239. PLAY:
  240. pause
  241. send rem my zill
  242. pause
  243. send shake my zill
  244. pause
  245. send get my cloth
  246. pause
  247. send clean my zil with my cloth
  248. pause
  249. send clean my zil with my cloth
  250. pause
  251. send stow cloth
  252. pause
  253. send wear my zill
  254. pause
  255. echo checking ranks
  256. if ($Performance.Ranks > 200) then gosub PLAYB
  257. if ($Performance.Ranks < 200) then gosub PLAYA
  258. send exp
  259. pause
  260. echo it messed up- again
  261.  
  262. #match playb Performance:
  263. #match palyb Performance
  264. #match playa EXP HELP
  265. #send exp lore 200
  266.  
  267.  
  268. ## if "$zoneid" = "40" && $Athletics.Ranks >= %rossmansouth then gosub MOVE 213
  269. ## if "$zoneid" = "40" && $Athletics.Ranks < %rossmansouth then
  270. ## "40" && $Athletics.Ranks >=
  271. ## ("$charactername" = "Ghimly")
  272.  
  273. ##if ("$Performance.Ranks <= 200") then gosub PLAYA
  274.  
  275. ##if ("$Performance.Ranks >= 200") then gosub PLAYB
  276.  
  277. PLAYA:
  278. pause 1
  279. echo playa
  280. var topics scales|arpeggios|ditty|folk|ballad|waltz|lullaby|march|jig|lament|wedding|hymn|rumba|polka
  281. eval TopicCount count("%topics","|")
  282. var track 0
  283. eval NextTopic element("%topics", %track)
  284. goto play1
  285.  
  286. PLAYB:
  287. pause 1
  288. echo playb
  289. var topics polka|battle|reel|elegy|serenade|minuet|psalm|dirge|gavotte|tango|tarantella|bolero|nocturne|requiem|fantasia|rondo|aria|sonata|concerto
  290. eval TopicCount count("%topics","|")
  291. var track 0
  292. eval NextTopic element("%topics", %track)
  293. goto play1
  294.  
  295. play1:
  296. echo play1
  297. eval NexttTopic element("%topics", %track)
  298.  
  299. send cast
  300. pause 1
  301. send rel spell
  302. pause 1
  303. put play %NextTopic
  304. match perfect with only the slightest hint of difficulty
  305. match toeasy your skill in your craft showcased
  306. match toeasy on your copper zills
  307. matchwait
  308.  
  309. ##PCHECK:
  310. ##eval NextTopic element("%topics", %track)
  311. ##goto play1
  312.  
  313.  
  314. TOEASY:
  315. pause 0.1
  316. send stop play
  317. pause
  318. if %track = %TopicCount then goto done
  319. eval NextTopic element("%topics", %track)
  320. math track add 1
  321. goto play1
  322.  
  323. PERFECT:
  324. pause
  325. send gaze my sano cry
  326. pause
  327. send hunt
  328. pause 15
  329. send app my gem pouch
  330. pause 15
  331. send app my bundle
  332. pause 15
  333. send app my stick
  334. pause 15
  335. send app my gem pouch
  336. pause 15
  337. send app my bundle
  338. pause 15
  339. send app my stick
  340. pause 15
  341. pause 30
  342. send app my bun
  343. pause 10
  344. goto start
  345.  
  346. SUM:
  347. pause 1
  348. send break my stone scim
  349. pause 1
  350. match DONE 34/34
  351. match ADMIT EXP HELP
  352. send sk sum
  353. matchwait
  354.  
  355.  
  356. ADMIT:
  357. match SUM increasing your proximity
  358. match SUM you feel that you can still gather
  359. match DIS You so heavily embody the Elemental Plane
  360. match DIS Going any further
  361. send SUMMON ADMITTANCE
  362. matchwait
  363.  
  364. DIS:
  365. pause 1
  366. send summon weapon
  367. pause 1
  368. send break stone scim
  369. pause 1
  370. send summon weapon
  371. pause 1
  372. send break stone scim
  373. pause 1
  374. goto SUM
  375.  
  376. Empathy:
  377. pause 2
  378. send whisper ghimly DORFS
  379. match start2 Whisper what to who
  380. match empstart You whisper to Ghimly
  381. matchwait
  382.  
  383. empstart:
  384. pause 5
  385. send touch vess
  386. pause 5
  387. send touch vess
  388. pause 5
  389. send touch vess
  390. pause 5
  391. send touch vess
  392. pause 5
  393. send touch vess
  394. pause 5
  395. send touch Ghimly
  396. pause 1
  397. send take Ghimly vit
  398. pause 1
  399. send take Ghimly vit
  400. pause 1
  401. send take Ghimly vit
  402. pause 1
  403. send take Ghimly vit
  404. pause 1
  405. send touch vess
  406. pause 5
  407. send touch Ghimly
  408. pause 1
  409. send take Ghimly vit
  410. pause 1
  411. send take Ghimly vit
  412. pause 1
  413. send take Ghimly vit
  414. pause 1
  415. send take Ghimly vit
  416. pause 1
  417. send touch vess
  418. pause 5
  419. send touch Ghimly
  420. pause 1
  421. send take Ghimly vit
  422. pause 1
  423. send take Ghimly vit
  424. pause 1
  425. send take Ghimly vit
  426. pause 1
  427. send take Ghimly vit
  428. pause 1
  429. send touch vess
  430. pause 5
  431. send touch Ghimly
  432. pause 1
  433. send take Ghimly vit
  434. pause 1
  435. send take Ghimly vit
  436. pause 1
  437. send take Ghimly vit
  438. pause 1
  439. send take Ghimly vit
  440. pause 1
  441. send touch vess
  442. pause 5
  443. send touch Ghimly
  444. pause 1
  445. send take Ghimly vit
  446. pause 1
  447. send take Ghimly vit
  448. pause 1
  449. send take Ghimly vit
  450. pause 1
  451. send take Ghimly vit
  452. pause 1
  453. send touch vess
  454. pause 5
  455. send touch Ghimly
  456. pause 1
  457. send take Ghimly vit
  458. pause 1
  459. send take Ghimly vit
  460. pause 1
  461. send take Ghimly vit
  462. pause 1
  463. send take Ghimly vit
  464. pause 1
  465. send touch vess
  466. pause 5
  467. send touch Ghimly
  468. pause 1
  469. send take Ghimly vit
  470. pause 1
  471. send take Ghimly vit
  472. pause 1
  473. send take Ghimly vit
  474. pause 1
  475. send take Ghimly vit
  476. pause 1
  477. send touch vess
  478. pause 5
  479. goto empDONE
  480.  
  481.  
  482. empCHECK11:
  483. if ($Empathy.LearningRate < 33) then {
  484. gosub TAKE
  485. }
  486.  
  487. if ($Empathy.LearningRate > 33) then {
  488. gosub empDONE
  489. }
  490.  
  491. TAKE:
  492. pause 1
  493.  
  494. if ($health < 89) then {
  495. send touch Vess
  496. }
  497.  
  498. if ($health > 90) then {
  499. send take Ghimly vit
  500. }
  501.  
  502. goto empstart
  503.  
  504. empDONE:
  505. send touch vess
  506. pause 2
  507. send whisper Ghimly Locked
  508. pause 5
  509. send touch vess
  510. pause 5
  511. send touch vess
  512. pause 5
  513. send touch vess
  514. pause 5
  515. send touch vess
  516. pause 5
  517. send touch vess
  518. pause 5
  519. send touch vess
  520. pause 5
  521. goto start
  522.  
  523. ASTRO:
  524. pause
  525. gosub clear
  526. pause
  527. send prep cv 5
  528. pause 22
  529. send cast
  530. pause
  531. send prep pg 5
  532. pause 22
  533. send cast
  534. pause
  535. send hunt
  536. pause 2
  537. send perceive moons
  538. pause 2
  539. send predict weather
  540. pause 2
  541. send obs sky
  542. pause 2
  543. send obs sun in the sky
  544. pause 2
  545. send obs moon in the sky
  546. pause 2
  547. send OBSERVE Cobra
  548. pause 2
  549. send OBSERVE Raccoon
  550. pause 2
  551. send OBSERVE Ram
  552. pause 2
  553. send OBSERVE Heart
  554. pause 2
  555. send OBSERVE Raven
  556. pause 2
  557. send OBSERVE Wolf
  558. pause 2
  559. send OBSERVE Mongoose
  560. pause 2
  561. send OBSERVE Heron
  562. pause 2
  563. send OBSERVE Dove
  564. pause 2
  565. send OBSERVE Magpie
  566. pause 2
  567. send OBSERVE Toad
  568. pause 2
  569. send OBSERVE Albatross
  570. pause 2
  571. send OBSERVE Cat
  572. pause 2
  573. send OBSERVE Wolverine
  574. pause 2
  575. send OBSERVE Giant
  576. pause 2
  577. send OBSERVE Spider
  578. pause 2
  579. send predict anal
  580. pause 2
  581. send perceive mana
  582. pause 2
  583. send perc xibar
  584. pause 2
  585. send OBSERVE xibar
  586. pause 2
  587. send align lore app
  588. pause 2
  589. send predict future Gizban
  590. pause 2
  591. send predic ana
  592. pause 2
  593. send perc Katamba
  594. pause 2
  595. send OBSERVE katamba
  596. pause 2
  597. send align magic
  598. pause 2
  599. send predict future Gizban
  600. pause 2
  601. send predic ana
  602. pause 2
  603. send perc Yavash
  604. pause 2
  605. send OBSERVE yavash
  606. pause 2
  607. send align lore app
  608. pause 2
  609. send predict future Gizban
  610. pause 2
  611. send predic ana
  612. pause 2
  613. send perc
  614. pause 2
  615. send align Offense
  616. pause 2
  617. send predict future Gizban
  618. pause 2
  619. send predic ana
  620. pause 2
  621. send align Defense
  622. pause 2
  623. send predict future Gizban
  624. pause 2
  625. send predic ana
  626. pause 2
  627. send align Survival
  628. pause 2
  629. send predict future Gizban
  630. pause 2
  631. send predic ana
  632. pause 2
  633. send align magic astro
  634. pause 2
  635. send predict future Gizban
  636. pause 2
  637. send predic ana
  638. pause 2
  639. send pow
  640. pause 2
  641. goto start
  642.  
  643.  
  644. BBRAID:
  645. pause 1
  646. send rem my glove
  647. pause 1
  648. send stow my gloves
  649. pause 1
  650. var forage grass
  651. var trash log
  652. var loop 0
  653.  
  654. action goto EXIT when ^You survey the area and realize that any foraging efforts would be futile\.
  655.  
  656. if ("$righthand" != "Empty") then send stow right
  657. if ("$lefthand" != "Empty") then send stow left
  658. pause 0.1
  659. pause 0.2
  660.  
  661. LOOP:
  662. math loop add 1
  663. if (%loop > 20) then goto DONE
  664. if ($Mechanical_Lore.LearningRate) > 20 then goto DONE
  665. if contains("$roomobjs","(pile of coins|pile of coin|pile of rocks|pile of grass)") then GOSUB KICK.PILE
  666. if contains("$roomobjs","(pile of coins|pile of coin|pile of rocks|pile of grass)") then GOSUB KICK.PILE
  667. pause 0.1
  668. if ("$righthandnoun" = "%forage") && ("$lefthandnoun" = "%forage") then goto BRAID
  669. if ("$righthand" != "Empty") then send empty right
  670. if ("$lefthand" != "Empty") then send empty left
  671. if ("$zoneid" = "150" && "$roomid" != "45") then gosub automove 45
  672. put forage %forage
  673. pause 2
  674. pause
  675.  
  676. FORAGE:
  677. if ("$lefthand" = "braided vines") then put swap
  678. if ("$lefthand" = "braided grass") then put swap
  679. pause 0.2
  680. if ("$charactername" = "Shroom") && ("$zoneid" = "150") then goto FEEDBAG
  681. pause 0.001
  682. if ("%forage" = "grass") then
  683. {
  684. if contains("$roomobjs","some grass") then
  685. {
  686. put get grass
  687. pause 0.5
  688. goto BRAID
  689. }
  690. }
  691. if ("%forage" = "vine") then
  692. {
  693. if contains("$roomobjs","a vine") then
  694. {
  695. put get vine
  696. pause 0.5
  697. goto BRAID
  698. }
  699. }
  700. put forage %forage
  701. pause 2
  702. pause
  703. if ("$righthand" != "Empty") && ("$lefthand" != "Empty") then goto BRAID
  704. goto FORAGE
  705.  
  706. FEEDBAG:
  707. pause 0.2
  708. if ("$righthand" != "Empty") && ("$lefthand" != "Empty") then goto BRAID
  709. matchre FEEDBAG ^You get
  710. matchre EMPTYBAG ^What were|^I could not
  711. put get grass from my feedb
  712. matchwait
  713. HUM:
  714. send stop hum
  715. pause 0.2
  716. BRAID:
  717. pause 0.1
  718. if ("$lefthand" = "braided vines") then put swap
  719. if ("$lefthand" = "braided grass") then put swap
  720. if ($Mechanical_Lore.LearningRate) > 31 then goto DONE
  721. pause 0.3
  722. if ("$lefthand" = "Empty") then goto FORAGE
  723. matchre HUM ^But that would give away your hiding
  724. matchre FORAGE ^You need to have more material
  725. matchre DUMP ^You need both hands to do that|nothing more than wasted effort
  726. matchre PULL ^You fumble around trying|^You are certain that you have made a|is already as long
  727. matchre BRAID Roundtime|^\.\.\.wait|^Sorry
  728. send braid my %forage
  729. matchwait
  730.  
  731. PULL:
  732. pause .5
  733. put pull my braided %forage
  734. pause
  735.  
  736. DUMP:
  737. pause 0.2
  738. pause 0.1
  739. if matchre("$roomobjs", "trash receptacle") then var trash receptacle
  740. if matchre("$roomobjs", "a bucket of viscous gloop|a waste bucket|a bucket") then var trash bucket
  741. if matchre("$roomobjs", "a large stone turtle") then var trash turtle
  742. if matchre("$roomobjs", "a tree hollow") then var trash hollow
  743. if matchre("$roomobjs", "an oak crate") then var trash crate
  744. if matchre("$roomobjs", "a driftwood log") then var trash log
  745. if matchre("$roomobjs", "a disposal bin|a waste bin|firewood bin") then var trash bin
  746. if matchre("$roomobjs", "ivory urn") then var trash urn
  747. if matchre("$roomobjs", "a bottomless pit") then var trash pit
  748. if matchre("$roomname", "^\[Garden Rooftop, Medical Pavilion\]") then var trash gutter
  749. pause 0.3
  750. if matchre("$righthand","(grass|vine|rope)") then put put my $1 in %trash
  751. if matchre("$lefthand","(grass|vine|rope)") then put put my $1 in %trash
  752. pause 0.5
  753. pause 0.2
  754. if contains("$righthand","(grass|vine|rope)") then put drop my $righthand
  755. if contains("$lefthand","(grass|vine|rope)") then put drop my $lefthand
  756. pause 0.4
  757. pause 0.5
  758. if ("$righthand" != "Empty") then put stow right
  759. if ("$lefthand" != "Empty") then put stow left
  760. pause 0.2
  761. send dump junk
  762. pause .1
  763. goto LOOP
  764.  
  765. EMPTYBAG:
  766. echo **** FEEDBAG IS EMPTY! ATTEMPTING TO REFILL!!
  767. put put grass in my feed
  768. pause 0.5
  769. if ("$zoneid" = "150") && ("$roomid" != "44") then gosub automove 44
  770. # if ("$zoneid" = "150") && ("$roomid" = "85") then put go portal
  771. # pause
  772. # pause 0.5
  773. # if ("$zoneid" = "66") then gosub automove campfire
  774. FEEDBAG.COLLECT:
  775. pause 0.5
  776. put collect grass
  777. pause 2
  778. pause
  779. if !contains("$roomobjs","pile of grass") then goto FEEDBAG.COLLECT
  780. put get grass
  781. pause 0.5
  782. put put grass in my feedbag
  783. pause 0.3
  784. put get grass
  785. pause 0.5
  786. put put grass in my feedbag
  787. pause 0.3
  788. put get grass
  789. pause 0.5
  790. put put grass in my feedbag
  791. pause 0.3
  792. if !contains("$roomobjs","pile of grass") then goto FEEDBAG.COLLECT
  793. put get grass
  794. pause 0.5
  795. put put grass in my feedbag
  796. pause 0.1
  797. put get grass
  798. pause 0.5
  799. put put grass in my feedbag
  800. pause 0.3
  801. put get grass
  802. pause 0.5
  803. put put grass in my feedbag
  804. pause 0.3
  805. if !contains("$roomobjs","pile of grass") then goto FEEDBAG.COLLECT
  806. put get grass
  807. pause 0.5
  808. put put grass in my feedbag
  809. pause 0.3
  810. pause 0.3
  811. put get grass
  812. pause 0.5
  813. put put grass in my feedbag
  814. pause 0.3
  815. pause 0.3
  816. put get grass
  817. pause 0.5
  818. put put grass in my feedbag
  819. pause 0.3
  820. pause 0.3
  821. if !contains("$roomobjs","pile of grass") then goto FEEDBAG.COLLECT
  822. put get grass
  823. pause 0.5
  824. put put grass in my feedbag
  825. pause 0.3
  826. if !contains("$roomobjs","pile of grass") then goto FEEDBAG.COLLECT
  827. put get grass
  828. pause 0.5
  829. put put grass in my feedbag
  830. pause 0.3
  831. pause 0.3
  832. if !contains("$roomobjs","pile of grass") then goto LOOP
  833. put get grass
  834. pause 0.5
  835. put put grass in my feedbag
  836. pause 0.3
  837. pause 0.3
  838. if !contains("$roomobjs","pile of grass") then goto LOOP
  839. put get grass
  840. pause 0.5
  841. put put grass in my feedbag
  842. pause 0.3
  843. pause 0.3
  844. if !contains("$roomobjs","pile of grass") then goto LOOP
  845. put get grass
  846. pause 0.5
  847. put put grass in my feedbag
  848. pause 0.3
  849. pause 0.3
  850. if !contains("$roomobjs","pile of grass") then goto LOOP
  851. put get grass
  852. pause 0.5
  853. put put grass in my feedbag
  854. pause 0.3
  855. pause 0.3
  856. if !contains("$roomobjs","pile of grass") then goto LOOP
  857. put get grass
  858. pause 0.5
  859. put put grass in my feedbag
  860. pause 0.3
  861. pause 0.3
  862. gosub automove 45
  863. goto LOOP
  864.  
  865. DONE:
  866. pause 0.5
  867. send put my grass in bin
  868. pause 0.5
  869. send put my grass in bin
  870. pause 0.5
  871. send get my gloves
  872. pause
  873. send wear my gloves
  874. pause
  875. send pathway stop
  876. pause 0.5
  877. send stand
  878. pause 0.5
  879. send break stone scim
  880. pause 0.5
  881. goto start
  882. pause 0.1
  883. pause 0.1
  884. EXIT:
  885. if matchre("$roomobjs", "trash receptacle") then var trash receptacle
  886. if matchre("$roomobjs", "a bucket of viscous gloop|a waste bucket|a bucket") then var trash bucket
  887. if matchre("$roomobjs", "a large stone turtle") then var trash turtle
  888. if matchre("$roomobjs", "a tree hollow") then var trash hollow
  889. if matchre("$roomobjs", "an oak crate") then var trash crate
  890. if matchre("$roomobjs", "a driftwood log") then var trash log
  891. if matchre("$roomobjs", "a disposal bin|a waste bin|firewood bin") then var trash bin
  892. if matchre("$roomobjs", "ivory urn") then var trash urn
  893. if matchre("$roomobjs", "a bottomless pit") then var trash pit
  894. if matchre("$roomname", "^\[Garden Rooftop, Medical Pavilion\]") then var trash gutter
  895. pause 0.3
  896. if matchre("$righthand","(grass|vine|rope)") then put put my $1 in %trash
  897. if matchre("$lefthand","(grass|vine|rope)") then put put my $1 in %trash
  898. pause 0.5
  899. pause 0.2
  900. if contains("$righthand","(grass|vine|rope)") then put drop my $righthand
  901. if contains("$lefthand","(grass|vine|rope)") then put drop my $lefthand
  902. pause 0.4
  903. pause 0.5
  904. send put my grass in bin
  905. pause 0.5
  906. send put my grass in bin
  907. pause 0.5
  908. if "$righthand" != "Empty" then put empty right
  909. if "$lefthand" != "Empty" then put empty left
  910. pause 0.5
  911. put #parse DONE BRAIDING
  912. put #parse BRAIDING DONE
  913. goto start
  914.  
  915. KICK.PILE:
  916. pause 0.1
  917. if !matchre("$roomobjs","(pile of coins|pile of coin|pile of rocks|pile of grass)") then RETURN
  918. matchre RETURN ^I could not|^What were you
  919. matchre KICK.PILE foot smashing down
  920. matchre sSTAND ^You can't do that from your position
  921. match DELAY footing at the last moment
  922. put kick pile
  923. matchwait 20
  924. goto FORAGE.EXP
  925.  
  926. sSTAND:
  927. put stand
  928. goto KICK.PILE
  929.  
  930. DELAY:
  931. pause 11
  932. put stand
  933. goto KICK.PILE
  934.  
  935. CLIMB:
  936. pause
  937. send .go bank
  938. pause 8
  939. send out
  940. pause
  941. move NoRTHWEST
  942. move NoRTH
  943. move NoRTH
  944. move NoRTH
  945. move NoRTH
  946. move NoRTH
  947. move NoRTH
  948. move EaST
  949. move EaST
  950. move NoRTH
  951. move EaST
  952. move EaST
  953. move NoRTH
  954. move NoRTH
  955. move EaST
  956. move gO stair
  957. move SoUTH
  958.  
  959. CLIMB-001:
  960. match PASS-001 [Outside East Wall, Footpath]
  961. match FAIL-001 You must be standing
  962. match FAIL-001 steepness is intimidating
  963. match FAIL-001 can't seem to find purchase
  964. match FAIL-001 find it hard going.
  965. match FAIL-001 your footing is questionable
  966. match FAIL-001 slip after a few feet
  967. match FAIL-001 A wave of dizziness hits you
  968. match FAIL-001 Struck by vertigo
  969. match CLIMB-001 ...wait
  970. put climb break
  971. matchwait
  972.  
  973. PASS-001:
  974. matcH pASS-001 ...wait
  975. MATCH PASS-001x [
  976. put NoRTH
  977. MATCHWAIT
  978.  
  979. PASS-001x:
  980. move gO gate
  981. move WeST
  982. move gO stair
  983. move SoUTH
  984. goto CLIMB-002
  985.  
  986. FAIL-001:
  987. pause
  988. goto CLIMB-002
  989.  
  990. CLIMB-002:
  991. match PASS-002 [Northeast Wilds, Outside Northeast Gate]
  992. match FAIL-002 You must be standing
  993. match FAIL-002 steepness is intimidating
  994. match FAIL-002 can't seem to find purchase
  995. match FAIL-002 find it hard going.
  996. match FAIL-002 your footing is questionable
  997. match FAIL-002 slip after a few feet
  998. match FAIL-002 A wave of dizziness hits you
  999. match FAIL-002 Struck by vertigo
  1000. match CLIMB-002 ...wait
  1001. put ClIMB embrasure
  1002. matchwait
  1003.  
  1004. FAIL-002:
  1005. pause
  1006. matcH FAIL-002 ...wait
  1007. MATCH FAIL-002x [
  1008. put n
  1009. MATCHWAIT
  1010.  
  1011. FAIL-002x:
  1012. pause
  1013. move go stair
  1014. move e
  1015. move go gate
  1016.  
  1017. PASS-002:
  1018. matcH PAss-002 ...wait
  1019. MATCH PASS-002x [
  1020. put gO footpath
  1021. MATCHWAIT
  1022.  
  1023. PASS-002x:
  1024. goto CLIMB-01
  1025.  
  1026. CLIMB-01:
  1027. SAVE FAIL-01
  1028. match PASS-01 [Crossing, East Wall Battlements]
  1029. match FAIL-01 You must be standing
  1030. match FAIL-01 steepness is intimidating
  1031. match FAIL-01 can't seem to find purchase
  1032. match FAIL-01 find it hard going.
  1033. match FAIL-01 your footing is questionable
  1034. match FALLEN slip after a few feet
  1035. match FAIL-01 A wave of dizziness hits you
  1036. match FAIL-01 Struck by vertigo
  1037. match CLIMB-01 ...wait
  1038. put ClIMB town wall
  1039. matchwait
  1040.  
  1041. PASS-01:
  1042. matcH PASS-01 ...wait
  1043. MATCH PASS-01x [
  1044. put n
  1045. MATCHWAIT
  1046.  
  1047. PASS-01x:
  1048. move gO stair
  1049. move e
  1050. move gO gate
  1051. move gO footpath
  1052. goto FAIL-01
  1053.  
  1054. FAIL-01:
  1055. pause
  1056. matcH FAIL-01 ...wait
  1057. MATCH FAIL-01x [
  1058. put s
  1059. MATCHWAIT
  1060.  
  1061. FAIL-01x:
  1062. pause
  1063. move down
  1064. move s
  1065. move s
  1066. move sw
  1067. goto CLIMB-02
  1068.  
  1069. CLIMB-02:
  1070. SAVE FAIL-02
  1071. match PASS-02 [Crossing, East Wall Battlements]
  1072. match FAIL-02 You must be standing
  1073. match FAIL-02 steepness is intimidating
  1074. match FAIL-02 can't seem to find purchase
  1075. match FAIL-02 find it hard going.
  1076. match FAIL-02 your footing is questionable
  1077. match FALLEN slip after a few feet
  1078. match FAIL-02 A wave of dizziness hits you
  1079. match FAIL-02 Struck by vertigo
  1080. match CLIMB-02 ...wait
  1081. put ClIMB town wall
  1082. matchwait
  1083.  
  1084. PASS-02:
  1085. matcH PASS-02 ...wait
  1086. MATCH PASS-02x [
  1087. put s
  1088. MATCHWAIT
  1089.  
  1090. PASS-02x:
  1091. move gO stair
  1092. move gO gate
  1093. move gO bush
  1094. move n
  1095. goto CLIMB-03
  1096.  
  1097. FAIL-02:
  1098. pause
  1099. matcH FAIL-02 ...wait
  1100. MATCH FAIL-02x [
  1101. put s
  1102. MATCHWAIT
  1103.  
  1104. FAIL-02x:
  1105. pause
  1106. goto CLIMB-03
  1107.  
  1108. CLIMB-03:
  1109. SAVE FAIL-03
  1110. match PASS-03 [Crossing, East Wall Battlements]
  1111. match FAIL-03 You must be standing
  1112. match FAIL-03 steepness is intimidating
  1113. match FAIL-03 can't seem to find purchase
  1114. match FAIL-03 find it hard going.
  1115. match FAIL-03 your footing is questionable
  1116. match FALLEN slip after a few feet
  1117. match FAIL-03 A wave of dizziness hits you
  1118. match FAIL-03 Struck by vertigo
  1119. match CLIMB-03 ...wait
  1120. put ClIMB town wall
  1121. matchwait
  1122.  
  1123. PASS-03:
  1124. matcH PASS-03 ...wait
  1125. MATCH PASS-03x [
  1126. put s
  1127. MATCHWAIT
  1128.  
  1129. PASS-03x:
  1130. move gO stair
  1131. move gO gate
  1132. goto CLIMB-04
  1133.  
  1134. FAIL-03:
  1135. pause
  1136. matcH FAIL-03 ...wait
  1137. MATCH FAIL-03x [
  1138. put s
  1139. MATCHWAIT
  1140.  
  1141. FAIL-03x:
  1142. goto CLIMB-04
  1143.  
  1144. CLIMB-04:
  1145. SAVE FAIL-04
  1146. match PASS-03 [Crossing, East Wall Battlements]
  1147. match PASS-04 [Crossing, East Gate Battlements]
  1148. match FAIL-04 You must be standing
  1149. match FAIL-04 steepness is intimidating
  1150. match FAIL-04 can't seem to find purchase
  1151. match FAIL-04 find it hard going.
  1152. match FAIL-04 your footing is questionable
  1153. match FALLEN slip after a few feet
  1154. match FAIL-04 A wave of dizziness hits you
  1155. match FAIL-04 Struck by vertigo
  1156. match RETREAT closes to pole weapon range on you
  1157. match CLIMB-04 ...wait
  1158. put ClIMB town wall
  1159. matchwait
  1160.  
  1161. PASS-04:
  1162. pause
  1163. goto CLIMB-05
  1164.  
  1165. RETREAT:
  1166. pause
  1167. match RETREAT ...wait
  1168. match RETREAT Roundtime
  1169. match RETREAT back to pole range.
  1170. match FAIL-04 retreat from combat.
  1171. match FAIL-04 You are already as far away as you can get!
  1172. put retreat
  1173. matchwait
  1174.  
  1175. FAIL-04:
  1176. pause
  1177. put s
  1178. waitforre /(You go|You can't go)/
  1179. matcH FAil-04 ...wait
  1180. MATCH FAIL-04x [
  1181. put gO gate
  1182. MATCHWAIT
  1183.  
  1184. FAIL-04x:
  1185. pause
  1186. move gO stair
  1187. goto CLIMB-05
  1188.  
  1189. CLIMB-05:
  1190. SAVE FAIL-05
  1191. match PASS-05 [Eastern Tier, Outside Gate]
  1192. match FAIL-05 You must be standing
  1193. match FAIL-05 steepness is intimidating
  1194. match FAIL-05 can't seem to find purchase
  1195. match FAIL-05 find it hard going.
  1196. match FAIL-05 your footing is questionable
  1197. match FALLEN slip after a few feet
  1198. match FAIL-05 A wave of dizziness hits you
  1199. match FAIL-05 Struck by vertigo
  1200. match CLIMB-05 ...wait
  1201. put ClIMB embrasure
  1202. matchwait
  1203.  
  1204. PASS-05:
  1205. matcH PAss-05 ...wait
  1206. MATCH PASS-05x [
  1207. put gO gate
  1208. MATCHWAIT
  1209.  
  1210. PASS-05x:
  1211. move gO stair
  1212. FAIL-05:
  1213. matcH FAIL-05 ...wait
  1214. MATCH FAIL-05x [
  1215. put n
  1216. MATCHWAIT
  1217.  
  1218. FAIL-05x:
  1219. pause
  1220. goto CLIMB-06
  1221.  
  1222. CLIMB-06:
  1223. SAVE FAIL-06
  1224. match PASS-06 [Outside East Wall, Footpath]
  1225. match FAIL-06 You must be standing
  1226. match FAIL-06 steepness is intimidating
  1227. match FAIL-06 can't seem to find purchase
  1228. match FAIL-06 find it hard going.
  1229. match FAIL-06 your footing is questionable
  1230. match FALLEN slip after a few feet
  1231. match FAIL-06 A wave of dizziness hits you
  1232. match FAIL-06 Struck by vertigo
  1233. match CLIMB-06 ...wait
  1234. put ClIMB break
  1235. matchwait
  1236.  
  1237. PASS-06:
  1238. matcH PASS-06 ...wait
  1239. MATCH PASS-06x [
  1240. put s
  1241. MATCHWAIT
  1242.  
  1243. PASS-06x:
  1244. move gO gate
  1245. move gO stair
  1246. move n
  1247. goto CLIMB-07
  1248.  
  1249. FAIL-06:
  1250. pause
  1251. pause
  1252. goto CLIMB-07
  1253.  
  1254. CLIMB-07:
  1255. SAVE FAIL-07
  1256. match PASS-07 [Outside East Wall, Footpath]
  1257. match FAIL-07 You must be standing
  1258. match FAIL-07 steepness is intimidating
  1259. match FAIL-07 can't seem to find purchase
  1260. match FAIL-07 find it hard going.
  1261. match FAIL-07 your footing is questionable
  1262. match FALLEN slip after a few feet
  1263. match FAIL-07 A wave of dizziness hits you
  1264. match FAIL-07 Struck by vertigo
  1265. match CLIMB-07 ...wait
  1266. put ClIMB embrasure
  1267. matchwait
  1268.  
  1269. PASS-07:
  1270. matcH PASS-07 ...wait
  1271. MATCH PASS-07x [
  1272. put s
  1273. MATCHWAIT
  1274.  
  1275. PASS-07x:
  1276. move s
  1277. move gO gate
  1278. goto TRAVEL-08
  1279.  
  1280. FAIL-07:
  1281. pause
  1282. matcH FAIL-07 ...wait
  1283. MATCH FAIL-07x [
  1284. put s
  1285. MATCHWAIT
  1286.  
  1287. FAIL-07x:
  1288. pause
  1289. move gO stair
  1290. goto TRAVEL-08
  1291.  
  1292. TRAVEL-08:
  1293. move w
  1294. move w
  1295. move w
  1296. move w
  1297. move nw
  1298. move n
  1299. move n
  1300. move n
  1301. move n
  1302. move n
  1303. move n
  1304. move w
  1305. move w
  1306. move w
  1307. move w
  1308. move gO bridge
  1309. move w
  1310. move w
  1311. move w
  1312. move w
  1313. move gO stair
  1314. move s
  1315.  
  1316. CLIMB-08:
  1317. SAVE FAIL-08
  1318. match PASS-08 [Mycthengelde, Flatlands]
  1319. match FAIL-08 You must be standing
  1320. match FAIL-08 steepness is intimidating
  1321. match FAIL-08 can't seem to find purchase
  1322. match FAIL-08 find it hard going.
  1323. match FAIL-08 your footing is questionable
  1324. match FALLEN slip after a few feet
  1325. match FAIL-08 A wave of dizziness hits you
  1326. match FAIL-08 Struck by vertigo
  1327. match CLIMB-08 ...wait
  1328. put ClIMB embrasure
  1329. matchwait
  1330.  
  1331. PASS-08:
  1332. pause
  1333. goto CLIMB-09
  1334.  
  1335. FAIL-08:
  1336. pause
  1337. matcH FAIL-08 ...wait
  1338. MATCH FAIL-08x [
  1339. put n
  1340. MATCHWAIT
  1341.  
  1342. FAIL-08x:
  1343. pause
  1344. move go stair
  1345. move go gate
  1346. move nw
  1347. goto CLIMB-09
  1348.  
  1349. CLIMB-09:
  1350. SAVE FAIL-09
  1351. match PASS-09 [Crossing, West Wall Battlements]
  1352. match FAIL-09 You must be standing
  1353. match FAIL-09 steepness is intimidating
  1354. match FAIL-09 can't seem to find purchase
  1355. match FAIL-09 find it hard going.
  1356. match FAIL-09 your footing is questionable
  1357. match FALLEN slip after a few feet
  1358. match FAIL-09 A wave of dizziness hits you
  1359. match FAIL-09 Struck by vertigo
  1360. match CLIMB-09 ...wait
  1361. put ClIMB town wall
  1362. matchwait
  1363.  
  1364. PASS-09:
  1365. matcH PASS-09 ...wait
  1366. MATCH PASS-09x [
  1367. put n
  1368. MATCHWAIT
  1369.  
  1370. PASS-09x:
  1371. goto CLIMB-10
  1372.  
  1373. FAIL-09:
  1374. pause
  1375. matcH fAIL-09 ...wait
  1376. MATCH FAIL-09x [
  1377. put se
  1378. MATCHWAIT
  1379.  
  1380. FAIL-09x:
  1381. pause
  1382. move gO gate
  1383. move gO stair
  1384. goto CLIMB-10
  1385.  
  1386. CLIMB-10:
  1387. SAVE FAIL-10
  1388. match PASS-10 [Mycthengelde, Flatlands]
  1389. match FAIL-10 You must be standing
  1390. match FAIL-10 steepness is intimidating
  1391. match FAIL-10 can't seem to find purchase
  1392. match FAIL-10 find it hard going.
  1393. match FAIL-10 your footing is questionable
  1394. match FALLEN slip after a few feet
  1395. match FAIL-10 A wave of dizziness hits you
  1396. match FAIL-10 Struck by vertigo
  1397. match CLIMB-10 ...wait
  1398. put ClIMB embrasure
  1399. matchwait
  1400.  
  1401. PASS-10:
  1402. matcH PAss-10 ...wait
  1403. MATCH PASS-10x [
  1404. put gO gate
  1405. MATCHWAIT
  1406.  
  1407. PASS-10x:
  1408. move gO stair
  1409.  
  1410. FAIL-10:
  1411. pause
  1412. matcH FAIL-10 ...wait
  1413. MATCH FAIL-10x [
  1414. put e
  1415. MATCHWAIT
  1416.  
  1417. FAIL-10x:
  1418. pause
  1419. goto CLIMB-11
  1420.  
  1421. CLIMB-11:
  1422. SAVE FAIL-11
  1423. match PASS-11 [Northwall Trail, Wooded Grove]
  1424. match FAIL-11 You must be standing
  1425. match FAIL-11 steepness is intimidating
  1426. match FAIL-11 can't seem to find purchase
  1427. match FAIL-11 find it hard going.
  1428. match FAIL-11 your footing is questionable
  1429. match FALLEN slip after a few feet
  1430. match FAIL-11 A wave of dizziness hits you
  1431. match FAIL-11 Struck by vertigo
  1432. match CLIMB-11 ...wait
  1433. put ClIMB break
  1434. matchwait
  1435.  
  1436. PASS-11:
  1437. matcH PASS-11 ...wait
  1438. MATCH PASS-11x [
  1439. put s
  1440. MATCHWAIT
  1441.  
  1442. PASS-11x:
  1443. move gO gate
  1444. move gO stair
  1445. move e
  1446. goto CLIMB-12
  1447.  
  1448. FAIL-11:
  1449. pause
  1450. goto CLIMB-12
  1451.  
  1452. CLIMB-12:
  1453. SAVE FAIL-12
  1454. match PASS-12 [Northwall Trail, Wooded Grove]
  1455. match FAIL-12 You must be standing
  1456. match FAIL-12 steepness is intimidating
  1457. match FAIL-12 can't seem to find purchase
  1458. match FAIL-12 find it hard going.
  1459. match FAIL-12 your footing is questionable
  1460. match FALLEN slip after a few feet
  1461. match FAIL-12 A wave of dizziness hits you
  1462. match FAIL-12 Struck by vertigo
  1463. match CLIMB-12 ...wait
  1464. put ClIMB embrasure
  1465. matchwait
  1466.  
  1467. PASS-12:
  1468. pause
  1469. goto CLIMB-13
  1470.  
  1471. FAIL-12:
  1472. pause
  1473. matcH FAIL-12 ...wait
  1474. MATCH FAIL-12x [
  1475. put w
  1476. MATCHWAIT
  1477.  
  1478. FAIL-12x:
  1479. pause
  1480. move gO stair
  1481. move gO gate
  1482. move gO trail
  1483. move ne
  1484. goto CLIMB-13
  1485.  
  1486. CLIMB-13:
  1487. SAVE FAIL-13
  1488. match PASS-13 [Crossing, North Wall Battlements]
  1489. match FAIL-13 You must be standing
  1490. match FAIL-13 steepness is intimidating
  1491. match FAIL-13 can't seem to find purchase
  1492. match FAIL-13 find it hard going.
  1493. match FAIL-13 your footing is questionable
  1494. match FALLEN slip after a few feet
  1495. match FAIL-13 A wave of dizziness hits you
  1496. match FAIL-13 Struck by vertigo
  1497. match CLIMB-13 ...wait
  1498. put ClIMB town wall
  1499. matchwait
  1500.  
  1501. PASS-13:
  1502. matcH PASS-13 ...wait
  1503. MATCH PASS-13x [
  1504. put w
  1505. MATCHWAIT
  1506.  
  1507. PASS-13x:
  1508. move gO stair
  1509. move gO gate
  1510. move gO trail
  1511. goto CLIMB-14
  1512.  
  1513. FAIL-13:
  1514. pause
  1515. matcH fAIL-13 ...wait
  1516. MATCH FAIL-13x [
  1517. put sw
  1518. MATCHWAIT
  1519.  
  1520. FAIL-13x:
  1521. pause
  1522. goto CLIMB-14
  1523.  
  1524. CLIMB-14:
  1525. SAVE FAIL-14
  1526. match PASS-14 [Crossing, North Wall Battlements]
  1527. match FAIL-14 You must be standing
  1528. match FAIL-14 steepness is intimidating
  1529. match FAIL-14 can't seem to find purchase
  1530. match FAIL-14 find it hard going.
  1531. match FAIL-14 your footing is questionable
  1532. match FALLEN slip after a few feet
  1533. match FAIL-14 A wave of dizziness hits you
  1534. match FAIL-14 Struck by vertigo
  1535. match CLIMB-14 ...wait
  1536. put ClIMB town wall
  1537. matchwait
  1538.  
  1539. PASS-14:
  1540. matcH PASS-14 ...wait
  1541. MATCH PASS-14x [
  1542. put w
  1543. MATCHWAIT
  1544.  
  1545. PASS-14x:
  1546. move gO stair
  1547. move gO gate
  1548. goto CLIMB-15
  1549.  
  1550. FAIL-14:
  1551. pause
  1552. matcH FAIL-14 ...wait
  1553. MATCH FAIL-14x [
  1554. put s
  1555. MATCHWAIT
  1556.  
  1557. FAIL-14x:
  1558. goto CLIMB-15
  1559.  
  1560. CLIMB-15:
  1561. SAVE FAIL-15
  1562. match PASS-15 [Crossing, West Gate Battlements]
  1563. match FAIL-15 You must be standing
  1564. match FAIL-15 steepness is intimidating
  1565. match FAIL-15 can't seem to find purchase
  1566. match FAIL-15 find it hard going.
  1567. match FAIL-15 your footing is questionable
  1568. match FALLEN slip after a few feet
  1569. match FAIL-15 A wave of dizziness hits you
  1570. match FAIL-15 Struck by vertigo
  1571. match CLIMB-15 ...wait
  1572. put ClIMB town wall
  1573. matchwait
  1574.  
  1575. PASS-15:
  1576. matcH PASS-15 ...wait
  1577. MATCH PASS-15x [
  1578. put gO stair
  1579. MATCHWAIT
  1580.  
  1581. PASS-15x:
  1582. goto TRAVEL-15
  1583.  
  1584. FAIL-15:
  1585. pause
  1586. matcH FAil-15 ...wait
  1587. MATCH FAIL-15x [
  1588. put gO gate
  1589. MATCHWAIT
  1590.  
  1591. FAIL-15x:
  1592. pause
  1593. goto TRAVEL-15
  1594.  
  1595. TRAVEL-15:
  1596. move e
  1597. move e
  1598. move e
  1599. move e
  1600. move e
  1601. move e
  1602. move e
  1603. move e
  1604. move e
  1605. move s
  1606. move s
  1607. move s
  1608. move s
  1609. move s
  1610. move s
  1611. move se
  1612. pause
  1613. match climb EXP HELP
  1614. match quit mind lock
  1615. match quit nearly locked
  1616. match quit enthralled
  1617. put sk ath
  1618. matchwait
  1619.  
  1620. ######################
  1621. FALLEN:
  1622. pause
  1623. match STOOD You stand
  1624. match STOOD You are already standing
  1625. match FALLEN cannot manage to stand.
  1626. match FALLEN The weight of all your possessions
  1627. match FALLEN ...wait
  1628. put StAND
  1629. matchwait
  1630.  
  1631. STOOD:
  1632. goto %s
  1633.  
  1634. QUIT:
  1635. pause
  1636. goto start
  1637.  
  1638. Thief:
  1639. send khri check
  1640. pause 1
  1641. send sit
  1642. pause 0.5
  1643. send khri delay Plunder
  1644. pause 10
  1645. send khri delay Darken
  1646. pause 10
  1647. send khri delay Hasten
  1648. pause 10
  1649. send khri delay Focus
  1650. pause 10
  1651. send khri delay Prowess
  1652. pause 10
  1653. send khri medit
  1654. pause 10
  1655. send khri medit
  1656. pause 10
  1657. send khri medit
  1658. pause 10
  1659. send khri medit
  1660. pause 10
  1661. send khri medit
  1662. pause 10
  1663. send khri medit
  1664. pause 10
  1665. send khri medit
  1666. pause 10
  1667. send khri medit
  1668. pause 10
  1669. send khri medit
  1670. pause 10
  1671. send stand
  1672. pause 1
  1673.  
  1674. if ($Athletics.LearningRate < 20) then {
  1675. gosub Climb
  1676. }
  1677.  
  1678. pause 1
  1679. if ($Outdoorsmanship.LearningRate < 20) then {
  1680. gosub collect
  1681. }
  1682.  
  1683. pause 1
  1684. if ($Mechanical_Lore.LearningRate < 18) then {
  1685. gosub BBRAID
  1686. }
  1687.  
  1688. pause 1
  1689. if ($Performance.LearningRate < 20) then {
  1690. gosub play
  1691. }
  1692.  
  1693. goto start
  1694.  
  1695. CRUSH:
  1696. pause 0.5
  1697. gosub clear
  1698. pause 0.5
  1699. send get my mort
  1700. pause 0.5
  1701. goto forage1
  1702.  
  1703. forage1:
  1704. pause 1
  1705. gosub clear
  1706. pause 1
  1707. #if ($Outdoorsmanship.LearningRate < 20) then {
  1708. # gosub crush1
  1709. #}
  1710. #
  1711. #pause 1
  1712. #if ($Outdoorsmanship.LearningRate > 30) then {
  1713. # gosub start
  1714. #}
  1715.  
  1716. pause 1
  1717. goto crush1
  1718.  
  1719.  
  1720. CRUSH1:
  1721. match loadmort You manage to find some blue flowers
  1722. match forage1 Roundtime
  1723. send forage blue flower
  1724. matchwait
  1725.  
  1726.  
  1727. loadmort:
  1728. send put my blue flower in my mort
  1729. pause 1
  1730. send get my pes
  1731. pause 1
  1732. goto crush2
  1733.  
  1734. CRUSH2:
  1735. pause 1
  1736. match unload You stop, realizing that type of plant
  1737. match unload You complete crushing
  1738. match crush2 Roundtime
  1739. send crush my blue flower with my pes
  1740. matchwait
  1741.  
  1742. UNLOAD:
  1743. pause 1
  1744. send stow pestle
  1745. pause 1
  1746. send get flow from my mort
  1747. pause 1
  1748. send put my flow in bin
  1749. pause 1
  1750. send drop my flower
  1751. pause 1
  1752. send dump junk
  1753. pause 1
  1754. send app my gem pouch
  1755. pause 1
  1756.  
  1757. if ($Alchemy.LearningRate > 30) then {
  1758. gosub alchDon}
  1759.  
  1760. pause 1
  1761. if ($Alchemy.LearningRate < 30) then {
  1762. gosub forage1
  1763. }
  1764.  
  1765. alchDONE:
  1766. send get my flower from mort
  1767. pause 0.5
  1768. send put my flower in bin
  1769. pause 0.5
  1770. send stow my mort
  1771. pause 1
  1772. goto start
  1773.  
  1774.  
  1775.  
  1776.  
  1777.  
  1778.  
  1779.  
  1780. pause 1
  1781. if ("$charactername" = "Ghimly") then put #script abort all except cross
  1782. pause 1
  1783. send .afk1
  1784. pause 1
  1785. if ("$charactername" = "Ghimly") then send .teachfa
  1786. pause 1
  1787. if ("$charactername" = "Ghimly") then send .afk3
  1788. pause 1
  1789. if ("$charactername" = "Ghimly") then put #script abort afk1
  1790.  
  1791. START:
  1792. pause 1
  1793. send exp
  1794. pause 1
  1795. gosub clear
  1796. pause 1
  1797. send #goto 355
  1798. pause 6
  1799. send stop play
  1800. pause 1
  1801. send stow my mort
  1802. pause 1
  1803. send stow my pestle
  1804. pause 1
  1805. send get flower from my mort
  1806. pause 1
  1807. send put my flower in bin
  1808. pause 1
  1809. send rel spell
  1810. pause 1
  1811. send stand
  1812. pause 1
  1813. send put my grass in bin
  1814. pause 1
  1815. send put my grass in bin
  1816. pause 1
  1817. if ("$charactername" = "Ghimly") then send rem my badge
  1818. pause 1
  1819. if ("$charactername" = "Ghimly") then send pray my badge
  1820. pause
  1821. if ("$charactername" = "Ghimly") then send wear my badge
  1822. pause 1
  1823. send touch vess
  1824. pause 1
  1825. send listen to ghim
  1826. pause 1
  1827. send Hunt
  1828. pause 1
  1829. if ($Appraisal.LearningRate < 30) then {
  1830. send app my stick
  1831. pause
  1832. }
  1833. pause 1
  1834. if ($Appraisal.LearningRate < 30) then {
  1835. send app my bund
  1836. pause
  1837. }
  1838.  
  1839. pause 1
  1840. if ($Appraisal.LearningRate < 30) then {
  1841. send app my pouch
  1842. pause
  1843. }
  1844. pause 1
  1845. send pow
  1846. pause 1
  1847. goto empcheck
  1848.  
  1849. EMPCHECK:
  1850.  
  1851. pause 1
  1852. if ("$guild" = "Empath") && ($Empathy.LearningRate < 20) then goto Empathy
  1853.  
  1854. pause 1
  1855. if ("$guild" = "Moon Mage") && ($Astrology.LearningRate < 15) then goto ASTRO
  1856.  
  1857. pause 1
  1858. if ("$guild" = "Warrior Mage") && ($Summoning.LearningRate < 15) then goto sum
  1859.  
  1860. pause 1
  1861. goto start2
  1862.  
  1863. START2:
  1864. pause 1
  1865. if ($Athletics.LearningRate < 20) then {
  1866. gosub Climb
  1867. }
  1868.  
  1869. pause 1
  1870. if ($Outdoorsmanship.LearningRate < 20) then {
  1871. gosub collect
  1872. }
  1873.  
  1874. pause 1
  1875. if ($Performance.LearningRate < 20) then {
  1876. gosub play
  1877. }
  1878.  
  1879. pause 1
  1880. if ($Mechanical_Lore.LearningRate < 20) then {
  1881. gosub BBRAID
  1882. }
  1883.  
  1884. pause 1
  1885. if ($Alchemy.LearningRate < 20) then {
  1886. gosub Crush
  1887. }
  1888.  
  1889. pause 1
  1890. if ("$guild" = "Thief") then gosub Thief
  1891.  
  1892. pause 1
  1893. if ($Utility.LearningRate < 10) then {
  1894. gosub research_Utility
  1895. }
  1896.  
  1897. pause 1
  1898. if ($Primary_Magic.LearningRate < 10) then {
  1899. gosub research_MAGIC
  1900. }
  1901.  
  1902. pause 1
  1903. if ($Augmentation.LearningRate < 10) then {
  1904. gosub research_augmentation
  1905. }
  1906.  
  1907. pause 1
  1908. if ($Attunement.LearningRate < 10) then {
  1909. gosub research_Attunement
  1910. }
  1911.  
  1912. pause 1
  1913. if ($Warding.LearningRate < 10) then {
  1914. gosub research_warding
  1915. }
  1916.  
  1917. pause 1
  1918. goto start
  1919.  
  1920. research_warding:
  1921. pause
  1922. put prep gauge flow 15
  1923. pause 25
  1924. send cast
  1925. pause 5
  1926.  
  1927. RESEARCHward:
  1928. put research ward 60
  1929. match researchward there is still more to learn
  1930. match DONE Breakthrough!
  1931. matchwait
  1932.  
  1933. research_Attunement:
  1934. pause
  1935. put prep gauge flow 15
  1936. pause 25
  1937. send cast
  1938. pause 5
  1939.  
  1940. RESEARCHATT:
  1941. put research stream 60
  1942. match researchATT there is still more to learn
  1943. match DONE Breakthrough!
  1944. matchwait
  1945.  
  1946. research_augmentation:
  1947. pause
  1948. put prep gauge flow 15
  1949. pause 25
  1950. send cast
  1951. pause 5
  1952.  
  1953. RESEARCHAug:
  1954. put research aug 60
  1955. match researchaug there is still more to learn
  1956. match DONE Breakthrough!
  1957. matchwait
  1958.  
  1959. research_MAGIC:
  1960. pause
  1961. put prep gauge flow 15
  1962. pause 25
  1963. send cast
  1964. pause 5
  1965.  
  1966. RESEARCHM:
  1967. put research fund 60
  1968. match researchM there is still more to learn
  1969. match DONE Breakthrough!
  1970. matchwait
  1971.  
  1972.  
  1973. RESEARCH_UTILITY:
  1974. pause
  1975. put prep gauge flow 15
  1976. pause 25
  1977. send cast
  1978. pause 5
  1979.  
  1980. RESEARCHU:
  1981. put research Utility 60
  1982. match researchU there is still more to learn
  1983. match DONE Breakthrough!
  1984. matchwait
  1985.  
  1986. COLLECT:
  1987. pause 1
  1988. send stand
  1989. pause 1
  1990. send kick pile
  1991. pause 1
  1992. put collect rock
  1993. pause 1
  1994. goto CHECK_IF_DONE
  1995.  
  1996. CHECK_IF_DONE:
  1997. put kick pile
  1998. match COLLECT EXP HELP
  1999. match DONE mind lock
  2000. put exp outdoorsmanship
  2001. matchwait
  2002.  
  2003. APP:
  2004. pause
  2005. send app my bun
  2006. pause 4
  2007. send app my gem po
  2008. pause 4
  2009. goto start
  2010.  
  2011. HUNT:
  2012. pause
  2013. send hunt
  2014. pause
  2015. goto start
  2016.  
  2017.  
  2018. PLAY:
  2019. pause
  2020. send rem my zill
  2021. pause
  2022. send shake my zill
  2023. pause
  2024. send get my cloth
  2025. pause
  2026. send clean my zil with my cloth
  2027. pause
  2028. send clean my zil with my cloth
  2029. pause
  2030. send stow cloth
  2031. pause
  2032. send wear my zill
  2033. pause
  2034. echo checking ranks
  2035. if ($Performance.Ranks > 200) then gosub PLAYB
  2036. if ($Performance.Ranks < 200) then gosub PLAYA
  2037. send exp
  2038. pause
  2039. echo it messed up- again
  2040.  
  2041. #match playb Performance:
  2042. #match palyb Performance
  2043. #match playa EXP HELP
  2044. #send exp lore 200
  2045.  
  2046.  
  2047. ## if "$zoneid" = "40" && $Athletics.Ranks >= %rossmansouth then gosub MOVE 213
  2048. ## if "$zoneid" = "40" && $Athletics.Ranks < %rossmansouth then
  2049. ## "40" && $Athletics.Ranks >=
  2050. ## ("$charactername" = "Ghimly")
  2051.  
  2052. ##if ("$Performance.Ranks <= 200") then gosub PLAYA
  2053.  
  2054. ##if ("$Performance.Ranks >= 200") then gosub PLAYB
  2055.  
  2056. PLAYA:
  2057. pause 1
  2058. echo playa
  2059. var topics scales|arpeggios|ditty|folk|ballad|waltz|lullaby|march|jig|lament|wedding|hymn|rumba|polka
  2060. eval TopicCount count("%topics","|")
  2061. var track 0
  2062. eval NextTopic element("%topics", %track)
  2063. goto play1
  2064.  
  2065. PLAYB:
  2066. pause 1
  2067. echo playb
  2068. var topics polka|battle|reel|elegy|serenade|minuet|psalm|dirge|gavotte|tango|tarantella|bolero|nocturne|requiem|fantasia|rondo|aria|sonata|concerto
  2069. eval TopicCount count("%topics","|")
  2070. var track 0
  2071. eval NextTopic element("%topics", %track)
  2072. goto play1
  2073.  
  2074. play1:
  2075. echo play1
  2076. eval NexttTopic element("%topics", %track)
  2077.  
  2078. send cast
  2079. pause 1
  2080. send rel spell
  2081. pause 1
  2082. put play %NextTopic
  2083. match perfect with only the slightest hint of difficulty
  2084. match toeasy your skill in your craft showcased
  2085. match toeasy on your copper zills
  2086. matchwait
  2087.  
  2088. ##PCHECK:
  2089. ##eval NextTopic element("%topics", %track)
  2090. ##goto play1
  2091.  
  2092.  
  2093. TOEASY:
  2094. pause 0.1
  2095. send stop play
  2096. pause
  2097. if %track = %TopicCount then goto done
  2098. eval NextTopic element("%topics", %track)
  2099. math track add 1
  2100. goto play1
  2101.  
  2102. PERFECT:
  2103. pause
  2104. send gaze my sano cry
  2105. pause
  2106. send hunt
  2107. pause 15
  2108. send app my gem pouch
  2109. pause 15
  2110. send app my bundle
  2111. pause 15
  2112. send app my stick
  2113. pause 15
  2114. send app my gem pouch
  2115. pause 15
  2116. send app my bundle
  2117. pause 15
  2118. send app my stick
  2119. pause 15
  2120. pause 30
  2121. send app my bun
  2122. pause 10
  2123. goto start
  2124.  
  2125. SUM:
  2126. pause 1
  2127. send break my stone scim
  2128. pause 1
  2129. match DONE 34/34
  2130. match ADMIT EXP HELP
  2131. send sk sum
  2132. matchwait
  2133.  
  2134.  
  2135. ADMIT:
  2136. match SUM increasing your proximity
  2137. match SUM you feel that you can still gather
  2138. match DIS You so heavily embody the Elemental Plane
  2139. match DIS Going any further
  2140. send SUMMON ADMITTANCE
  2141. matchwait
  2142.  
  2143. DIS:
  2144. pause 1
  2145. send summon weapon
  2146. pause 1
  2147. send break stone scim
  2148. pause 1
  2149. send summon weapon
  2150. pause 1
  2151. send break stone scim
  2152. pause 1
  2153. goto SUM
  2154.  
  2155. Empathy:
  2156. pause 2
  2157. send whisper ghimly DORFS
  2158. match start2 Whisper what to who
  2159. match empstart You whisper to Ghimly
  2160. matchwait
  2161.  
  2162. empstart:
  2163. pause 5
  2164. send touch vess
  2165. pause 5
  2166. send touch vess
  2167. pause 5
  2168. send touch vess
  2169. pause 5
  2170. send touch vess
  2171. pause 5
  2172. send touch vess
  2173. pause 5
  2174. send touch Ghimly
  2175. pause 1
  2176. send take Ghimly vit
  2177. pause 1
  2178. send take Ghimly vit
  2179. pause 1
  2180. send take Ghimly vit
  2181. pause 1
  2182. send take Ghimly vit
  2183. pause 1
  2184. send touch vess
  2185. pause 5
  2186. send touch Ghimly
  2187. pause 1
  2188. send take Ghimly vit
  2189. pause 1
  2190. send take Ghimly vit
  2191. pause 1
  2192. send take Ghimly vit
  2193. pause 1
  2194. send take Ghimly vit
  2195. pause 1
  2196. send touch vess
  2197. pause 5
  2198. send touch Ghimly
  2199. pause 1
  2200. send take Ghimly vit
  2201. pause 1
  2202. send take Ghimly vit
  2203. pause 1
  2204. send take Ghimly vit
  2205. pause 1
  2206. send take Ghimly vit
  2207. pause 1
  2208. send touch vess
  2209. pause 5
  2210. send touch Ghimly
  2211. pause 1
  2212. send take Ghimly vit
  2213. pause 1
  2214. send take Ghimly vit
  2215. pause 1
  2216. send take Ghimly vit
  2217. pause 1
  2218. send take Ghimly vit
  2219. pause 1
  2220. send touch vess
  2221. pause 5
  2222. send touch Ghimly
  2223. pause 1
  2224. send take Ghimly vit
  2225. pause 1
  2226. send take Ghimly vit
  2227. pause 1
  2228. send take Ghimly vit
  2229. pause 1
  2230. send take Ghimly vit
  2231. pause 1
  2232. send touch vess
  2233. pause 5
  2234. send touch Ghimly
  2235. pause 1
  2236. send take Ghimly vit
  2237. pause 1
  2238. send take Ghimly vit
  2239. pause 1
  2240. send take Ghimly vit
  2241. pause 1
  2242. send take Ghimly vit
  2243. pause 1
  2244. send touch vess
  2245. pause 5
  2246. send touch Ghimly
  2247. pause 1
  2248. send take Ghimly vit
  2249. pause 1
  2250. send take Ghimly vit
  2251. pause 1
  2252. send take Ghimly vit
  2253. pause 1
  2254. send take Ghimly vit
  2255. pause 1
  2256. send touch vess
  2257. pause 5
  2258. goto empDONE
  2259.  
  2260.  
  2261. empCHECK11:
  2262. if ($Empathy.LearningRate < 33) then {
  2263. gosub TAKE
  2264. }
  2265.  
  2266. if ($Empathy.LearningRate > 33) then {
  2267. gosub empDONE
  2268. }
  2269.  
  2270. TAKE:
  2271. pause 1
  2272.  
  2273. if ($health < 89) then {
  2274. send touch Vess
  2275. }
  2276.  
  2277. if ($health > 90) then {
  2278. send take Ghimly vit
  2279. }
  2280.  
  2281. goto empstart
  2282.  
  2283. empDONE:
  2284. send touch vess
  2285. pause 2
  2286. send whisper Ghimly Locked
  2287. pause 5
  2288. send touch vess
  2289. pause 5
  2290. send touch vess
  2291. pause 5
  2292. send touch vess
  2293. pause 5
  2294. send touch vess
  2295. pause 5
  2296. send touch vess
  2297. pause 5
  2298. send touch vess
  2299. pause 5
  2300. goto start
  2301.  
  2302. ASTRO:
  2303. pause
  2304. gosub clear
  2305. pause
  2306. send prep cv 5
  2307. pause 22
  2308. send cast
  2309. pause
  2310. send prep pg 5
  2311. pause 22
  2312. send cast
  2313. pause
  2314. send hunt
  2315. pause 2
  2316. send perceive moons
  2317. pause 2
  2318. send predict weather
  2319. pause 2
  2320. send obs sky
  2321. pause 2
  2322. send obs sun in the sky
  2323. pause 2
  2324. send obs moon in the sky
  2325. pause 2
  2326. send OBSERVE Cobra
  2327. pause 2
  2328. send OBSERVE Raccoon
  2329. pause 2
  2330. send OBSERVE Ram
  2331. pause 2
  2332. send OBSERVE Heart
  2333. pause 2
  2334. send OBSERVE Raven
  2335. pause 2
  2336. send OBSERVE Wolf
  2337. pause 2
  2338. send OBSERVE Mongoose
  2339. pause 2
  2340. send OBSERVE Heron
  2341. pause 2
  2342. send OBSERVE Dove
  2343. pause 2
  2344. send OBSERVE Magpie
  2345. pause 2
  2346. send OBSERVE Toad
  2347. pause 2
  2348. send OBSERVE Albatross
  2349. pause 2
  2350. send OBSERVE Cat
  2351. pause 2
  2352. send OBSERVE Wolverine
  2353. pause 2
  2354. send OBSERVE Giant
  2355. pause 2
  2356. send OBSERVE Spider
  2357. pause 2
  2358. send predict anal
  2359. pause 2
  2360. send perceive mana
  2361. pause 2
  2362. send perc xibar
  2363. pause 2
  2364. send OBSERVE xibar
  2365. pause 2
  2366. send align lore app
  2367. pause 2
  2368. send predict future Gizban
  2369. pause 2
  2370. send predic ana
  2371. pause 2
  2372. send perc Katamba
  2373. pause 2
  2374. send OBSERVE katamba
  2375. pause 2
  2376. send align magic
  2377. pause 2
  2378. send predict future Gizban
  2379. pause 2
  2380. send predic ana
  2381. pause 2
  2382. send perc Yavash
  2383. pause 2
  2384. send OBSERVE yavash
  2385. pause 2
  2386. send align lore app
  2387. pause 2
  2388. send predict future Gizban
  2389. pause 2
  2390. send predic ana
  2391. pause 2
  2392. send perc
  2393. pause 2
  2394. send align Offense
  2395. pause 2
  2396. send predict future Gizban
  2397. pause 2
  2398. send predic ana
  2399. pause 2
  2400. send align Defense
  2401. pause 2
  2402. send predict future Gizban
  2403. pause 2
  2404. send predic ana
  2405. pause 2
  2406. send align Survival
  2407. pause 2
  2408. send predict future Gizban
  2409. pause 2
  2410. send predic ana
  2411. pause 2
  2412. send align magic astro
  2413. pause 2
  2414. send predict future Gizban
  2415. pause 2
  2416. send predic ana
  2417. pause 2
  2418. send pow
  2419. pause 2
  2420. goto start
  2421.  
  2422.  
  2423. BBRAID:
  2424. pause 1
  2425. send rem my glove
  2426. pause 1
  2427. send stow my gloves
  2428. pause 1
  2429. var forage grass
  2430. var trash log
  2431. var loop 0
  2432.  
  2433. action goto EXIT when ^You survey the area and realize that any foraging efforts would be futile\.
  2434.  
  2435. if ("$righthand" != "Empty") then send stow right
  2436. if ("$lefthand" != "Empty") then send stow left
  2437. pause 0.1
  2438. pause 0.2
  2439.  
  2440. LOOP:
  2441. math loop add 1
  2442. if (%loop > 20) then goto DONE
  2443. if ($Mechanical_Lore.LearningRate) > 20 then goto DONE
  2444. if contains("$roomobjs","(pile of coins|pile of coin|pile of rocks|pile of grass)") then GOSUB KICK.PILE
  2445. if contains("$roomobjs","(pile of coins|pile of coin|pile of rocks|pile of grass)") then GOSUB KICK.PILE
  2446. pause 0.1
  2447. if ("$righthandnoun" = "%forage") && ("$lefthandnoun" = "%forage") then goto BRAID
  2448. if ("$righthand" != "Empty") then send empty right
  2449. if ("$lefthand" != "Empty") then send empty left
  2450. if ("$zoneid" = "150" && "$roomid" != "45") then gosub automove 45
  2451. put forage %forage
  2452. pause 2
  2453. pause
  2454.  
  2455. FORAGE:
  2456. if ("$lefthand" = "braided vines") then put swap
  2457. if ("$lefthand" = "braided grass") then put swap
  2458. pause 0.2
  2459. if ("$charactername" = "Shroom") && ("$zoneid" = "150") then goto FEEDBAG
  2460. pause 0.001
  2461. if ("%forage" = "grass") then
  2462. {
  2463. if contains("$roomobjs","some grass") then
  2464. {
  2465. put get grass
  2466. pause 0.5
  2467. goto BRAID
  2468. }
  2469. }
  2470. if ("%forage" = "vine") then
  2471. {
  2472. if contains("$roomobjs","a vine") then
  2473. {
  2474. put get vine
  2475. pause 0.5
  2476. goto BRAID
  2477. }
  2478. }
  2479. put forage %forage
  2480. pause 2
  2481. pause
  2482. if ("$righthand" != "Empty") && ("$lefthand" != "Empty") then goto BRAID
  2483. goto FORAGE
  2484.  
  2485. FEEDBAG:
  2486. pause 0.2
  2487. if ("$righthand" != "Empty") && ("$lefthand" != "Empty") then goto BRAID
  2488. matchre FEEDBAG ^You get
  2489. matchre EMPTYBAG ^What were|^I could not
  2490. put get grass from my feedb
  2491. matchwait
  2492. HUM:
  2493. send stop hum
  2494. pause 0.2
  2495. BRAID:
  2496. pause 0.1
  2497. if ("$lefthand" = "braided vines") then put swap
  2498. if ("$lefthand" = "braided grass") then put swap
  2499. if ($Mechanical_Lore.LearningRate) > 31 then goto DONE
  2500. pause 0.3
  2501. if ("$lefthand" = "Empty") then goto FORAGE
  2502. matchre HUM ^But that would give away your hiding
  2503. matchre FORAGE ^You need to have more material
  2504. matchre DUMP ^You need both hands to do that|nothing more than wasted effort
  2505. matchre PULL ^You fumble around trying|^You are certain that you have made a|is already as long
  2506. matchre BRAID Roundtime|^\.\.\.wait|^Sorry
  2507. send braid my %forage
  2508. matchwait
  2509.  
  2510. PULL:
  2511. pause .5
  2512. put pull my braided %forage
  2513. pause
  2514.  
  2515. DUMP:
  2516. pause 0.2
  2517. pause 0.1
  2518. if matchre("$roomobjs", "trash receptacle") then var trash receptacle
  2519. if matchre("$roomobjs", "a bucket of viscous gloop|a waste bucket|a bucket") then var trash bucket
  2520. if matchre("$roomobjs", "a large stone turtle") then var trash turtle
  2521. if matchre("$roomobjs", "a tree hollow") then var trash hollow
  2522. if matchre("$roomobjs", "an oak crate") then var trash crate
  2523. if matchre("$roomobjs", "a driftwood log") then var trash log
  2524. if matchre("$roomobjs", "a disposal bin|a waste bin|firewood bin") then var trash bin
  2525. if matchre("$roomobjs", "ivory urn") then var trash urn
  2526. if matchre("$roomobjs", "a bottomless pit") then var trash pit
  2527. if matchre("$roomname", "^\[Garden Rooftop, Medical Pavilion\]") then var trash gutter
  2528. pause 0.3
  2529. if matchre("$righthand","(grass|vine|rope)") then put put my $1 in %trash
  2530. if matchre("$lefthand","(grass|vine|rope)") then put put my $1 in %trash
  2531. pause 0.5
  2532. pause 0.2
  2533. if contains("$righthand","(grass|vine|rope)") then put drop my $righthand
  2534. if contains("$lefthand","(grass|vine|rope)") then put drop my $lefthand
  2535. pause 0.4
  2536. pause 0.5
  2537. if ("$righthand" != "Empty") then put stow right
  2538. if ("$lefthand" != "Empty") then put stow left
  2539. pause 0.2
  2540. send dump junk
  2541. pause .1
  2542. goto LOOP
  2543.  
  2544. EMPTYBAG:
  2545. echo **** FEEDBAG IS EMPTY! ATTEMPTING TO REFILL!!
  2546. put put grass in my feed
  2547. pause 0.5
  2548. if ("$zoneid" = "150") && ("$roomid" != "44") then gosub automove 44
  2549. # if ("$zoneid" = "150") && ("$roomid" = "85") then put go portal
  2550. # pause
  2551. # pause 0.5
  2552. # if ("$zoneid" = "66") then gosub automove campfire
  2553. FEEDBAG.COLLECT:
  2554. pause 0.5
  2555. put collect grass
  2556. pause 2
  2557. pause
  2558. if !contains("$roomobjs","pile of grass") then goto FEEDBAG.COLLECT
  2559. put get grass
  2560. pause 0.5
  2561. put put grass in my feedbag
  2562. pause 0.3
  2563. put get grass
  2564. pause 0.5
  2565. put put grass in my feedbag
  2566. pause 0.3
  2567. put get grass
  2568. pause 0.5
  2569. put put grass in my feedbag
  2570. pause 0.3
  2571. if !contains("$roomobjs","pile of grass") then goto FEEDBAG.COLLECT
  2572. put get grass
  2573. pause 0.5
  2574. put put grass in my feedbag
  2575. pause 0.1
  2576. put get grass
  2577. pause 0.5
  2578. put put grass in my feedbag
  2579. pause 0.3
  2580. put get grass
  2581. pause 0.5
  2582. put put grass in my feedbag
  2583. pause 0.3
  2584. if !contains("$roomobjs","pile of grass") then goto FEEDBAG.COLLECT
  2585. put get grass
  2586. pause 0.5
  2587. put put grass in my feedbag
  2588. pause 0.3
  2589. pause 0.3
  2590. put get grass
  2591. pause 0.5
  2592. put put grass in my feedbag
  2593. pause 0.3
  2594. pause 0.3
  2595. put get grass
  2596. pause 0.5
  2597. put put grass in my feedbag
  2598. pause 0.3
  2599. pause 0.3
  2600. if !contains("$roomobjs","pile of grass") then goto FEEDBAG.COLLECT
  2601. put get grass
  2602. pause 0.5
  2603. put put grass in my feedbag
  2604. pause 0.3
  2605. if !contains("$roomobjs","pile of grass") then goto FEEDBAG.COLLECT
  2606. put get grass
  2607. pause 0.5
  2608. put put grass in my feedbag
  2609. pause 0.3
  2610. pause 0.3
  2611. if !contains("$roomobjs","pile of grass") then goto LOOP
  2612. put get grass
  2613. pause 0.5
  2614. put put grass in my feedbag
  2615. pause 0.3
  2616. pause 0.3
  2617. if !contains("$roomobjs","pile of grass") then goto LOOP
  2618. put get grass
  2619. pause 0.5
  2620. put put grass in my feedbag
  2621. pause 0.3
  2622. pause 0.3
  2623. if !contains("$roomobjs","pile of grass") then goto LOOP
  2624. put get grass
  2625. pause 0.5
  2626. put put grass in my feedbag
  2627. pause 0.3
  2628. pause 0.3
  2629. if !contains("$roomobjs","pile of grass") then goto LOOP
  2630. put get grass
  2631. pause 0.5
  2632. put put grass in my feedbag
  2633. pause 0.3
  2634. pause 0.3
  2635. if !contains("$roomobjs","pile of grass") then goto LOOP
  2636. put get grass
  2637. pause 0.5
  2638. put put grass in my feedbag
  2639. pause 0.3
  2640. pause 0.3
  2641. gosub automove 45
  2642. goto LOOP
  2643.  
  2644. DONE:
  2645. pause 0.5
  2646. send put my grass in bin
  2647. pause 0.5
  2648. send put my grass in bin
  2649. pause 0.5
  2650. send get my gloves
  2651. pause
  2652. send wear my gloves
  2653. pause
  2654. send pathway stop
  2655. pause 0.5
  2656. send stand
  2657. pause 0.5
  2658. send break stone scim
  2659. pause 0.5
  2660. goto start
  2661. pause 0.1
  2662. pause 0.1
  2663. EXIT:
  2664. if matchre("$roomobjs", "trash receptacle") then var trash receptacle
  2665. if matchre("$roomobjs", "a bucket of viscous gloop|a waste bucket|a bucket") then var trash bucket
  2666. if matchre("$roomobjs", "a large stone turtle") then var trash turtle
  2667. if matchre("$roomobjs", "a tree hollow") then var trash hollow
  2668. if matchre("$roomobjs", "an oak crate") then var trash crate
  2669. if matchre("$roomobjs", "a driftwood log") then var trash log
  2670. if matchre("$roomobjs", "a disposal bin|a waste bin|firewood bin") then var trash bin
  2671. if matchre("$roomobjs", "ivory urn") then var trash urn
  2672. if matchre("$roomobjs", "a bottomless pit") then var trash pit
  2673. if matchre("$roomname", "^\[Garden Rooftop, Medical Pavilion\]") then var trash gutter
  2674. pause 0.3
  2675. if matchre("$righthand","(grass|vine|rope)") then put put my $1 in %trash
  2676. if matchre("$lefthand","(grass|vine|rope)") then put put my $1 in %trash
  2677. pause 0.5
  2678. pause 0.2
  2679. if contains("$righthand","(grass|vine|rope)") then put drop my $righthand
  2680. if contains("$lefthand","(grass|vine|rope)") then put drop my $lefthand
  2681. pause 0.4
  2682. pause 0.5
  2683. send put my grass in bin
  2684. pause 0.5
  2685. send put my grass in bin
  2686. pause 0.5
  2687. if "$righthand" != "Empty" then put empty right
  2688. if "$lefthand" != "Empty" then put empty left
  2689. pause 0.5
  2690. put #parse DONE BRAIDING
  2691. put #parse BRAIDING DONE
  2692. goto start
  2693.  
  2694. KICK.PILE:
  2695. pause 0.1
  2696. if !matchre("$roomobjs","(pile of coins|pile of coin|pile of rocks|pile of grass)") then RETURN
  2697. matchre RETURN ^I could not|^What were you
  2698. matchre KICK.PILE foot smashing down
  2699. matchre sSTAND ^You can't do that from your position
  2700. match DELAY footing at the last moment
  2701. put kick pile
  2702. matchwait 20
  2703. goto FORAGE.EXP
  2704.  
  2705. sSTAND:
  2706. put stand
  2707. goto KICK.PILE
  2708.  
  2709. DELAY:
  2710. pause 11
  2711. put stand
  2712. goto KICK.PILE
  2713.  
  2714. CLIMB:
  2715. pause
  2716. send .go bank
  2717. pause 8
  2718. send out
  2719. pause
  2720. move NoRTHWEST
  2721. move NoRTH
  2722. move NoRTH
  2723. move NoRTH
  2724. move NoRTH
  2725. move NoRTH
  2726. move NoRTH
  2727. move EaST
  2728. move EaST
  2729. move NoRTH
  2730. move EaST
  2731. move EaST
  2732. move NoRTH
  2733. move NoRTH
  2734. move EaST
  2735. move gO stair
  2736. move SoUTH
  2737.  
  2738. CLIMB-001:
  2739. match PASS-001 [Outside East Wall, Footpath]
  2740. match FAIL-001 You must be standing
  2741. match FAIL-001 steepness is intimidating
  2742. match FAIL-001 can't seem to find purchase
  2743. match FAIL-001 find it hard going.
  2744. match FAIL-001 your footing is questionable
  2745. match FAIL-001 slip after a few feet
  2746. match FAIL-001 A wave of dizziness hits you
  2747. match FAIL-001 Struck by vertigo
  2748. match CLIMB-001 ...wait
  2749. put climb break
  2750. matchwait
  2751.  
  2752. PASS-001:
  2753. matcH pASS-001 ...wait
  2754. MATCH PASS-001x [
  2755. put NoRTH
  2756. MATCHWAIT
  2757.  
  2758. PASS-001x:
  2759. move gO gate
  2760. move WeST
  2761. move gO stair
  2762. move SoUTH
  2763. goto CLIMB-002
  2764.  
  2765. FAIL-001:
  2766. pause
  2767. goto CLIMB-002
  2768.  
  2769. CLIMB-002:
  2770. match PASS-002 [Northeast Wilds, Outside Northeast Gate]
  2771. match FAIL-002 You must be standing
  2772. match FAIL-002 steepness is intimidating
  2773. match FAIL-002 can't seem to find purchase
  2774. match FAIL-002 find it hard going.
  2775. match FAIL-002 your footing is questionable
  2776. match FAIL-002 slip after a few feet
  2777. match FAIL-002 A wave of dizziness hits you
  2778. match FAIL-002 Struck by vertigo
  2779. match CLIMB-002 ...wait
  2780. put ClIMB embrasure
  2781. matchwait
  2782.  
  2783. FAIL-002:
  2784. pause
  2785. matcH FAIL-002 ...wait
  2786. MATCH FAIL-002x [
  2787. put n
  2788. MATCHWAIT
  2789.  
  2790. FAIL-002x:
  2791. pause
  2792. move go stair
  2793. move e
  2794. move go gate
  2795.  
  2796. PASS-002:
  2797. matcH PAss-002 ...wait
  2798. MATCH PASS-002x [
  2799. put gO footpath
  2800. MATCHWAIT
  2801.  
  2802. PASS-002x:
  2803. goto CLIMB-01
  2804.  
  2805. CLIMB-01:
  2806. SAVE FAIL-01
  2807. match PASS-01 [Crossing, East Wall Battlements]
  2808. match FAIL-01 You must be standing
  2809. match FAIL-01 steepness is intimidating
  2810. match FAIL-01 can't seem to find purchase
  2811. match FAIL-01 find it hard going.
  2812. match FAIL-01 your footing is questionable
  2813. match FALLEN slip after a few feet
  2814. match FAIL-01 A wave of dizziness hits you
  2815. match FAIL-01 Struck by vertigo
  2816. match CLIMB-01 ...wait
  2817. put ClIMB town wall
  2818. matchwait
  2819.  
  2820. PASS-01:
  2821. matcH PASS-01 ...wait
  2822. MATCH PASS-01x [
  2823. put n
  2824. MATCHWAIT
  2825.  
  2826. PASS-01x:
  2827. move gO stair
  2828. move e
  2829. move gO gate
  2830. move gO footpath
  2831. goto FAIL-01
  2832.  
  2833. FAIL-01:
  2834. pause
  2835. matcH FAIL-01 ...wait
  2836. MATCH FAIL-01x [
  2837. put s
  2838. MATCHWAIT
  2839.  
  2840. FAIL-01x:
  2841. pause
  2842. move down
  2843. move s
  2844. move s
  2845. move sw
  2846. goto CLIMB-02
  2847.  
  2848. CLIMB-02:
  2849. SAVE FAIL-02
  2850. match PASS-02 [Crossing, East Wall Battlements]
  2851. match FAIL-02 You must be standing
  2852. match FAIL-02 steepness is intimidating
  2853. match FAIL-02 can't seem to find purchase
  2854. match FAIL-02 find it hard going.
  2855. match FAIL-02 your footing is questionable
  2856. match FALLEN slip after a few feet
  2857. match FAIL-02 A wave of dizziness hits you
  2858. match FAIL-02 Struck by vertigo
  2859. match CLIMB-02 ...wait
  2860. put ClIMB town wall
  2861. matchwait
  2862.  
  2863. PASS-02:
  2864. matcH PASS-02 ...wait
  2865. MATCH PASS-02x [
  2866. put s
  2867. MATCHWAIT
  2868.  
  2869. PASS-02x:
  2870. move gO stair
  2871. move gO gate
  2872. move gO bush
  2873. move n
  2874. goto CLIMB-03
  2875.  
  2876. FAIL-02:
  2877. pause
  2878. matcH FAIL-02 ...wait
  2879. MATCH FAIL-02x [
  2880. put s
  2881. MATCHWAIT
  2882.  
  2883. FAIL-02x:
  2884. pause
  2885. goto CLIMB-03
  2886.  
  2887. CLIMB-03:
  2888. SAVE FAIL-03
  2889. match PASS-03 [Crossing, East Wall Battlements]
  2890. match FAIL-03 You must be standing
  2891. match FAIL-03 steepness is intimidating
  2892. match FAIL-03 can't seem to find purchase
  2893. match FAIL-03 find it hard going.
  2894. match FAIL-03 your footing is questionable
  2895. match FALLEN slip after a few feet
  2896. match FAIL-03 A wave of dizziness hits you
  2897. match FAIL-03 Struck by vertigo
  2898. match CLIMB-03 ...wait
  2899. put ClIMB town wall
  2900. matchwait
  2901.  
  2902. PASS-03:
  2903. matcH PASS-03 ...wait
  2904. MATCH PASS-03x [
  2905. put s
  2906. MATCHWAIT
  2907.  
  2908. PASS-03x:
  2909. move gO stair
  2910. move gO gate
  2911. goto CLIMB-04
  2912.  
  2913. FAIL-03:
  2914. pause
  2915. matcH FAIL-03 ...wait
  2916. MATCH FAIL-03x [
  2917. put s
  2918. MATCHWAIT
  2919.  
  2920. FAIL-03x:
  2921. goto CLIMB-04
  2922.  
  2923. CLIMB-04:
  2924. SAVE FAIL-04
  2925. match PASS-03 [Crossing, East Wall Battlements]
  2926. match PASS-04 [Crossing, East Gate Battlements]
  2927. match FAIL-04 You must be standing
  2928. match FAIL-04 steepness is intimidating
  2929. match FAIL-04 can't seem to find purchase
  2930. match FAIL-04 find it hard going.
  2931. match FAIL-04 your footing is questionable
  2932. match FALLEN slip after a few feet
  2933. match FAIL-04 A wave of dizziness hits you
  2934. match FAIL-04 Struck by vertigo
  2935. match RETREAT closes to pole weapon range on you
  2936. match CLIMB-04 ...wait
  2937. put ClIMB town wall
  2938. matchwait
  2939.  
  2940. PASS-04:
  2941. pause
  2942. goto CLIMB-05
  2943.  
  2944. RETREAT:
  2945. pause
  2946. match RETREAT ...wait
  2947. match RETREAT Roundtime
  2948. match RETREAT back to pole range.
  2949. match FAIL-04 retreat from combat.
  2950. match FAIL-04 You are already as far away as you can get!
  2951. put retreat
  2952. matchwait
  2953.  
  2954. FAIL-04:
  2955. pause
  2956. put s
  2957. waitforre /(You go|You can't go)/
  2958. matcH FAil-04 ...wait
  2959. MATCH FAIL-04x [
  2960. put gO gate
  2961. MATCHWAIT
  2962.  
  2963. FAIL-04x:
  2964. pause
  2965. move gO stair
  2966. goto CLIMB-05
  2967.  
  2968. CLIMB-05:
  2969. SAVE FAIL-05
  2970. match PASS-05 [Eastern Tier, Outside Gate]
  2971. match FAIL-05 You must be standing
  2972. match FAIL-05 steepness is intimidating
  2973. match FAIL-05 can't seem to find purchase
  2974. match FAIL-05 find it hard going.
  2975. match FAIL-05 your footing is questionable
  2976. match FALLEN slip after a few feet
  2977. match FAIL-05 A wave of dizziness hits you
  2978. match FAIL-05 Struck by vertigo
  2979. match CLIMB-05 ...wait
  2980. put ClIMB embrasure
  2981. matchwait
  2982.  
  2983. PASS-05:
  2984. matcH PAss-05 ...wait
  2985. MATCH PASS-05x [
  2986. put gO gate
  2987. MATCHWAIT
  2988.  
  2989. PASS-05x:
  2990. move gO stair
  2991. FAIL-05:
  2992. matcH FAIL-05 ...wait
  2993. MATCH FAIL-05x [
  2994. put n
  2995. MATCHWAIT
  2996.  
  2997. FAIL-05x:
  2998. pause
  2999. goto CLIMB-06
  3000.  
  3001. CLIMB-06:
  3002. SAVE FAIL-06
  3003. match PASS-06 [Outside East Wall, Footpath]
  3004. match FAIL-06 You must be standing
  3005. match FAIL-06 steepness is intimidating
  3006. match FAIL-06 can't seem to find purchase
  3007. match FAIL-06 find it hard going.
  3008. match FAIL-06 your footing is questionable
  3009. match FALLEN slip after a few feet
  3010. match FAIL-06 A wave of dizziness hits you
  3011. match FAIL-06 Struck by vertigo
  3012. match CLIMB-06 ...wait
  3013. put ClIMB break
  3014. matchwait
  3015.  
  3016. PASS-06:
  3017. matcH PASS-06 ...wait
  3018. MATCH PASS-06x [
  3019. put s
  3020. MATCHWAIT
  3021.  
  3022. PASS-06x:
  3023. move gO gate
  3024. move gO stair
  3025. move n
  3026. goto CLIMB-07
  3027.  
  3028. FAIL-06:
  3029. pause
  3030. pause
  3031. goto CLIMB-07
  3032.  
  3033. CLIMB-07:
  3034. SAVE FAIL-07
  3035. match PASS-07 [Outside East Wall, Footpath]
  3036. match FAIL-07 You must be standing
  3037. match FAIL-07 steepness is intimidating
  3038. match FAIL-07 can't seem to find purchase
  3039. match FAIL-07 find it hard going.
  3040. match FAIL-07 your footing is questionable
  3041. match FALLEN slip after a few feet
  3042. match FAIL-07 A wave of dizziness hits you
  3043. match FAIL-07 Struck by vertigo
  3044. match CLIMB-07 ...wait
  3045. put ClIMB embrasure
  3046. matchwait
  3047.  
  3048. PASS-07:
  3049. matcH PASS-07 ...wait
  3050. MATCH PASS-07x [
  3051. put s
  3052. MATCHWAIT
  3053.  
  3054. PASS-07x:
  3055. move s
  3056. move gO gate
  3057. goto TRAVEL-08
  3058.  
  3059. FAIL-07:
  3060. pause
  3061. matcH FAIL-07 ...wait
  3062. MATCH FAIL-07x [
  3063. put s
  3064. MATCHWAIT
  3065.  
  3066. FAIL-07x:
  3067. pause
  3068. move gO stair
  3069. goto TRAVEL-08
  3070.  
  3071. TRAVEL-08:
  3072. move w
  3073. move w
  3074. move w
  3075. move w
  3076. move nw
  3077. move n
  3078. move n
  3079. move n
  3080. move n
  3081. move n
  3082. move n
  3083. move w
  3084. move w
  3085. move w
  3086. move w
  3087. move gO bridge
  3088. move w
  3089. move w
  3090. move w
  3091. move w
  3092. move gO stair
  3093. move s
  3094.  
  3095. CLIMB-08:
  3096. SAVE FAIL-08
  3097. match PASS-08 [Mycthengelde, Flatlands]
  3098. match FAIL-08 You must be standing
  3099. match FAIL-08 steepness is intimidating
  3100. match FAIL-08 can't seem to find purchase
  3101. match FAIL-08 find it hard going.
  3102. match FAIL-08 your footing is questionable
  3103. match FALLEN slip after a few feet
  3104. match FAIL-08 A wave of dizziness hits you
  3105. match FAIL-08 Struck by vertigo
  3106. match CLIMB-08 ...wait
  3107. put ClIMB embrasure
  3108. matchwait
  3109.  
  3110. PASS-08:
  3111. pause
  3112. goto CLIMB-09
  3113.  
  3114. FAIL-08:
  3115. pause
  3116. matcH FAIL-08 ...wait
  3117. MATCH FAIL-08x [
  3118. put n
  3119. MATCHWAIT
  3120.  
  3121. FAIL-08x:
  3122. pause
  3123. move go stair
  3124. move go gate
  3125. move nw
  3126. goto CLIMB-09
  3127.  
  3128. CLIMB-09:
  3129. SAVE FAIL-09
  3130. match PASS-09 [Crossing, West Wall Battlements]
  3131. match FAIL-09 You must be standing
  3132. match FAIL-09 steepness is intimidating
  3133. match FAIL-09 can't seem to find purchase
  3134. match FAIL-09 find it hard going.
  3135. match FAIL-09 your footing is questionable
  3136. match FALLEN slip after a few feet
  3137. match FAIL-09 A wave of dizziness hits you
  3138. match FAIL-09 Struck by vertigo
  3139. match CLIMB-09 ...wait
  3140. put ClIMB town wall
  3141. matchwait
  3142.  
  3143. PASS-09:
  3144. matcH PASS-09 ...wait
  3145. MATCH PASS-09x [
  3146. put n
  3147. MATCHWAIT
  3148.  
  3149. PASS-09x:
  3150. goto CLIMB-10
  3151.  
  3152. FAIL-09:
  3153. pause
  3154. matcH fAIL-09 ...wait
  3155. MATCH FAIL-09x [
  3156. put se
  3157. MATCHWAIT
  3158.  
  3159. FAIL-09x:
  3160. pause
  3161. move gO gate
  3162. move gO stair
  3163. goto CLIMB-10
  3164.  
  3165. CLIMB-10:
  3166. SAVE FAIL-10
  3167. match PASS-10 [Mycthengelde, Flatlands]
  3168. match FAIL-10 You must be standing
  3169. match FAIL-10 steepness is intimidating
  3170. match FAIL-10 can't seem to find purchase
  3171. match FAIL-10 find it hard going.
  3172. match FAIL-10 your footing is questionable
  3173. match FALLEN slip after a few feet
  3174. match FAIL-10 A wave of dizziness hits you
  3175. match FAIL-10 Struck by vertigo
  3176. match CLIMB-10 ...wait
  3177. put ClIMB embrasure
  3178. matchwait
  3179.  
  3180. PASS-10:
  3181. matcH PAss-10 ...wait
  3182. MATCH PASS-10x [
  3183. put gO gate
  3184. MATCHWAIT
  3185.  
  3186. PASS-10x:
  3187. move gO stair
  3188.  
  3189. FAIL-10:
  3190. pause
  3191. matcH FAIL-10 ...wait
  3192. MATCH FAIL-10x [
  3193. put e
  3194. MATCHWAIT
  3195.  
  3196. FAIL-10x:
  3197. pause
  3198. goto CLIMB-11
  3199.  
  3200. CLIMB-11:
  3201. SAVE FAIL-11
  3202. match PASS-11 [Northwall Trail, Wooded Grove]
  3203. match FAIL-11 You must be standing
  3204. match FAIL-11 steepness is intimidating
  3205. match FAIL-11 can't seem to find purchase
  3206. match FAIL-11 find it hard going.
  3207. match FAIL-11 your footing is questionable
  3208. match FALLEN slip after a few feet
  3209. match FAIL-11 A wave of dizziness hits you
  3210. match FAIL-11 Struck by vertigo
  3211. match CLIMB-11 ...wait
  3212. put ClIMB break
  3213. matchwait
  3214.  
  3215. PASS-11:
  3216. matcH PASS-11 ...wait
  3217. MATCH PASS-11x [
  3218. put s
  3219. MATCHWAIT
  3220.  
  3221. PASS-11x:
  3222. move gO gate
  3223. move gO stair
  3224. move e
  3225. goto CLIMB-12
  3226.  
  3227. FAIL-11:
  3228. pause
  3229. goto CLIMB-12
  3230.  
  3231. CLIMB-12:
  3232. SAVE FAIL-12
  3233. match PASS-12 [Northwall Trail, Wooded Grove]
  3234. match FAIL-12 You must be standing
  3235. match FAIL-12 steepness is intimidating
  3236. match FAIL-12 can't seem to find purchase
  3237. match FAIL-12 find it hard going.
  3238. match FAIL-12 your footing is questionable
  3239. match FALLEN slip after a few feet
  3240. match FAIL-12 A wave of dizziness hits you
  3241. match FAIL-12 Struck by vertigo
  3242. match CLIMB-12 ...wait
  3243. put ClIMB embrasure
  3244. matchwait
  3245.  
  3246. PASS-12:
  3247. pause
  3248. goto CLIMB-13
  3249.  
  3250. FAIL-12:
  3251. pause
  3252. matcH FAIL-12 ...wait
  3253. MATCH FAIL-12x [
  3254. put w
  3255. MATCHWAIT
  3256.  
  3257. FAIL-12x:
  3258. pause
  3259. move gO stair
  3260. move gO gate
  3261. move gO trail
  3262. move ne
  3263. goto CLIMB-13
  3264.  
  3265. CLIMB-13:
  3266. SAVE FAIL-13
  3267. match PASS-13 [Crossing, North Wall Battlements]
  3268. match FAIL-13 You must be standing
  3269. match FAIL-13 steepness is intimidating
  3270. match FAIL-13 can't seem to find purchase
  3271. match FAIL-13 find it hard going.
  3272. match FAIL-13 your footing is questionable
  3273. match FALLEN slip after a few feet
  3274. match FAIL-13 A wave of dizziness hits you
  3275. match FAIL-13 Struck by vertigo
  3276. match CLIMB-13 ...wait
  3277. put ClIMB town wall
  3278. matchwait
  3279.  
  3280. PASS-13:
  3281. matcH PASS-13 ...wait
  3282. MATCH PASS-13x [
  3283. put w
  3284. MATCHWAIT
  3285.  
  3286. PASS-13x:
  3287. move gO stair
  3288. move gO gate
  3289. move gO trail
  3290. goto CLIMB-14
  3291.  
  3292. FAIL-13:
  3293. pause
  3294. matcH fAIL-13 ...wait
  3295. MATCH FAIL-13x [
  3296. put sw
  3297. MATCHWAIT
  3298.  
  3299. FAIL-13x:
  3300. pause
  3301. goto CLIMB-14
  3302.  
  3303. CLIMB-14:
  3304. SAVE FAIL-14
  3305. match PASS-14 [Crossing, North Wall Battlements]
  3306. match FAIL-14 You must be standing
  3307. match FAIL-14 steepness is intimidating
  3308. match FAIL-14 can't seem to find purchase
  3309. match FAIL-14 find it hard going.
  3310. match FAIL-14 your footing is questionable
  3311. match FALLEN slip after a few feet
  3312. match FAIL-14 A wave of dizziness hits you
  3313. match FAIL-14 Struck by vertigo
  3314. match CLIMB-14 ...wait
  3315. put ClIMB town wall
  3316. matchwait
  3317.  
  3318. PASS-14:
  3319. matcH PASS-14 ...wait
  3320. MATCH PASS-14x [
  3321. put w
  3322. MATCHWAIT
  3323.  
  3324. PASS-14x:
  3325. move gO stair
  3326. move gO gate
  3327. goto CLIMB-15
  3328.  
  3329. FAIL-14:
  3330. pause
  3331. matcH FAIL-14 ...wait
  3332. MATCH FAIL-14x [
  3333. put s
  3334. MATCHWAIT
  3335.  
  3336. FAIL-14x:
  3337. goto CLIMB-15
  3338.  
  3339. CLIMB-15:
  3340. SAVE FAIL-15
  3341. match PASS-15 [Crossing, West Gate Battlements]
  3342. match FAIL-15 You must be standing
  3343. match FAIL-15 steepness is intimidating
  3344. match FAIL-15 can't seem to find purchase
  3345. match FAIL-15 find it hard going.
  3346. match FAIL-15 your footing is questionable
  3347. match FALLEN slip after a few feet
  3348. match FAIL-15 A wave of dizziness hits you
  3349. match FAIL-15 Struck by vertigo
  3350. match CLIMB-15 ...wait
  3351. put ClIMB town wall
  3352. matchwait
  3353.  
  3354. PASS-15:
  3355. matcH PASS-15 ...wait
  3356. MATCH PASS-15x [
  3357. put gO stair
  3358. MATCHWAIT
  3359.  
  3360. PASS-15x:
  3361. goto TRAVEL-15
  3362.  
  3363. FAIL-15:
  3364. pause
  3365. matcH FAil-15 ...wait
  3366. MATCH FAIL-15x [
  3367. put gO gate
  3368. MATCHWAIT
  3369.  
  3370. FAIL-15x:
  3371. pause
  3372. goto TRAVEL-15
  3373.  
  3374. TRAVEL-15:
  3375. move e
  3376. move e
  3377. move e
  3378. move e
  3379. move e
  3380. move e
  3381. move e
  3382. move e
  3383. move e
  3384. move s
  3385. move s
  3386. move s
  3387. move s
  3388. move s
  3389. move s
  3390. move se
  3391. pause
  3392. match climb EXP HELP
  3393. match quit mind lock
  3394. match quit nearly locked
  3395. match quit enthralled
  3396. put sk ath
  3397. matchwait
  3398.  
  3399. ######################
  3400. FALLEN:
  3401. pause
  3402. match STOOD You stand
  3403. match STOOD You are already standing
  3404. match FALLEN cannot manage to stand.
  3405. match FALLEN The weight of all your possessions
  3406. match FALLEN ...wait
  3407. put StAND
  3408. matchwait
  3409.  
  3410. STOOD:
  3411. goto %s
  3412.  
  3413. QUIT:
  3414. pause
  3415. goto start
  3416.  
  3417. Thief:
  3418. send khri check
  3419. pause 1
  3420. send sit
  3421. pause 0.5
  3422. send khri delay Plunder
  3423. pause 10
  3424. send khri delay Darken
  3425. pause 10
  3426. send khri delay Hasten
  3427. pause 10
  3428. send khri delay Focus
  3429. pause 10
  3430. send khri delay Prowess
  3431. pause 10
  3432. send khri medit
  3433. pause 10
  3434. send khri medit
  3435. pause 10
  3436. send khri medit
  3437. pause 10
  3438. send khri medit
  3439. pause 10
  3440. send khri medit
  3441. pause 10
  3442. send khri medit
  3443. pause 10
  3444. send khri medit
  3445. pause 10
  3446. send khri medit
  3447. pause 10
  3448. send khri medit
  3449. pause 10
  3450. send stand
  3451. pause 1
  3452.  
  3453. if ($Athletics.LearningRate < 20) then {
  3454. gosub Climb
  3455. }
  3456.  
  3457. pause 1
  3458. if ($Outdoorsmanship.LearningRate < 20) then {
  3459. gosub collect
  3460. }
  3461.  
  3462. pause 1
  3463. if ($Mechanical_Lore.LearningRate < 18) then {
  3464. gosub BBRAID
  3465. }
  3466.  
  3467. pause 1
  3468. if ($Performance.LearningRate < 20) then {
  3469. gosub play
  3470. }
  3471.  
  3472. goto start
  3473.  
  3474. CRUSH:
  3475. pause 0.5
  3476. gosub clear
  3477. pause 0.5
  3478. send get my mort
  3479. pause 0.5
  3480. goto forage1
  3481.  
  3482. forage1:
  3483. pause 1
  3484. gosub clear
  3485. pause 1
  3486. #if ($Outdoorsmanship.LearningRate < 20) then {
  3487. # gosub crush1
  3488. #}
  3489. #
  3490. #pause 1
  3491. #if ($Outdoorsmanship.LearningRate > 30) then {
  3492. # gosub start
  3493. #}
  3494.  
  3495. pause 1
  3496. goto crush1
  3497.  
  3498.  
  3499. CRUSH1:
  3500. match loadmort You manage to find some blue flowers
  3501. match forage1 Roundtime
  3502. send forage blue flower
  3503. matchwait
  3504.  
  3505.  
  3506. loadmort:
  3507. send put my blue flower in my mort
  3508. pause 1
  3509. send get my pes
  3510. pause 1
  3511. goto crush2
  3512.  
  3513. CRUSH2:
  3514. pause 1
  3515. match unload You stop, realizing that type of plant
  3516. match unload You complete crushing
  3517. match crush2 Roundtime
  3518. send crush my blue flower with my pes
  3519. matchwait
  3520.  
  3521. UNLOAD:
  3522. pause 1
  3523. send stow pestle
  3524. pause 1
  3525. send get flow from my mort
  3526. pause 1
  3527. send put my flow in bin
  3528. pause 1
  3529. send drop my flower
  3530. pause 1
  3531. send dump junk
  3532. pause 1
  3533. send app my gem pouch
  3534. pause 1
  3535.  
  3536. if ($Alchemy.LearningRate > 30) then {
  3537. gosub alchDone
  3538. }
  3539.  
  3540. pause 1
  3541. if ($Alchemy.LearningRate < 30) then {
  3542. gosub forage1
  3543. }
  3544.  
  3545. alchDONE:
  3546. send get my flower from mort
  3547. pause 0.5
  3548. send put my flower in bin
  3549. pause 0.5
  3550. send stow my mort
  3551. pause 1
  3552. goto start
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
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!