roncli
Wanderer
Joined: 07 Sep 2002
Posts: 63
Location: USA
|
 Posted: Wed Aug 11, 2004 11:09 am
Achaea - Auto Forging
|
Class: Forging
Purpose: For knights that forge a lot, this script will save you time and effort by doing all of the hard work for you. Just tell it what to forge.
Usage:
ADDFORGE <x> <y> - Adds one or more items to the forging queue. <x> is the number of items you wish to add, and <y> is the actual item. Note that everything here is one word, such as "leatherarmour" or "battleaxe". Remember to take down selfishness before starting a fresh forging.
PAUSEFORGE - Useful to pause the forging and go do something else.
RESUMEFORGE - Resumes the forging that you paused. Don't forget to refire the forge, you have to do that manually.
CLEARFORGE - Clears the forging queue. Outputs a pipe separated list of what is next. Does not disrupt the current item you are working on, it will finish that item and then stop.
ADDFULLFORGE <x> - Adds one or more items to the forging queue. <x> is a pipe separated list of items to forge. Useful after you have done a CLEARFORGE, as you can reload the list it gave you with this command. Also remember to take down selfishness before starting forging.
| Code: |
#CLASS {Forging}
#ALIAS DONEWFORGE {#if (@Forging/NowForging = "nothing") {#abort 1};take @Forging/NowForging from forge;wp @Forging/NowForging;put @Forging/NowForging in backpack;DOFORGE}
#ALIAS ADDFORGE {#var Forging/NoScripting 0;#loop %1 {#var Forging/ForgingList %additem( %2, @Forging/ForgingList)};#if (@Forging/StillForging = 0) {outr 1 coal;put coal in forge;fire forge;#alarm +2.5 {DOFORGE}}}
#ALIAS DOFORGE {#if (%numitems( @ForgingList) = 0) {#var Forging/NowForging nothing;#abort 1};#if (%item( @Forging/ForgingList, 1) = "club") {outr 1 wood};#if (%item( @Forging/ForgingList, 1) = "buckler") {outr 1 leather;outr 1 steel};#if (%item( @Forging/ForgingList, 1) = "dirk") {outr 2 steel};#if (%item( @Forging/ForgingList, 1) = "spear") {outr 4 wood;outr 3 steel};#if (%item( @Forging/ForgingList, 1) = "leatherarmour") {outr 10 leather};#if (%item( @Forging/ForgingList, 1) = "halberd") {outr 5 wood;outr 5 steel};#if (%item( @Forging/ForgingList, 1) = "cavalry") {outr 2 leather;outr 1 steel};#if (%item( @Forging/ForgingList, 1) = "shortsword") {outr 2 steel;outr 1 leather};#if (%item( @Forging/ForgingList, 1) = "mace") {outr 3 wood;outr 3 steel;outr 3 iron};#if (%item( @Forging/ForgingList, 1) = "ringmail") {outr 5 leather;outr 3 steel};#if (%item( @Forging/ForgingList, 1) = "axe") {outr 3 wood;outr 3 iron};#if (%item( @Forging/ForgingList, 1) = "bardiche") {outr 5 wood;outr 6 steel};#if (%item( @Forging/ForgingList, 1) = "dagger") {outr 1 obsidian};#if (%item( @Forging/ForgingList, 1) = "banded") {outr 2 steel;outr 1 leather};#if (%item( @Forging/ForgingList, 1) = "whip") {outr 1 iron;outr 3 leather;outr 1 wood};#if (%item( @Forging/ForgingList, 1) = "talons") {outr 2 steel;outr 2 leather};#if (%item( @Forging/ForgingList, 1) = "morningstar") {outr 3 iron;outr 1 wood;outr 3 steel};#if (%item( @Forging/ForgingList, 1) = "scalemail") {outr 6 steel;outr 5 leather};#if (%item( @Forging/ForgingList, 1) = "warhammer") {outr 3 wood;outr 5 steel};#if (%item( @Forging/ForgingList, 1) = "rapier") {outr 5 steel};#if (%item( @Forging/ForgingList, 1) = "javelin") {outr 3 wood;outr 1 obsidian};#if (%item( @Forging/ForgingList, 1) = "kite") {outr 3 steel;outr 1 leather};#if (%item( @Forging/ForgingList, 1) = "flail") {outr 1 wood;outr 3 iron;outr 3 steel};#if (%item( @Forging/ForgingList, 1) = "chainmail") {outr 12 steel;outr 6 cl~oth};#if (%item( @Forging/ForgingList, 1) = "trident") {outr 4 wood;outr 3 steel};#if (%item( @Forging/ForgingList, 1) = "battleaxe") {outr 7 steel;outr 1 leather;outr 1 wood};#if (%item( @Forging/ForgingList, 1) = "tower") {outr 1 leather;outr 4 steel};#if (%item( @Forging/ForgingList, 1) = "splintmail") {outr 18 steel;outr 5 leather};#if (%item( @Forging/ForgingList, 1) = "bastard") {outr 8 steel;outr 2 leather};#if (%item( @Forging/ForgingList, 1) = "lance") {outr 2 steel;outr 5 wood};#if (%item( @Forging/ForgingList, 1) = "scimitar") {outr 8 steel;outr 1 leather};#if (%item( @Forging/ForgingList, 1) = "fieldplate") {outr 34 steel;outr 8 cl~oth};#if (%item( @Forging/ForgingList, 1) = "broadsword") {outr 8 steel;outr 1 leather};#if (%item( @Forging/ForgingList, 1) = "longsword") {outr 8 steel;outr 1 leather};#if (%item( @Forging/ForgingList, 1) = "fullplate") {outr 100 steel;outr 10 gold;outr 10 leather;outr 10 cl~oth};forge for %item( @Forging/ForgingList, 1);#var Forging/NowForging %item( @Forging/ForgingList, 1);#var Forging/ForgingList %delnitem( @Forging/ForgingList, 1);#var Forging/InForge 1;#var Forging/StillForging 1;#var Forging/JustStartingForge 0;#var Forging/ForgeCount 0;#if (@Forging/NowForging = "leatherarmour") {#var Forging/NowForging "leather armour"};#if (@Forging/NowForging = "cavalry") {#var Forging/NowForging "cavalry shield"}}
#ALIAS CLEARFORGE {#echo Clearing the forging queue: @Forging/ForgingList;#var Forging/ForgingList ""}
#ALIAS PAUSEFORGE {#var Forging/PauseForge 1}
#ALIAS RESUMEFORGE {#var Forging/PauseForge 0;CONTINUEFORGE}
#ALIAS ADDFULLFORGE {#var Forging/NoScripting 0;#var Forging/ForgingList %1;outr 1 coal;put coal in forge;fire forge;#alarm +2.5 {DOFORGE}}
#ALIAS CONTINUEFORGE {#if (@Forging/InForge = 0 and @Forging/NowForging <> "nothing" and @Forging/StillForging = 0 and @Forging/JustStartingForge = 0) {DONEWFORGE;#abort 1};#if (@Forging/PauseForge = 0) {#if (@Forging/InForge = 0 and %numitems( @Forging/ForgingList) > 0 and @Forging/StillForging = 0) {DONEWFORGE} {#if (@Forging/InForge = 1) {#var Forging/InForge 0;forge}}}}
#VAR ForgingList {}
#VAR NowForging {nothing}
#VAR StillForging {0}
#VAR JustStartingForge {0}
#VAR ForgeCount {0}
#VAR PauseForge {0}
#VAR InForge {0}
#VAR NoScripting {0}
#TRIGGER {Sweat flies from your brow} {#var Forging/InForge 1;#add Forging/ForgeCount 1}
#TRIGGER {You lay the commodities out before you on the forge} {#if (@Forging/NoScripting = 1) {start};#var Forging/InForge 1;#add Forging/ForgeCount 1}
#TRIGGER {Your eye for detail tells you that} {#var Forging/InForge 0;#var Forging/StillForging 0}
#TRIGGER {You have recovered balance on all limbs.} {CONTINUEFORGE}
#STAT {}
#STW {%if( @Forging/StillForging = 1 or %numitems( @Forging/ForgingList) > 0, Items to Forge: %eval( %numitems( @Forging/ForgingList)) Forge Count: @Forging/ForgeCount)}
#CLASS 0
|
|
|
