code/craft.cmd at main · SaragosDR/code · GitHub

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
include library.cmd
include craftlibrary.cmd

if_1 then
{
  if (matchre("%1", "help") then
  {
    gosub HELPDISPLAY
    exit
  }
  if (matchre("%1", "%disciplines") then var discipline %1
  else
  {
    put #echo mono Discipline must be from %disciplines.
    goto HELPDISPLAY
  }
  if_2 then
  else
  {
    put #echo Must specify an material.
    goto HELPDISPLAY
  }
}
else
{
  goto HELPDISPLAY
}
var discipline %1
var material %2


var varset $varset
gosub CRAFTVARLOAD
var storage $m%varsetstorage
var alertwindow >$m%varsetalertwindow

var workorder 0
var quantity 1
gosub AREAVARINIT
gosub STOWALL


MAIN:
  gosub CRAFTING
  exit

HELPDISPLAY:
  put #echo mono Syntax: .craft <discipline> <material>
  put #echo mono Should start in front of an anvil for forging.
  put #echo mono Crafting book should start turned to the correct page.
  put #echo mono Material should be in your crafting storage.
  exit