daily pastebin goal
96%
SHARE
TWEET

Untitled

a guest Sep 14th, 2018 66 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ##REPAIRSCRIPT
  2. ## inv combat; inv armor
  3.  
  4. DEBUG 4
  5. ACTION var contents $1 when ^In the haversack you see (.*)
  6. setvar container1 haversack
  7.  
  8.  
  9. armor_Check:
  10. counter set 0
  11. ## **********
  12. hand_Check:
  13.      pause 0.1
  14.           matchre remove_Armor (hand wraps|handwraps|knuckles|hand claws|knuckleguards|footwraps|blades|spikes|stick)
  15.           matchre armor_Check1 You have nothing of that sort|You are wearing nothing of that sort|You aren't wearing anything
  16.           put inv weapon
  17.      matchwait 2
  18.      goto armor_Check1
  19. ## **********
  20. armor_Check1:
  21.           matchre armor_Check1 ^\.\.\.wait|^Sorry, you may only type
  22.           matchre remove_Armor (gauntlet|gloves|shield|claw guards|steel mail gloves|parry stick|handwraps|\bhat\b|hand claws|jacket|armwraps|footwraps|aegis|buckler|\bhood\b|\bcowl\b|\bheater|pavise|scutum|shield|sipar|\btarge\b|aventail|backplate|balaclava|barbute|bascinet|breastplate|\bcap\b|coat|\bcowl|cuirass|fauld|greaves|hauberk|helm|\bhood\b|jerkin|leathers|lorica|mantle|mask|morion|pants|(?<=(field|fluted|full|half) )\bplate\b|handguards|robe|sallet|shirt|sleeves|ticivara|tabard|tasset|thorakes|\blid\b|vambraces|vest|collar|coif|mitt|steel mail)
  23.           matchre armor_None You have nothing of that sort|You are wearing nothing of that sort|You aren't wearing anything
  24.           put inv armor
  25.     matchwait
  26. ## **********
  27. armor_Check2:
  28.           matchre armor_Check1 ^\.\.\.wait|^Sorry, you may only type
  29.           matchre remove_Armor (gauntlet|gloves|shield|claw guards|steel mail gloves|parry stick|handwraps|\bhat\b|hand claws|jacket|armwraps|footwraps|aegis|buckler|\bhood\b|\bcowl\b|\bheater|pavise|scutum|shield|sipar|\btarge\b|aventail|backplate|balaclava|barbute|bascinet|breastplate|\bcap\b|coat|\bcowl|cuirass|fauld|greaves|hauberk|helm|\bhood\b|jerkin|leathers|lorica|mantle|mask|morion|pants|(?<=(field|fluted|full|half) )\bplate\b|handguards|robe|sallet|shirt|sleeves|ticivara|tabard|tasset|thorakes|\blid\b|vambraces|vest|collar|coif|mitt|steel mail)
  30.           matchre Armor_Complete You have nothing of that sort|You are wearing nothing of that sort|You aren't wearing anything
  31.           put inv armor
  32.     matchwait
  33.  
  34. ## **********
  35. remove_Armor:
  36.      var armor $0
  37.      var LAST remove_Armor
  38.      pause 0.1
  39.           matchre stow_Armor ^\.\.\.wait|^Sorry, you may only type
  40.           matchre stow_Armor ^You work|^You remove|^You pull|^You take|^You loosen|^You sling|^You slip|^You slide
  41.           matchre armor_Check ^You have nothing of that|^Remove what
  42.           put remove %armor
  43.      matchwait
  44. ## **********
  45. stow_Armor:
  46.     var LAST stow_Armor_1
  47.      pause 0.1
  48.         matchre stow_Armor ^\.\.\.wait|^Sorry, you may only type
  49.           matchre stow_Armor_2 any more room in|closed|no matter how you arrange
  50.         matchre armor_Done ^You put your
  51.         put put %armor in my %container1
  52.     matchwait
  53. ## **********
  54. stow_Armor_2:
  55.     var LAST stow_Armor_2
  56.         matchre stow_Armor_2 ^\.\.\.wait|^Sorry, you may only type
  57.           matchre no_More_Stowing any more room in|closed|no matter how you arrange
  58.          matchre armor_Done ^You put your
  59.     put put %armor in my %container2
  60.     matchwait
  61. ## **********
  62. armor_Done:
  63.      counter add 1
  64.      pause 0.1
  65.      var total_armor %c
  66.      var armor%c %armor
  67.      goto hand_Check
  68. ## **********
  69. armor_None:
  70.      ECHO **** NO ARMOR FOUND!
  71.      var ARMOR_STOW OFF
  72.      goto Armor_Complete
  73.      
  74. ## **********
  75. Armor_Complete:
  76.  ## EVERYTHING STOWED
  77.  
  78.  
  79. pause 1
  80. send look in my haversack
  81. pause 1
  82.  
  83. eval contents replacere("%contents", " and |, ", "|")
  84. var contents |%contents|
  85. eval total count("%contents", "|")  
  86. action instant var temparray %temparray|$2 when ^@(a|an|some) .* (\S+)$
  87. var i 0
  88. var temparray
  89.  
  90. ## ***************
  91. LOOP:
  92.     put #parse @%contents(%i)
  93.     math i add 1
  94.     pause 0.1
  95.     if (%i>=%total) then goto repairstart
  96.     goto loop
  97.    
  98.     repairstart:
  99.     var i 1
  100.     repair:
  101.     if (%i>=%total) then goto done
  102.         matchre GIVE-ITEM ^You get|^You are already holding that
  103.         matchre STOW-RIGHT ^You need a free hand
  104.     send get %temparray(%i) from my haversack
  105.     matchwait 5
  106.     GOTO repair
  107.  
  108. ## ***************
  109. DONE:
  110.     EXIT
  111.  
  112.  
  113. ## ***************
  114. GIVE-ITEM:
  115.     math i add 1
  116.          matchre GIVE-ITEM ^\.\.\.wait|^Sorry\.
  117.          matchre GIVE-ITEM Just give it to me again if you want|It will cost|Just ask me again
  118.          matchre STOW-RIGHT isn't broken|That isn't damaged|Please don't lose this ticket|I don't work on those here
  119.     send give %1
  120.     matchwait 1
  121.      
  122. ## ***************
  123. STOW-RIGHT:
  124.     wait .5    
  125.     send stow right
  126.     GOTO repair
RAW Paste Data
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
 
Top