Don't like ads? PRO users don't see any ads ;-)
Public Pastes
Guest

Untitled

By: a guest on Aug 8th, 2012  |  syntax: None  |  size: 22.99 KB  |  hits: 6  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. debuglevel 10
  2. top1:
  3. var CONTAINER bag
  4. var boxtype brass|copper|deobar|driftwood|iron|ironwood|mahogany|oaken|pine|steel|wooden
  5. var boxes coffer|crate|strongbox|caddy|casket|skippet|trunk|chest|\bbox
  6. #LEave variable customer blank
  7. var Customer
  8. var hum hymn
  9. var lockpick.ring ON
  10. var pickstorage ring
  11. var khri1 safe
  12. var khri2 sight
  13. var khri3 hasten
  14. var bin bucket
  15. var container1 bag
  16. var container2 bag
  17. var disarmit coffer
  18. var noncustomer
  19.  
  20. ## Script actions
  21. action put #queue clear; send $lastcommand when ^\.\.\.wait|^Sorry, you may only type
  22. action var multi_trap ON when is not yet fully disarmed
  23. action var multi_lock ON when discover another lock protecting
  24. action goto BLOWN.TRAP when but end up getting caught in an invisible box|A black cloud of ash and soot explodes out of the bladder
  25. action goto BLOWN.TRAP when With a sinister swishing noise, a deadly sharp scythe blade
  26. action goto BLOWN.TRAP when ^A tiny dart lodges into your skull
  27. action goto BLOWN.TRAP when ^You are diseased
  28. action goto BLOWN.TRAP when Almost immediately, you grow dizzy
  29. action goto BLOWN.TRAP when you realize it was actually a swarm of fleas|You notice a single flea leap off of your|Something tickles under your arm
  30. action goto BLOWN.TRAP when You fall to your knees coughing and gagging|inhale all of the poisonous gas yourself
  31. action goto BLOWN.TRAP when You get the feeling that life suddenly got alot funnier
  32. action goto BLOWN.TRAP when you notice the world around you has gotten much bigger
  33. action goto BLOWN.TRAP when emits a sound like tormented souls being freed
  34. action goto BLOWN.TRAP when You try to scream but no sound
  35. action goto BLOWN.TRAP when A stream of corrosive acid sprays out
  36. action goto BLOWN.TRAP when An acrid stream of sulfurous air
  37. action goto BLOWN.TRAP when With a barely audible click
  38. action goto BLOWN.TRAP when There is a sudden flash of greenish light
  39. action goto BLOWN.TRAP when You hear a snap as a bronze seal
  40. action goto BLOWN.TRAP when ^Nothing happened. Maybe it was a dud|begins to shake violently
  41. action goto BLOWN.TRAP when Just as your ears register the sound of a sharp snap
  42. action goto BLOWN.TRAP when You make a small hole in the side of the box and take deep breath
  43. action goto BLOWN.TRAP when Moving with the grace of a pregnant goat
  44. action goto BLOWN.TRAP when You barely have time to register a faint click before a blinding flash explodes|The liquid contents of the bladder empty, spraying you completely
  45. action goto BLOWN.TRAP when Before you have time to think what it might be you find
  46. action goto TELEPORT_OK when You experience a great wrenching in your gut and everything goes utterly black
  47. action goto TELEPORT_BAD when Your last painful thought before you die is the horrified realization
  48.  
  49. pause 0.5
  50. put exp survival 0
  51. waitfor Overall state of mind
  52. if ($Disarm_Traps.Ranks >= 15) then
  53. {
  54. action var base_difficulty -6 when is a trivially constructed
  55. action var base_difficulty -5 when is a laughable matter
  56. action var base_difficulty -4 when An aged grandmother could
  57. action var base_difficulty -3 when will be a simple matter for you to
  58. action var base_difficulty -2 when should not take long with your skills
  59. action var base_difficulty 0 when is precisely at your skill level
  60. action var base_difficulty 2 when with only minor troubles
  61. action var base_difficulty 2 when got a good shot at
  62. action var base_difficulty 4 when some chance of being able
  63. action var base_difficulty 5 when with persistence you believe you could
  64. action var base_difficulty 5 when would be a longshot
  65. action var base_difficulty 5 when minimal chance
  66. action var base_difficulty 6 when You really don't have any chance
  67. action var base_difficulty 8 when Prayer would be a good start
  68. action var base_difficulty 9 when You could just jump off a cliff
  69. action var base_difficulty 10 when same shot as a snowball
  70. action var base_difficulty 11 when pitiful snowball encased in the Flames
  71. var mode
  72. } else
  73. {
  74.         var mode careful
  75. }
  76.  
  77. gosub thief.actions.on
  78. Waitloop:
  79. pause 60
  80. goto Waitloop
  81.  
  82. thief.actions.on:
  83. put .swap
  84. put store boxes in my bag
  85. pause 0.1
  86. pause 0.1
  87. action setvariable Customer $1 when ^(\S+) nods to you
  88. Action send whisper $1 Give me your boxes, Nod to me then I will pop the boxes and return them, 10 boxes maximum per picking session please when (\S+) just arrived.
  89. action goto Pick_Box when nods to you
  90. action put accept;put stow right when offers you a (\w+)
  91. action put accept;put stow right when offers you an (\w+)
  92. action goto Waitloop when offers you
  93. pause 1
  94. return
  95.  
  96. ####################
  97. # pick boxes time  #
  98. ####################
  99.  
  100. Pick_Box:
  101. pause 0.1
  102. pause 0.1
  103. action remove ^(\S+) nods to you
  104. action remove (\S+) just arrived.
  105. action remove nods to you
  106. action remove offers you a (\w+)
  107. action remove offers you an (\w+)
  108. action remove offers you
  109. put #script abort swap
  110. action put decline;put whisper $1 Wait your turn please. when (\w+) offers you a (\w+)
  111. put whisper %Customer I'll hand you back each box once they are harmless. Please dont wander off.
  112. goto DISARM.START        
  113.  
  114. top:
  115. DISARM.START:
  116. goto boxes2
  117.  
  118. boxes:
  119. boxes_start:
  120. gosub container_Check1
  121. pause 0.1
  122. pause 0.1
  123. matchre boxes \.\.\.wait|type ahead
  124. matchre boxes2 you get a|need a free hand|from inside your
  125. match boxes2 you get a|need a free hand|from inside your
  126. matchre Xboxes I could not find|what were you referring to
  127. put get %disarmit from my %CONTAINER
  128. matchwait 10
  129. goto boxes2
  130.  
  131. boxes2:
  132. pause 0.1
  133. put swap
  134. pause 0.1
  135. put glance
  136. pause .1
  137. pause .1
  138. if "$lefthandnoun" = "%disarmit" then goto disarm.boxes
  139. if "$righthandnoun" = "%disarmit" then goto swap.disarm
  140. if (("$lefthand" = "Empty") && ("$righthand" = "Empty")) then goto boxes_start
  141. goto done
  142.  
  143. swap.disarm:
  144. put swap
  145. pause .3
  146. goto disarm.boxes
  147.  
  148. xboxes:
  149. pause 0.1
  150. pause 0.1
  151. if contains("$righthand", "%disarmit") then goto boxes2
  152. if contains("$lefthand", "%disarmit") then put swap
  153. if contains("$lefthand", "%disarmit") then goto boxes2
  154. goto disarm.boxes
  155.  
  156. disarm.boxes:
  157. disarm_sub:
  158.         if $concentration > 80 then put khri start %khri1 %khri2 %khri3
  159.         pause
  160.         pause 0.5
  161.                 put hum %hum
  162.                 gosub disarm_ID
  163.                 if ("%mode" = "toss") then goto toss_box
  164.                 gosub disarm
  165.                 if "%multi_trap" = "ON" then goto disarm_sub
  166.         lock_sub:
  167.                 gosub pick_ID
  168.                 if ("%mode" = "toss") then goto toss_box
  169.                 gosub pick
  170.                 if "%multi_lock" = "ON" then goto lock_sub
  171.                 if ("%lockpick.ring" = "OFF") then gosub put_Away_Pick
  172.         gosub give.box
  173.         gosub fix_Lock
  174.         gosub exp_Check
  175.         goto DISARM.START
  176.  
  177. give.box:
  178. if ("$righthand" = "Empty") then
  179.         {
  180.                 put swap
  181.                 pause 1
  182.         }
  183.         else
  184.         put whisper %Customer Here's ur box back If you don't accept I will drop it.
  185.         matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  186.         match return accepted your offer
  187.         put give %Customer
  188.         matchwait 10
  189.         matchre PAUSE ^\.\.\.wait|^Sorry, you may only type    
  190.         match DISARM.START You drop
  191.         put drop my %disarmit
  192.         put whisper %Customer To Fuckin slow.
  193. matchwait 10
  194. goto give.box
  195.        
  196.  
  197. toss_Box:
  198.         var LAST toss_Box
  199.                 put whisper %Customer This box will kill me. If you didn't accept in time, i'll drop your box.
  200.                 matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  201.                 match DISARM.START accepted your offer 
  202.                 match DISARM.START You drop
  203.         put offer %Customer
  204.         matchwait 10
  205.         matchre PAUSE ^\.\.\.wait|^Sorry, you may only type    
  206.         match DISARM.START You drop
  207.         put drop my %disarmit
  208.         put whisper %Customer To Fuckin slow.
  209.         matchwait 10
  210.         goto DISARM.START
  211.  
  212. container_Check1:
  213.                 matchre get_For_Disarm (coffer|trunk|chest|strongbox|skippet|caddy|crate|casket|box)
  214.                 match container_Check2 Encumbrance
  215.         put look in my %container1;enc
  216.         matchwait
  217.  
  218. container_Check2:
  219.                 matchre get_For_Disarm (coffer|trunk|chest|strongbox|skippet|caddy|crate|casket|box)
  220.                 match done Encumbrance
  221.         put look in my %container2;enc
  222.         matchwait
  223.        
  224. get_For_Disarm:
  225.         var disarmit $1
  226.         get_Box:
  227.                 var LAST get_Box
  228.                         matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  229.                         matchre return You get|You are already|You stow|You put
  230.                         matchre container_Check1 ^What were you
  231.                 put get my %disarmit
  232.                 pause .2
  233.                 put stow my %disarmit
  234.                 matchwait
  235.  
  236. pick_ID:
  237.         if ("$righthand" = "Empty") && ("%lockpick.ring" = "OFF") then gosub get_Pick
  238.         var LAST pick_ID
  239.                 matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  240.                 matchre disarm_ERROR is not fully disarmed
  241.                 matchre pick_ID fails to teach you anything about the lock guarding it|just broke
  242.                 matchre return Somebody has already|not even locked|Roundtime
  243.                 match get_Pick Find a more appropriate tool
  244.         put pick ID
  245.         matchwait
  246.  
  247. pick:
  248.         var LAST pick
  249.         var multi_lock OFF
  250.                 matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  251.                 matchre pick_Cont Roundtime|has already helpfully been analyzed|not even locked
  252.         put pick anal
  253.         matchwait
  254.  
  255. pick_Cont:
  256.         if ("$righthand" = "Empty") && ("%lockpick.ring" = "OFF") then gosub get_Pick
  257.         var LAST pick_Cont
  258.                 matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  259.                 match pick_cont You are unable to make
  260.                 matchre return With a soft click|not even locked|Roundtime
  261.         put pick %mode
  262.         matchwait
  263.  
  264. thief.actions.off:
  265. pause 0.1
  266. pause 0.1
  267. action remove .*Chatter[\S+]\s+%boat.name (%boat.locations)/i|.*Chatter[\S+]\s+%boat.name report/i|.*Chatter[\S+]\s+%boat.name reset/i
  268. action remove nods to you
  269. action remove offers you a (\w+) gem pouch
  270. action remove offers you an (\w+) gem pouch
  271. action remove offers you
  272. pause 1
  273. return
  274.  
  275. disarm:
  276.         var multi_trap OFF
  277. disarmIt_Cont:
  278.         var LAST disarmIt_Cont
  279.                 matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  280.                 matchre return You are certain the %disarmit is not trapped|Roundtime|You guess it is already disarmed|DISARM HELP for syntax help
  281.                 matchre disarmIt_Cont fumbling fails to disarm|This is not likely to be a good thing|unable to make any progress
  282.         put disarm my %disarmit %mode
  283.         matchwait
  284.  
  285. disarm_ID:
  286.         if "%base_difficulty" > "4" then goto toss.box
  287.         gosub TRAP_TYPE
  288.         var LAST disarm_ID
  289.         matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  290.         match weapon knuckles
  291.         match disarm_ID fails to reveal to you
  292.         matchre trap_diff_compute You guess it is already disarmed|Surely any fool|Even your memory can not be that short|Roundtime|Somebody has already located
  293.         #matchre return coffer|trunk|chest|strongbox|skippet|caddy|crate|casket|box
  294.         put disarm ID
  295.         matchwait
  296. pause:
  297.         pause
  298.         goto %LAST
  299.  
  300. weapon:
  301.         var LAST weapon
  302.                 matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  303.                 match stow_Weapon You
  304.     put remove knuckles
  305.         matchwait
  306.         stow_Weapon:
  307.         var LAST stow_Weapon
  308.                 matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  309.                 match disarm_ID You
  310.                 match stow_Weapon2 There isn't any more room
  311.         put put my knuckles in my sack
  312.         matchwait
  313.         stow_Weapon2:
  314.         var LAST stow_Weapon2
  315.                 matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  316.                 match disarm_ID You
  317.         put stow knuckles in bac
  318.         matchwait
  319.        
  320. #########################################
  321. #  TRAPS BLOWN !!!
  322. #########################################
  323.  
  324. BOUNCER.TRAP:
  325. echo
  326. echo *** BLEW A BOUNCER TRAP! FUCK IT.. LET IT GO...
  327. echo
  328. pause 5
  329. gosub stow
  330. goto top
  331.  
  332. MANA.TRAP:
  333. echo
  334. echo *** BLEW A MANA ZAPPER TRAP - NOTHING TO WORRY ABOUT
  335. echo
  336. pause 5
  337. gosub stow
  338. goto top
  339.  
  340. MIME.TRAP:
  341. echo
  342. echo *** BLEW A MIME TRAP!
  343. echo *** WAITING FOR IT TO WEAR OFF...
  344. echo
  345. waitfor You suddenly feel nauseous
  346. gosub stow
  347. goto top
  348.  
  349. CURSE.TRAP:
  350. echo
  351. echo *** BLEW A CURSE TRAP!
  352. echo *** WAITING FOR IT TO WEAR OFF
  353. echo *** OR FIND A CLERIC TO UNCURSE!
  354. echo
  355. pause
  356. put 'eep! cursed
  357. waitfor The eerie black radiance fades
  358. gosub stow
  359. goto top
  360.  
  361. FROG.TRAP:
  362. echo
  363. echo *** BLEW A FROG TRAP!
  364. echo *** NEED TO GET KISSED OR JUST WAIT IT OUT!
  365. echo
  366. pause 2
  367. put 'Help.. I'm a frog!
  368. waitfor puff of green smoke
  369. goto top
  370.  
  371. SLEEPER.TRAP:
  372. echo
  373. echo *** BLEW A SLEEPER TRAP!
  374. echo *** WAKING UP - DON'T TYPE ANYTHING!
  375. echo
  376. pause
  377. put wake
  378. pause 35
  379. put stand
  380. wait
  381. goto top
  382.  
  383. LAUGHING.TRAP:
  384. echo
  385. echo *** BLEW A LAUGHING GAS TRAP!
  386. echo *** PAUSING...
  387. echo
  388. pause 75
  389. put stand
  390. put dance
  391. pause
  392. goto top
  393.  
  394. SHADOWLING.TRAP:
  395. echo
  396. echo *** BLEW A SHADOWLING TRAP
  397. echo *** YOU'RE SPEAKING SHADOWLING FOR A FEW MINUTES
  398. echo *** GOING BACK TO BUSINESS AS USUAL..
  399. echo
  400. pause 5
  401. gosub stow
  402. goto top
  403.  
  404.  
  405. BLOWN.TRAP.PAUSE:
  406. pause 25
  407. BLOWN.TRAP:
  408. pause 0.5
  409. pause 0.5
  410. pause 0.5
  411. if $stunned = 1 then goto blown.trap.pause
  412. put #echo >Log Red ** Blew a %trap_type trap!
  413. echo
  414. echo *** Blew up a %trap_type trap!!
  415. echo *** Attempting to get healed/fix the situation...
  416. echo
  417. pause
  418. if %trap_type = "acid" then goto ACID.WAIT
  419. if %trap_type = "cyanide" then goto DART.TRAP
  420. if %trap_type = "bolt" then goto BOLT.TRAP
  421. if %trap_type = "poison_bolt" then goto BOLT.TRAP
  422. if %trap_type = "flea" then goto FLEA.TRAP
  423. if %trap_type = "bouncer" then goto BOUNCER.TRAP
  424. if %trap_type = "curse" then goto CURSE.TRAP
  425. if %trap_type = "frog" then goto FROG.TRAP
  426. if %trap_type = "laughing" then goto LAUGHING.TRAP
  427. if %trap_type = "mana_sucker" then goto MANA.TRAP
  428. if %trap_type = "mime" then goto MIME.TRAP
  429. if %trap_type = "shadowling" then goto SHADOWLING.TRAP
  430. if %trap_type = "sleeper" then goto SLEEPER.TRAP
  431. if %trap_type = "boomer" then goto EMPATH.HEAL
  432. if %trap_type = "reaper" then goto EMPATH.HEAL
  433. if %trap_type = "concussion" then goto EMPATH.HEAL
  434. if %trap_type = "disease" then goto EMPATH.HEAL
  435. if %trap_type = "gas" then goto EMPATH.HEAL
  436. if %trap_type = "lightening" then goto EMPATH.HEAL
  437. if %trap_type = "naphtha_soaker" then goto EMPATH.HEAL
  438. if %trap_type = "naphtha" then goto EMPATH.HEAL
  439. if %trap_type = "poison_local" then goto EMPATH.HEAL
  440. if %trap_type = "poison_nerve" then goto EMPATH.HEAL
  441. if %trap_type = "scythe" then goto EMPATH.HEAL
  442. if %trap_type = "shocker" then goto EMPATH.HEAL
  443. if %trap_type = "shrapnel" then goto EMPATH.HEAL
  444. goto EMPATH.HEAL
  445.  
  446. BOLT.TRAP:
  447. pause 0.2
  448. put drop bolt
  449. gosub stow
  450. pause
  451. matchre TEND.HEAD your head
  452. matchre TEND.CHEST your chest
  453. matchre TEND.LEG your left leg|your right leg
  454. matchre TEND.ARM your left arm|your right arm
  455. matchre BOLT.CONT Encumbrance
  456. put heal;enc
  457. matchwait
  458. TEND.LEG:
  459. put tend my right leg
  460. pause
  461. send tend my left leg
  462. pause
  463. goto BOLT.TRAP
  464. TEND.ARM:
  465. send tend my right arm
  466. pause
  467. send tend my left arm
  468. pause
  469. goto BOLT.TRAP
  470. TEND.CHEST:
  471. send tend my chest
  472. pause
  473. goto BOLT.TRAP
  474. TEND.HEAD:
  475. send tend my head
  476. pause
  477. goto BOLT.TRAP
  478. BOLT.CONT:
  479. put drop bolt
  480. goto EMPATH.HEAL
  481.  
  482.  
  483. DART.TRAP:
  484. pause 0.2
  485. var cyanide ON
  486. echo
  487. echo *** BLEW A CYANIDE TRAP
  488. echo
  489. pause
  490. gosub stow
  491. pause .5
  492. put tend my head
  493. pause
  494. pause
  495. put drop dart
  496. pause
  497. goto EMPATH.HEAL.DELAY
  498.  
  499. ACID.TRAP:
  500. pause 0.2
  501. var ACID.TRAP ON
  502. echo
  503. echo *** WAITING FOR THE ACID TO TAKE EFFECT THEN GETTING HEALED!
  504. echo
  505. pause
  506. goto EMPATH.HEAL.DELAY
  507.  
  508. CYANIDE.PAUSE:
  509. echo Waiting for cyanide to wear off....
  510. pause 100
  511. var cyanide OFF
  512. goto EMPATH.LEAN
  513.  
  514. ACID.PAUSE:
  515. pause 40
  516. var acid.trap OFF
  517. goto EMPATH.LEAN
  518.  
  519. HEAL.DELAY:
  520. pause 10
  521. EMPATH.HEAL.DELAY:
  522. pause
  523. echo
  524. echo *** ATTEMPTING TO GET HEALED...
  525. echo
  526. if $stunned = 1 then goto HEAL.DELAY
  527. gosub stow
  528. pause 30
  529. if "%acid.trap" = "ON" then goto ACID.PAUSE
  530. goto EMPATH.LEAN
  531.  
  532. DELAY1:
  533. pause 5
  534. EMPATH.HEAL:
  535. echo
  536. echo *** ATTEMPTING TO GET HEALED...
  537. echo
  538. if $stunned = 1 then goto DELAY1
  539. gosub stow
  540. goto EMPATH.LEAN
  541.  
  542. EMPATH.LEAN:
  543. put lean saw
  544. wait 5
  545. put lean tim
  546. waitforre all healed|All clean|You are healed|nods to you
  547. pause 0.5
  548. if "%cyanide" = "ON" then goto CYANIDE.PAUSE
  549. if $standing = 0 then put stand
  550. pause 0.2
  551. gosub stow
  552. put #echo >Log Pink ** Got healed!
  553. goto top
  554.  
  555. FLEA.TRAP:
  556. action goto FLEA.LEAVE when The water washes away the fleas
  557. echo
  558. echo *** BLEW A FLEA TRAP!
  559. echo *** RUNNING FOR WATER!
  560. echo
  561. pause 0.5
  562. gosub stow
  563. put #goto 6
  564. pause .6
  565. put go door
  566. pause 2
  567. put #goto move 228
  568. pause .5
  569. put #goto move 3
  570. pause .5
  571. pause 30
  572. FLEA.LEAVE:
  573. action remove The water washes away the fleas
  574. put #goto 1
  575. pause .5
  576. put #goto arch
  577. pause .5
  578. put #goto 9
  579. pause .5
  580. goto top
  581.  
  582.  
  583. TELEPORT.OK:
  584. pause
  585. put #echo >Log Red ** Blew a teleport trap and lived!!!!
  586. echo
  587. echo *** BLEW A TELEPORT TRAP AND LIVED!!!! ENDING SCRIPT...
  588. echo
  589. pause
  590. pause
  591. put #script abort
  592. put .alert
  593. goto top
  594.  
  595. TELEPORT.BAD:
  596. put #echo >Log Red ** Blew a bad teleport trap and died!!!!111
  597. echo
  598. echo *** BLEW A TELEPORT TRAP AND DIED!!!! LOGGING OUT...
  599. echo
  600. put quit
  601. put exit
  602. pause .5
  603. put quit
  604. pause .5
  605. put #script abort
  606. put .alert
  607. exit
  608.  
  609. trap_diff_compute:
  610. # setting trap difficulties...
  611. # set -5 to 5 depending on how worried you are about blowing that particular trap
  612. if "%trap_type" = "acid" then var trap_difficulty 1
  613. if "%trap_type" = "boomer" then var trap_difficulty 3
  614. if "%trap_type" = "reaper" then var trap_difficulty 5
  615. if "%trap_type" = "poison_bolt" then var trap_difficulty 1
  616. if "%trap_type" = "bolt" then var trap_difficulty 1
  617. if "%trap_type" = "concussion" then var trap_difficulty 5
  618. if "%trap_type" = "cyanide" then var trap_difficulty 4
  619. if "%trap_type" = "disease" then var trap_difficulty 4
  620. if "%trap_type" = "flea" then var trap_difficulty -2
  621. if "%trap_type" = "gas" then var trap_difficulty 4
  622. if "%trap_type" = "lightening" then var trap_difficulty 5
  623. if "%trap_type" = "naphtha_soaker" then var trap_difficulty 2
  624. if "%trap_type" = "naphtha" then var trap_difficulty 2
  625. if "%trap_type" = "poison_local" then var trap_difficulty 2
  626. if "%trap_type" = "poison_nerve" then var trap_difficulty 2
  627. if "%trap_type" = "scythe" then var trap_difficulty 3
  628. if "%trap_type" = "shocker" then var trap_difficulty 3
  629. if "%trap_type" = "shrapnel" then var trap_difficulty 5
  630. if "%trap_type" = "teleport" then var trap_difficulty 5
  631. if "%trap_type" = "bouncer" then var trap_difficulty -1
  632. if "%trap_type" = "curse" then var trap_difficulty 2
  633. if "%trap_type" = "frog" then var trap_difficulty 1
  634. if "%trap_type" = "laughing" then var trap_difficulty 1
  635. if "%trap_type" = "mana_sucker" then var trap_difficulty -2
  636. if "%trap_type" = "mime" then var trap_difficulty 0
  637. if "%trap_type" = "shadowling" then var trap_difficulty -1
  638. if "%trap_type" = "sleeper" then var trap_difficulty 0
  639.  
  640. # computing...
  641. var total_difficulty %situational_difficulty
  642. math total_difficulty add %base_difficulty
  643. math total_difficulty add %trap_difficulty
  644. if "%total_difficulty" < "-4" then var mode blind
  645. if "%total_difficulty" = "-4" then var mode quick
  646. if "%total_difficulty" = "-3" then var mode quick
  647. if "%total_difficulty" = "-2" then var mode quick
  648. if "%total_difficulty" = "-1" then var mode quick
  649. if "%total_difficulty" = "0" then var mode normal
  650. if "%total_difficulty" = "1" then var mode normal
  651. if "%total_difficulty" = "2" then var mode normal
  652. if "%total_difficulty" = "3" then var mode normal
  653. if "%total_difficulty" = "4" then var mode normal
  654. if "%total_difficulty" = "5" then var mode normal
  655. if "%total_difficulty" = "6" then var mode careful
  656. if "%total_difficulty" = "7" then var mode careful
  657. if "%total_difficulty" = "8" then var mode careful
  658. if "%total_difficulty" = "9" then var mode careful
  659. if "%total_difficulty" > "9" then var mode toss
  660. RETURN
  661.  
  662. TRAP_TYPE:
  663. # trap type matching:
  664. action var trap_type acid when As you look closely, you notice a tiny hole right next to the lock which looks to be a trap of some kind.
  665. action var trap_type boomer when A glistening black square, surrounded by a tight ring of fibrous cord, catches your eye.
  666. action var trap_type reaper when A crust-covered black scarab of some unidentifiable substance clings to the
  667. action var trap_type poison_bolt when concealing the points of several crossbow bolts glistening with moisture.
  668. action var trap_type bolt when concealing the points of several wickedly barbed crossbow bolts.
  669. action var trap_type concussion when you see a tiny metal tube just poking out of a small wad of brown clay
  670. action var trap_type cyanide when The glint of silver from the tip of a dart
  671. action var trap_type disease when swollen animal bladder recessed inside the keyhole.
  672. action var trap_type flea when small glass tube of milky-white opacity
  673. action var trap_type gas when You notice a vial of lime green liquid just under the
  674. action var trap_type lightening when Looking closely into the keyhole, you spy what appears to be a pulsating ball
  675. action var trap_type naphtha_soaker when Though it's hard to see, there also appears to be a liquid-filled bladder inside the notch.
  676. action var trap_type naphtha when A tiny striker is cleverly concealed under the lid, set to ignite a frighteningly large vial of naphtha.
  677. action var trap_type poison_local when You notice a tiny needle with a greenish discoloration on its tip hidden next to the keyhole.
  678. action var trap_type poison_nerve when You notice a tiny needle with a rust colored discoloration on its tip hidden next to the keyhole.
  679. action var trap_type scythe when Out of the corner of your eye, you notice a glint of razor sharp steel hidden within a suspicious looking seam on the
  680. action var trap_type shocker when You notice two silver studs right below the keyhole which look dangerously out of place there.
  681. action var trap_type shrapnel when keyhole is packed tightly with a powder around the insides of the lock.
  682. action var trap_type teleport when are covered with a thin metal circle that has been lacquered with a shade of
  683. action var trap_type bouncer when Connected to the pin is a small shaft that runs downward into a shadow.
  684. action var trap_type curse when you notice a small glowing rune hidden
  685. action var trap_type frog when with a careful eye, you notice a lumpy green rune hidden inside the
  686. action var trap_type laughing when tiny glass tube filled with a black gaseous substance of some sort and a tiny hammer
  687. action var trap_type mana_sucker when The seal is covered in strange runes and a glass sphere is embedded within it.
  688. action var trap_type mime when A tiny bronze face, Fae in appearance, grins ridiculously from its place on the
  689. action var trap_type shadowling when with a careful eye, you notice a small black crystal deep in the shadows of the
  690. action var trap_type sleeper when Two sets of six pinholes on either side of the
  691. RETURN
  692.  
  693. stow:
  694. pause 0.1
  695. if "$righthand" != "Empty" then put stow right
  696. if "$lefthand" != "Empty" then put stow left
  697. RETURN
  698.  
  699. RETURN:
  700. pause .1
  701. return
  702.  
  703. disarm_ERROR:
  704.         echo
  705.         echo Error while opening box
  706.         echo Something bad happened
  707.         echo
  708.         put ' ERROR WHILE OPENING BOX
  709.         put ' Something bad happened
  710.         put ' Ask drog for your boxes when he becomes atk. Srry for the glitch.
  711.         put #beep
  712.         put stow right
  713.         pause 1
  714.         put stow left
  715.         pause 1
  716.         goto done
  717.  
  718. done:
  719.         echo **** DONE PICKING BOXES! *****
  720.         put whisper %Customer Done Picking your boxes.
  721.         put whisper %Customer If you have more give them to me then nod.
  722.         goto top1
  723.  
  724. fix_Lock:
  725.         if ("%lockpick.ring" = "OFF") then gosub get_Pick
  726.         if ("%lockpick.ring" = "ON") then goto fix_Ring
  727.         fixing:
  728.         var LAST fixing
  729.                 matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  730.                 matchre go_On Roundtime|look like it
  731.         put fix my lock
  732.         matchwait
  733.         go_On:
  734.         if ("%lockpick.ring" = "OFF") then gosub put_Away_Pick 
  735.         return
  736.  
  737. fix_Ring:
  738.         fixing.ring:
  739.         var LAST fixing.ring
  740.                 matchre PAUSE ^\.\.\.wait|^Sorry, you may only type
  741.                 matchre return Roundtime|look like it
  742.         put repair my lockpick ring
  743.         matchwait
  744.  
  745. exp_Check:
  746.         put exp
  747.         #if $Disarm_Traps.LearningRate > 33 then goto exp_Pause
  748.         #if $Lockpicking.LearningRate > 33 then goto exp_Pause
  749.     return
create a new version of this paste RAW Paste Data