PDA

View Full Version : Some utility scripts that I use..



Skaster
07-13-2003, 06:42 PM
#do.Cmd

echo echo usage = .do <stuff to do (up to 9 words)>
begin:
put %1 %2 %3 %4 %5 %6 %7 %8 %9
wait
goto begin


#td.Cmd

echo usage = .dt <times to wait between doing <stuff>> <stuff (up to 8 words)>
begin:
put %2 %3 %4 %5 %6 %7 %8 %9
pause %1
goto begin


This one, I'm not sure if there's an easier way to optimize it, but it's been working fine for me:

#dt.Cmd

echo usage = .dt <amount of times to do <stuff>> <stuff (up to 8 words)>
counter set %1
do:
put %2 %3 %4 %5 %6 %7 %8 %9
counter subtract 1
wait
goto %c
0:
exit
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31;
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
goto do



I find this one a bit better than the other deposit scripts because it does not sroll by checking wealth, and instead checks info.

#Deposit silvers at bank

begin:
put info
match done2 Silver: 0
match b1 Silver: 1
match b2 Silver: 2
match b3 Silver: 3
match b4 Silver: 4
match b5 Silver: 5
match b6 Silver: 6
match b7 Silver: 7
match b8 Silver: 8
match b9 Silver: 9
matchwait

b1:
save 1
goto r

b2:
save 2
goto

b3:
save 3
goto r

b4:
save 4
goto r

b5:
save 5
goto r

b6:
save 6
goto r

b7:
save 7
goto r

b8:
save 8
goto r

b9:
save 9
goto r

r:
put info
waitfor Mana:
match a1 Silver: %s1
match a2 Silver: %s2
match a3 Silver: %s3
match a4 Silver: %s4
match a5 Silver: %s5
match a6 Silver: %s6
match a7 Silver: %s7
match a8 Silver: %s8
match a9 Silver: %s9
match a0 Silver: %s0
match donecheck Silver: %s
matchwait

a1:
save %s1
goto r

a2:
save %s2
goto r

a3:
save %s3
goto r

a4:
save %s4
goto r

a5:
save %s5
goto r

a6:
save %s6
goto r

a7:
save %s7
goto r

a8:
save %s8
goto r

a9:
save %s9
goto r

a0:
save %s0
goto r

donecheck:
put wealth
match done You have %s coins
match begin with you.
matchwait

done:
put deposit %s
done2:
put check bal


And.. the biggie. I made this right after the scroll changes, but never posted it.



#sc.Cmd

#
# Created by Skaster
# Kbundy1@earthlink.net
#

echo
echo ........... Be sure to have your container
echo .............. that has scrolls inside
echo ................. listed as 'user0'
echo ........ in configuration->options>variables
echo

echo
echo
echo
echo .............Usage = .sc (Spell name that you're looking for) (Name 2) (Name 3) .. (name 9)
echo
echo
echo
#
#Scroll nouns = scroll, palimpset, parchment, paper, vellum, papyrus
#Various nouns = prayerbook, book, tome, ledger
#

#
#Scroll
#

begin:

prescr:
save first
counter set 1
pause 1
beginscr:
put read my %s scroll in my %user0
match scrfound (%1)
match scrnext There is nothing
match scrNF I could not find
match scrnext >
matchwait

scrNF:
echo
echo ..... Sorry, you don't seem to have that spell on any scroll that you have.
echo
goto prepal



scrfound:
echo
echo ..... The spell ¤%1¤ is the %s scroll in your %user0.
echo
shift
if_1 goto begin
exit


scrnext:
counter add 1
goto scr%c

scr2:
save second
goto beginscr

scr3:
save third
goto beginscr

scr4:
save fourth
goto beginscr

scr5:
save fifth
goto beginscr

scr6:
save sixth
goto beginscr

scr7:
save seventh
goto beginscr

scr8:
save eighth
goto beginscr

scr9:
save ninth
goto beginscr

scr10:
save tenth
goto beginscr

scr11:
save eleventh
goto beginscr

scr12:
save twelfth
goto beginscr

scr13:
save thirteenth
goto beginscr

scr14:
save fourtheenth
goto beginscr

scr15:
save fifteenth
goto beginscr

scr16:
save sixteenth
goto beginscr

scr17:
save seventeenth
goto beginscr

scr18:
save eighteenth
goto beginscr

scr19:
save nineteenth
goto beginscr

scr20:
save twentieth
goto beginscr

#
#Palimpset
#

prepal:
save first
counter set 1
pause 1
beginpal:
put read my %s palimpset in my %user0
match palfound (%1)
match palnext There is nothing
match palNF I could not find
match palnext >
matchwait

palNF:
echo
echo ..... Sorry, you don't seem to have that spell on any palimpset that you have.
echo
goto prepar



palfound:
echo
echo ..... The spell ¤%1¤ is the %s palimpset in your %user0.
echo
shift
if_1 goto begin
exit

palnext:
counter add 1
goto pal%c

pal2:
save second
goto beginpal

pal3:
save third
goto beginpal

pal4:
save fourth
goto beginpal

pal5:
save fifth
goto beginpal

pal6:
save sixth
goto beginpal

pal7:
save seventh
goto beginpal

pal8:
save eighth
goto beginpal

pal9:
save ninth
goto beginpal

pal10:
save tenth
goto beginpal

pal11:
save eleventh
goto beginpal

pal12:
save twelfth
goto beginpal

#
#Paper
#

prepar:
save first
counter set 1
pause 1
beginpar:
put read my %s parchment in my %user0
match parfound (%1)
match parnext There is nothing
match parNF I could not find
match parnext >
matchwait

parNF:
echo
echo ..... Sorry, you don't seem to have that spell on any parchment that you have.
echo
goto prepap


parfound:
echo
echo ..... The spell ¤%1¤ is the %s parchment in your %user0.
echo
shift
if_1 goto begin
exit

parnext:
counter add 1
goto par%c

par2:
save second
goto beginpar

par3:
save third
goto beginpar

par4:
save fourth
goto beginpar

par5:
save fifth
goto beginpar

par6:
save sixth
goto beginpar

par7:
save seventh
goto beginpar

par8:
save eighth
goto beginpar

par9:
save ninth
goto beginpar

par10:
save tenth
goto beginpar

par11:
save eleventh
goto beginpar

par12:
save twelfth
goto beginpar

#
#Paper
#

prepap:
save first
counter set 1
pause 1
beginpap:
put read my %s paper in my %user0
match papfound (%1)
match papnext There is nothing
match papNF I could not find
match papnext >
matchwait

papNF:
echo
echo ..... Sorry, you don't seem to have that spell on any paper that you have.
echo
goto preppy

papfound:
echo
echo ..... The spell ¤%1¤ is the %s paper in your %user0.
echo
shift
if_1 goto begin
exit

papnext:
counter add 1
goto pap%c

pap2:
save second
goto beginpap

pap3:
save third
goto beginpap

pap4:
save fourth
goto beginpap

pap5:
save fifth
goto beginpap

pap6:
save sixth
goto beginpap

pap7:
save seventh
goto beginpap

pap8:
save eighth
goto beginpap

pap9:
save ninth
goto beginpap

pap10:
save tenth
goto beginpap

pap11:
save eleventh
goto beginpap

pap12:
save twelfth
goto beginpap

#
#Papyrus
#

preppy:
save first
counter set 1
pause 1
beginppy:
put read my %s papyrus in my %user0
match ppyfound (%1)
match ppynext There is nothing
match ppyNF I could not find
match ppynext >
matchwait

ppyNF:
echo
echo ..... Sorry, you don't seem to have that spell on any papyrus that you have.
echo
goto prevel

ppyfound:
echo
echo ..... The spell ¤%1¤ is the %s papyrus in your %user0.
echo
shift
if_1 goto begin
exit

exit

ppynext:
counter add 1
goto ppy%c

ppy2:
save second
goto beginppy

ppy3:
save third
goto beginppy

ppy4:
save fourth
goto beginppy

ppy5:
save fifth
goto beginppy

ppy6:
save sixth
goto beginppy

ppy7:
save seventh
goto beginppy

ppy8:
save eighth
goto beginppy

ppy9:
save ninth
goto beginppy

ppy10:
save tenth
goto beginppy

ppy11:
save eleventh
goto beginppy

ppy12:
save twelfth
goto beginppy

#
#Vellum
#

prevel:
save first
counter set 1
pause 1
beginvel:
put read my %s vellum in my %user0
match velfound (%1)
match velnext There is nothing
match velNF I could not find
match velnext >
matchwait

velNF:
echo
echo ..... Sorry, you don't seem to have that spell on any vellum that you have.
echo
exit

velfound:
echo
echo ..... The spell ¤%1¤ is the %s vellum in your %user0.
echo
shift
if_1 goto begin
exit

velnext:
counter add 1
goto vel%c

vel2:
save second
goto beginvel

vel3:
save third
goto beginvel

vel4:
save fourth
goto beginvel

vel5:
save fifth
goto beginvel

vel6:
save sixth
goto beginvel

vel7:
save seventh
goto beginvel

vel8:
save eighth
goto beginvel

vel9:
save ninth
goto beginvel

vel10:
save tenth
goto beginvel

vel11:
save eleventh
goto beginvel

vel12:
save twelfth
goto beginvel

Back
08-13-2003, 01:09 AM
Hope you don't mind Skaster, going to plop some of my util scripts here too.

After the Fletching Script thread, I decided to finally look into scripting the Wizard FE way. Went to http://insomniac.php4hosting.com/scripts.php and picked up a simple .get script, checked it out, and went from there. Glad I took Comp Sci in high school. Those Basic and Fortran routines helped.

This script is my first original script. You type .getbox <item1> <item2> etc... It empties out your box for you in a picking session. It has no error matches because really, if you know how you sort things, and whats opened and closed, you don't need them.


#getbox.cmd
#Script by Ulg Shaggymane

IF_1 goto Start
ECHO +------------------------------------+
ECHO | Usage |
ECHO | .getbox <item1> <item2> etc... |
ECHO | As many items as you want will |
ECHO | be taken from box in right hand |
ECHO | and put in your container. Be sure |
ECHO | container is set in FE settings. |
ECHO +------------------------------------+
exit

Start:
put glance
match Trunk trunk in your right hand
match Coffer coffer in your right hand
match Chest chest in your right hand
match Strongbox strongbox in your right hand
match Box box in your right hand
match Swap your left hand
matchwait

Swap:
put swap
goto Start

Trunk:
put get %1 from my trunk
put open my %container
match TrunkDone You gather
match TrunkStow You remove
matchwait

TrunkStow:
put put %1 in my %container
match TrunkDone You put
matchwait

TrunkDone:
shift

IF_1 goto Trunk
put close my %container
put put my tru in my cloak
exit

Coffer:
put get %1 from my coffer
put open my %container
match CofferDone You gather
match CofferStow You remove
matchwait

CofferStow:
put put %1 in my %container
match CofferDone You put
matchwait

CofferDone:
shift

IF_1 goto Coffer
put close my %container
put put my coffer in my cloak
exit

Chest:
put get %1 from my chest
put open my %container
match ChestDone You gather
match ChestStow You remove
matchwait

ChestStow:
put put %1 in my %container
match ChestDone You put
matchwait

ChestDone:
shift

IF_1 goto Chest
put close my %container
put put my chest in my cloak
exit

Strongbox:
put get %1 from my strong
put open my %container
match StrongboxDone You gather
match StrongboxStow You remove
matchwait

StrongboxStow:
put put %1 in my %container
match StrongboxDone You put
matchwait

StrongboxDone:
shift

IF_1 goto Strongbox
put close my %container
put put my stro in my cloak
exit

Box:
put get %1 from my box
put open my %container
match BoxDone You gather
match BoxStow You remove
matchwait

BoxStow:
put put %1 in my %container
match BoxDone You put
matchwait

BoxDone:
shift

IF_1 goto Box
put close my %container
put put my box in my cloak
exit

(Sorry, Cael, attatchment didn't work for me.)

[Edited on 8-13-2003 by Backlash]

Red Devil
08-13-2003, 01:42 AM
let's all laugh at backlash he doesn't know how to use attachments!!


BALEETED.

Back
08-13-2003, 01:53 AM
let's all laugh at backlash he doesn't know how to use attachments!!


BALEETED.

chuckle. Laugh all you want, its my fricking browser. Don't ask.... mutter_microsoft.