-
Notifications
You must be signed in to change notification settings - Fork 1
/
givewo.cmd
51 lines (41 loc) · 964 Bytes
/
givewo.cmd
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
var type %1
var person %2
var item %3
var alias %4
var container $deed.container
var primary.container $primary.container
if ("%type" = "weapon" || "%type" = "armor") then var type forging
put get my %type logbook
ask:
put %alias %person
matchre untie ^UNTIE WORKORDER
matchre bundle ^HAVE WORKORDER
matchwait
bundle:
put .bundlewo %item
waitforre ^BUNDLE DONE
goto give
give:
match incomplete The work order isn't yet complete
match ask logbook and bundled items, and are given
put give my logbook to %person
matchwait 3
goto done
untie:
matchre stow You untie
matchre done You have nothing bundled with the logbook
put untie my log
matchwait 3
goto untie
stow:
pause 0.5
put put my $lefthand in my %container
goto untie
incomplete:
echo
echo *** Incomplete
echo
goto untie
done:
put put my logbook in my %primary.container
put #parse WORKORDER DONE