// NEEDS: DIALOG.SCP fix the new house gump dialog and help dialog.

//****************************************************************************
//SPHERE by : Menasoft ©1997-2000
//www.sphereserver.com
// All SPHERE script files and formats are copyright Menasoft & Partners.
// This file may be freely edited for personal use, but may not be distributed
// in whole or in part, in any format without express written permission from
// Menasoft & Partners.  All donations and contributions
// become the property of Menasoft & Partners.
//****************************************************************************
// FILE LAST UPDATED: Friday, April 28, 2000
//

VERSION=0.54

// resizepic	5 = x,y,gumpback,sx,sy		can come first if multi page
//						put up some background gump
// gumppic	3 = x,y,gump			put gumps in the dlg.
// tilepic		3 = x,y,item			put item tiles in the dialog
// text		4 = x,y,page,startstringindex	put some text here.
// croppedtext	6 = x,y,sx,sy,page,startindex
// htmlgump	7 = x,y,sx,sy, 0 0 0
// xmfhtmlgump	7 = x,y,sx,sy, 1003000 1 1
// button		7 = X,Y,Down gump,Up gump,pressable(1/0),page,id
// radio		6 = x,y,gump1,gump2,page,id
// checkbox	6 = x,y,gumpcheck,gumpuncheck,page,id
// textentry	7 = x,y,widthpix,widthchars,page,id,startstringindex
// page		1 = page number for multi tab dialogs.
// group		1 = ?no idea. (arg = 0?)
// nomove	0 = The gump cannot be moved around.
// noclose	0 = not really used
// nodispose	0 = not really used  (modal?)
//
// NOTE: low button id's are reserved for page tabs.
// button id 0 is reserved for the CANCEL command

[DIALOG d_CHARPROP1]	// prop sheet.
70, 70	// size
page 0
resizepic 0 0 3600 550 360
text 30 45 52 0
button 20 320 2311 2312 1 0 900
resizepic 310 35 83 200 290
tilepic 385 250 <DISPIDDEC>
page 1
button 20 15 2474 2474 0 1
button 60 15 2151 2152 1 1 802
button 100 15 2151 2152 1 1 803
text 30 18 51 1
text 70 18 51 2
text 110 18 51 3
text 15 70 42 5	// Serial
text 75 70 52 6
text 15 85 42 7
text 75 85 52 8
text 15 100 42 9
text 75 100 52 10
text 15 115 42 11
text 75 115 52 12
text 15 135 42 13
text 75 135 52 14
text 15 150 42 15
text 75 150 52 16
text 15 170 42 17
text 75 170 52 18
text 15 185 42 19
text 75 185 52 20
text 15 200 42 21
text 75 200 52 22
text 15 215 42 37
text 75 215 52 38
text 15 230 42 39
text 75 230 52 40
text 15 250 42 41
text 75 250 52 42
text 15 270 42 43
text 75 270 52 44
text 135 270 42 45
text 195 270 52 46
text 15 285 42 23
text 75 285 52 24
text 330 55 42 25
text 380 55 52 26
text 330 70 42 27
text 380 70 52 28
text 330 85 42 29
text 380 85 52 30
text 430 55 42 31
text 445 55 52 32
text 430 70 42 33
text 445 70 52 34
text 430 85 42 35
text 445 85 52 36

[DIALOG d_CHARPROP1 TEXT]
Character Properties 1
1
2
3
Change  Value
Serial
<SERIAL>
Acct
<ACCOUNT>
Name
<NAME>	// 10
Title
<TITLE>
Color
<COLOR>
OSkin
<OSKIN>
ID
<ID>
Body
<BODY>	// 20
OBody
<OBODY>
Kills
<kills>
str:
<STR>
dex:
<DEX>
int:
<INT>	// 30
/
<HITS>
/
<STAMINA>
/
<MANA>
Plot1
<plot1>
SClass
<skillclass>	// 40
Flags
<flags>
Karma
<karma>
Fame
<fame>

[DIALOG d_CHARPROP1 BUTTON]
ONBUTTON=0	// the DIALOG is closed !
ONBUTTON=900	 // Cancel and discard any changes
ONBUTTON=901	 // Apply changes and return
ONBUTTON=902	 // Save and dismiss
	SRC.TARGPROP=0
	SRC.SHOWSKILLS

ONBUTTON=802
	DIALOG d_CHARPROP2

ONBUTTON=803
	DIALOG d_CHARPROP3

[DIALOG d_CHARPROP2]
70, 70
page 0
resizepic 0 0 3600 550 360
text 30 45 52 0
button 20 320 2311 2312 1 0 900
resizepic 310 35 83 200 290
tilepic 385 250 <DISPIDDEC>
page 1
button 20 15 2151 2152 1 1 801
button 60 15 2474 2474 0 1
button 100 15 2151 2152 1 1 803
text 30 18 51 1
text 70 18 51 2
text 110 18 51 3
text 15 70 42 5
text 75 70 52 6
text 15 95 42 7
text 75 95 52 8
text 15 120 42 9
text 75 120 52 10
text 15 145 42 11
text 75 145 52 12
text 15 170 42 13
text 75 170 52 14
text 15 195 42 15
text 75 195 52 16
text 15 220 42 17
text 75 220 52 18
text 15 245 42 19
text 75 245 52 20
text 15 270 42 21
text 75 270 52 22
text 15 295 42 23
text 75 295 52 24

[DIALOG d_CHARPROP2 TEXT]
Character Properties 2
1
2
3
Change  Value
P
<P>
Home
<HOME>
Timer
<Timer>
Action
<ACTION>
Hit P
<HITPOINTS>
Stam
<STAMINA>
Mana
<MANA>
Food
<FOOD>
NPC
<NPC>
Speech
<SPEECH>
Timer
<Timer>

[DIALOG d_CHARPROP2 BUTTON]
ONBUTTON=0	// the DIALOG is closed !
ONBUTTON=900	 // Cancel and discard any changes
ONBUTTON=901	 // Apply changes and return
ONBUTTON=902	 // Save and dismiss
SRC.TARGPROP=0
SRC.SHOWSKILLS

ONBUTTON=801
DIALOG=d_CHARPROP1

ONBUTTON=803
DIALOG=d_CHARPROP3

[DIALOG d_CHARPROP3]
70, 70
page 0
resizepic 0 0 3600 550 360
text 30 45 52 0
button 20 320 2311 2312 1 0 900
resizepic 310 35 83 200 290
tilepic 385 250 <DISPIDDEC>
page 1
button 20 15 2151 2152 1 1 801
button 60 15 2151 2152 1 1 802
button 100 15 2474 2474 0 1
text 30 18 51 1
text 70 18 51 2
text 110 18 51 3
text 15 70 42 5
text 105 70 52 6
text 15 95 42 7
text 105 95 52 8
text 15 120 42 9
text 105 120 52 10
text 15 145 42 11
text 105 145 52 12
text 15 170 42 13
text 105 170 52 14
text 15 195 42 15
text 105 195 52 16
text 15 220 42 17
text 105 220 52 18
text 15 245 42 19
text 105 245 52 20
text 15 270 42 21
text 105 270 52 22
text 15 295 42 23
text 105 295 52 24

[DIALOG d_CHARPROP3 TEXT]
Character Properties 3
1
2
3
Change  Value
Ride on
<findlayer(layer_horse).id> (<findlayer(layer_horse).name>)
Memories
<findlayer(layer_special).id> (<findlayer(layer_special).name>)
Dragging
<findlayer(layer_dragging).id> (<findlayer(layer_dragging).name>)
Murders
<findlayer(layer_flag_murders).id> (<findlayer(layer_flag_murders).name>)
Bandage
<findlayer(layer_flag_bandage).id> (<findlayer(layer_flag_bandage).name>)
Spell stat
<findlayer(layer_spell_stats).id> (<findlayer(layer_spell_stats).name>)
Left hand
<findlayer(1).id> (<findlayer(1).name>)
Right hand
<findlayer(2).id> (<findlayer(2).name>)
.	//Layer 9
.	//<findlayer(1).id> (<findlayer(1).name>)
.	//Layer 10
.	//<findlayer(1).id> (<findlayer(1).name>)

[DIALOG d_CHARPROP3 BUTTON]
ONBUTTON=0	// the dialog is closed !
ONBUTTON=900	 // Cancel and discard any changes
ONBUTTON=901	 // Apply changes and return
ONBUTTON=902	 // Save and dismiss
SRC.TARGPROP=0
SRC.SHOWSKILLS

ONBUTTON=801
	DIALOG=d_CHARPROP1

ONBUTTON=802
	DIALOG=d_CHARPROP2

[DIALOG d_ITEMPROP1]
70, 70
page 0
resizepic 0 0 3600 550 360
text 30 45 52 0
button 20 320 2311 2312 1 0 902
resizepic 310 35 83 200 290
tilepic 390 200 <dispiddec>
page 1
button 20 15 2474 2474 0 1
button 60 15 2151 2152 1 1 802
button 100 15 2151 2152 1 1 803
text 30 18 51 1
text 70 18 51 2
text 110 18 51 3
text 325 50 42 4
text 390 50 52 5
text 325 70 42 25
text 390 70 52 26
text 325 90 42 33
text 390 90 52 34
text 15 90 42 6
text 80 90 52 7
text 15 110 42 27
text 80 110 52 28
text 15 70 42 8
text 80 70 52 9
text 15 130 42 10
text 80 130 52 11
text 15 150 42 12
text 80 150 52 13
text 15 170 42 14
text 80 170 52 15
text 15 190 42 16
text 80 190 52 17
text 15 210 42 18
text 80 210 52 19
text 15 230 42 20
text 80 230 52 21
text 15 250 42 22
text 80 250 52 23
text 15 270 42 29
text 80 270 52 30
text 15 290 42 31
text 80 290 52 32
text 250 18 1152 24
button 230 22 1209 1210 1 1 810
text 250 270 1152 35
button 230 274 1209 1210 1 1 101
text 250 290 1152 35
button 230 294 1209 1210 1 1 102

[DIALOG d_ITEMPROP1 TEXT]
Item Properties 1
1
2
3
Serial
<serial>
BaseID
<baseid>
Name
<name>
Color		// 10
<color>
Timer
<timer>
Pos
<p>
Amount
<amount>
Type
<type>
More1		// 20
<hval(<more>)>
More2
<hval(<more2>)>
Bounce
ID
<id>
DispID
<dispid>
Morep
<morep>		// 30
Link
<link>
Attr
<attr>
Go

[DIALOG d_ITEMPROP1 BUTTON]
//ONBUTTON=903
//TRY REMOVE

ONBUTTON=904
	try bounce

ONBUTTON=802
	dialog=d_itemprop2

ONBUTTON=803
	dialog=d_itemprop3

ONBUTTON=810
	if <src.account.plevel> > 3
		bounce
	endif

ONBUTTON=101
	src.go <morep>

ONBUTTON=102
	if <link>!=04fffffff
		src.gouid <link>
	endif

[DIALOG d_ITEMPROP2]
70, 70
page 0
resizepic 0 0 3600 550 360
text 30 45 52 0
button 20 320 2311 2312 1 0 902
resizepic 310 35 83 200 290
tilepic 390 200 <dispiddec>
page 1
button 20 15 2151 2152 1 1 801
button 60 15 2474 2474 0 1
button 100 15 2151 2152 1 1 803
text 30 18 51 1
text 70 18 51 2
text 110 18 51 3
text 15 70 42 4
text 80 70 52 5
text 325 50 42 24
text 390 50 52 25
text 325 70 42 26
text 390 70 52 27
text 325 90 42 4
text 390 90 52 5
text 15 90 42 6
text 80 90 52 7
text 15 110 42 8
text 80 110 52 9
text 15 130 42 10
text 80 130 52 11
text 15 150 42 12
text 80 150 52 13
text 15 170 42 14
text 80 170 52 15
text 15 190 42 16
text 80 190 52 17
//text 15 210 42 18
//text 80 210 52 19
text 15 230 42 20
text 80 230 52 21
text 15 250 42 22
text 80 250 52 23
text 15 270 42 28
text 80 270 52 29
text 15 290 42 30
text 80 290 52 31
text 250 18 1152 32
button 230 22 1209 1210 1 1 810

[DIALOG d_ITEMPROP2 TEXT]
Item Properties 2
1
2
3
Attr
<attr>
Weight
<WEIGHT>
Layer
<LAYER>
Instances	// 10
<INSTANCES>
Armor
<ARMOR>
Value
<VALUE>
Dye
<DYE>
MoreP
<MOREP>
tdata1		// 20
<tdata1>
tdata2
<tdata2>
Serial
<serial>
ID
<id>
tdata3
<tdata3>
tdata4		// 30
<tdata4>
Bounce

[DIALOG d_ITEMPROP2 BUTTON]
//ONBUTTON=903
//TRY REMOVE

//ONBUTTON=904
//	try bounce

ONBUTTON=810
	if <src.account.plevel> > 3
		bounce
	endif

ONBUTTON=801
	dialog=d_itemprop1

ONBUTTON=803
	dialog=d_itemprop3

[DIALOG d_ITEMPROP3]
70, 70
page 0
resizepic 0 0 3600 550 360
text 30 45 52 0
button 20 320 2311 2312 1 0 902
resizepic 310 35 83 200 290
tilepic 390 200 <DISPIDDEC>
page 1
button 20 15 2151 2152 1 1 801
button 60 15 2151 2152 1 1 802
button 100 15 2474 2474 0 1
text 30 18 51 1
text 70 18 51 2
text 110 18 51 3
text 15 70 42 4
text 100 70 52 5
text 15 85 42 6
text 100 85 52 7
text 15 100 42 8
text 100 100 52 9
text 15 115 42 10
text 100 115 52 11
text 15 130 42 12
text 100 130 52 13
text 15 145 42 14
text 100 145 52 15
text 15 160 42 16
text 100 160 52 17
text 15 175 42 18
text 100 175 52 19
text 15 190 42 20
text 100 190 52 21
text 15 205 42 22
text 100 205 52 23
text 15 220 42 24
text 100 220 52 25
text 15 235 42 26
text 100 235 52 27
text 15 250 42 28
text 100 250 52 29
text 15 265 42 30
text 100 265 52 31
text 15 280 42 32
text 100 280 52 33
text 15 295 42 34
text 100 295 52 35

[DIALOG d_ITEMPROP3 TEXT]
Item Attributies
1
2
3
identified
<hval(<attr>&attr_identified)>
decay
<hval(<attr>&attr_decay)>
newbie
<hval(<attr>&attr_newbie)>
movable		// 10
<hval(<attr>&attr_move_always)>
non movable
<hval(<attr>&attr_move_never)>
magic
<hval(<attr>&attr_magic)>
owned
<hval(<attr>&attr_owned)>
invis
<hval(<attr>&attr_invis)>
cursed		// 20
<hval(<attr>&attr_cursed)>
unholy
<hval(<attr>&attr_cursed2)>
blessed
<hval(<attr>&attr_blessed)>
holy
<hval(<attr>&attr_blessed2)>
for sale
<hval(<attr>&attr_forsale)>
stolen		// 30
<hval(<attr>&attr_stolen)>
can decay
<hval(<attr>&attr_can_decay)>
static
<hval(<attr>&attr_static)>

[DIALOG d_ITEMPROP3 BUTTON]
//ONBUTTON=903
//TRY REMOVE

ONBUTTON=904
TRY BOUNCE

ONBUTTON=801
	dialog=d_itemprop1

ONBUTTON=802
	dialog=d_itemprop2

[DIALOG d_HAIR_DYE]	// HAIR DYE
032,032	// size
page 0
resizepic 100 10 2600 350 355
resizepic 120 54 5100 110 270
text 180 25 995 0
text 160 330 995 13
button 330 330 247 248 1 0 1
group 0
text 130 59 1601 1
button 207 60 5224 5224 0 1 1
text 130 81 1627 2
button 207 82 5224 5224 0 2 2
text 130 103 1501 3
button 207 104 5224 5224 0 3 3
text 130 125 1301 4
button 207 126 5224 5224 0 4 4
text 130 147 1401 5
button 207 148 5224 5224 0 5 5
text 130 169 1201 6
button 207 170 5224 5224 0 6 6
text 130 191 2401 7
button 207 192 5224 5224 0 7 7
text 130 213 2212 8
button 207 214 5224 5224 0 8 8
text 130 235 1101 9
button 207 236 5224 5224 0 9 9
text 130 257 1109 10
button 207 258 5224 5224 0 10 10
text 130 279 1117 11
button 207 280 5224 5224 0 11 11
text 130 301 1133 12
button 207 302 5224 5224 0 12 12
page 1
text 278 52 1601 1
radio 260 52 210 211 0 1601
text 278 69 1602 1
radio 260 69 210 211 0 1602
text 278 86 1603 1
radio 260 86 210 211 0 1603
text 278 103 1604 1
radio 260 103 210 211 0 1604
text 278 120 1605 1
radio 260 120 210 211 0 1605
text 278 137 1606 1
radio 260 137 210 211 0 1606
text 278 154 1607 1
radio 260 154 210 211 0 1607
text 278 171 1608 1
radio 260 171 210 211 0 1608
text 278 188 1609 1
radio 260 188 210 211 0 1609
text 278 205 1610 1
radio 260 205 210 211 0 1610
text 278 222 1611 1
radio 260 222 210 211 0 1611
text 278 239 1612 1
radio 260 239 210 211 0 1612
text 278 256 1613 1
radio 260 256 210 211 0 1613
text 278 273 1614 1
radio 260 273 210 211 0 1614
text 278 290 1615 1
radio 260 290 210 211 0 1615
text 278 307 1616 1
radio 260 307 210 211 0 1616
text 358 52 1617 1
radio 340 52 210 211 0 1617
text 358 69 1618 1
radio 340 69 210 211 0 1618
text 358 86 1619 1
radio 340 86 210 211 0 1619
text 358 103 1620 1
radio 340 103 210 211 0 1620
text 358 120 1621 1
radio 340 120 210 211 0 1621
text 358 137 1622 1
radio 340 137 210 211 0 1622
text 358 154 1623 1
radio 340 154 210 211 0 1623
text 358 171 1624 1
radio 340 171 210 211 0 1624
text 358 188 1625 1
radio 340 188 210 211 0 1625
text 358 205 1626 1
radio 340 205 210 211 0 1626
page 2
text 278 52 1627 2
radio 260 52 210 211 0 1627
text 278 69 1628 2
radio 260 69 210 211 0 1628
text 278 86 1629 2
radio 260 86 210 211 0 1629
text 278 103 1630 2
radio 260 103 210 211 0 1630
text 278 120 1631 2
radio 260 120 210 211 0 1631
text 278 137 1632 2
radio 260 137 210 211 0 1632
text 278 154 1633 2
radio 260 154 210 211 0 1633
text 278 171 1634 2
radio 260 171 210 211 0 1634
text 278 188 1635 2
radio 260 188 210 211 0 1635
text 278 205 1636 2
radio 260 205 210 211 0 1636
text 278 222 1637 2
radio 260 222 210 211 0 1637
text 278 239 1638 2
radio 260 239 210 211 0 1638
text 278 256 1639 2
radio 260 256 210 211 0 1639
text 278 273 1640 2
radio 260 273 210 211 0 1640
text 278 290 1641 2
radio 260 290 210 211 0 1641
text 278 307 1642 2
radio 260 307 210 211 0 1642
text 358 52 1643 2
radio 340 52 210 211 0 1643
text 358 69 1644 2
radio 340 69 210 211 0 1644
text 358 86 1645 2
radio 340 86 210 211 0 1645
text 358 103 1646 2
radio 340 103 210 211 0 1646
text 358 120 1647 2
radio 340 120 210 211 0 1647
text 358 137 1648 2
radio 340 137 210 211 0 1648
text 358 154 1649 2
radio 340 154 210 211 0 1649
text 358 171 1650 2
radio 340 171 210 211 0 1650
text 358 188 1651 2
radio 340 188 210 211 0 1651
text 358 205 1652 2
radio 340 205 210 211 0 1652
text 358 222 1653 2
radio 340 222 210 211 0 1653
page 3
text 278 52 1501 3
radio 260 52 210 211 0 1501
text 278 69 1502 3
radio 260 69 210 211 0 1502
text 278 86 1503 3
radio 260 86 210 211 0 1503
text 278 103 1504 3
radio 260 103 210 211 0 1504
text 278 120 1505 3
radio 260 120 210 211 0 1505
text 278 137 1506 3
radio 260 137 210 211 0 1506
text 278 154 1507 3
radio 260 154 210 211 0 1507
text 278 171 1508 3
radio 260 171 210 211 0 1508
text 278 188 1509 3
radio 260 188 210 211 0 1509
text 278 205 1510 3
radio 260 205 210 211 0 1510
text 278 222 1511 3
radio 260 222 210 211 0 1511
text 278 239 1512 3
radio 260 239 210 211 0 1512
text 278 256 1513 3
radio 260 256 210 211 0 1513
text 278 273 1514 3
radio 260 273 210 211 0 1514
text 278 290 1515 3
radio 260 290 210 211 0 1515
text 278 307 1516 3
radio 260 307 210 211 0 1516
text 358 52 1517 3
radio 340 52 210 211 0 1517
text 358 69 1518 3
radio 340 69 210 211 0 1518
text 358 86 1519 3
radio 340 86 210 211 0 1519
text 358 103 1520 3
radio 340 103 210 211 0 1520
text 358 120 1521 3
radio 340 120 210 211 0 1521
text 358 137 1522 3
radio 340 137 210 211 0 1522
text 358 154 1523 3
radio 340 154 210 211 0 1523
text 358 171 1524 3
radio 340 171 210 211 0 1524
text 358 188 1525 3
radio 340 188 210 211 0 1525
text 358 205 1526 3
radio 340 205 210 211 0 1526
text 358 222 1527 3
radio 340 222 210 211 0 1527
text 358 239 1528 3
radio 340 239 210 211 0 1528
text 358 256 1529 3
radio 340 256 210 211 0 1529
text 358 273 1530 3
radio 340 273 210 211 0 1530
text 358 290 1531 3
radio 340 290 210 211 0 1531
text 358 307 1532 3
radio 340 307 210 211 0 1532
page 4
text 278 52 1301 4
radio 260 52 210 211 0 1301
text 278 69 1302 4
radio 260 69 210 211 0 1302
text 278 86 1303 4
radio 260 86 210 211 0 1303
text 278 103 1304 4
radio 260 103 210 211 0 1304
text 278 120 1305 4
radio 260 120 210 211 0 1305
text 278 137 1306 4
radio 260 137 210 211 0 1306
text 278 154 1307 4
radio 260 154 210 211 0 1307
text 278 171 1308 4
radio 260 171 210 211 0 1308
text 278 188 1309 4
radio 260 188 210 211 0 1309
text 278 205 1310 4
radio 260 205 210 211 0 1310
text 278 222 1311 4
radio 260 222 210 211 0 1311
text 278 239 1312 4
radio 260 239 210 211 0 1312
text 278 256 1313 4
radio 260 256 210 211 0 1313
text 278 273 1314 4
radio 260 273 210 211 0 1314
text 278 290 1315 4
radio 260 290 210 211 0 1315
text 278 307 1316 4
radio 260 307 210 211 0 1316
text 358 52 1317 4
radio 340 52 210 211 0 1317
text 358 69 1318 4
radio 340 69 210 211 0 1318
text 358 86 1319 4
radio 340 86 210 211 0 1319
text 358 103 1320 4
radio 340 103 210 211 0 1320
text 358 120 1321 4
radio 340 120 210 211 0 1321
text 358 137 1322 4
radio 340 137 210 211 0 1322
text 358 154 1323 4
radio 340 154 210 211 0 1323
text 358 171 1324 4
radio 340 171 210 211 0 1324
text 358 188 1325 4
radio 340 188 210 211 0 1325
text 358 205 1326 4
radio 340 205 210 211 0 1326
text 358 222 1327 4
radio 340 222 210 211 0 1327
text 358 239 1328 4
radio 340 239 210 211 0 1328
text 358 256 1329 4
radio 340 256 210 211 0 1329
text 358 273 1330 4
radio 340 273 210 211 0 1330
text 358 290 1331 4
radio 340 290 210 211 0 1331
text 358 307 1332 4
radio 340 307 210 211 0 1332
page 5
text 278 52 1401 5
radio 260 52 210 211 0 1401
text 278 69 1402 5
radio 260 69 210 211 0 1402
text 278 86 1403 5
radio 260 86 210 211 0 1403
text 278 103 1404 5
radio 260 103 210 211 0 1404
text 278 120 1405 5
radio 260 120 210 211 0 1405
text 278 137 1406 5
radio 260 137 210 211 0 1406
text 278 154 1407 5
radio 260 154 210 211 0 1407
text 278 171 1408 5
radio 260 171 210 211 0 1408
text 278 188 1409 5
radio 260 188 210 211 0 1409
text 278 205 1410 5
radio 260 205 210 211 0 1410
text 278 222 1411 5
radio 260 222 210 211 0 1411
text 278 239 1412 5
radio 260 239 210 211 0 1412
text 278 256 1413 5
radio 260 256 210 211 0 1413
text 278 273 1414 5
radio 260 273 210 211 0 1414
text 278 290 1415 5
radio 260 290 210 211 0 1415
text 278 307 1416 5
radio 260 307 210 211 0 1416
text 358 52 1417 5
radio 340 52 210 211 0 1417
text 358 69 1418 5
radio 340 69 210 211 0 1418
text 358 86 1419 5
radio 340 86 210 211 0 1419
text 358 103 1420 5
radio 340 103 210 211 0 1420
text 358 120 1421 5
radio 340 120 210 211 0 1421
text 358 137 1422 5
radio 340 137 210 211 0 1422
text 358 154 1423 5
radio 340 154 210 211 0 1423
text 358 171 1424 5
radio 340 171 210 211 0 1424
text 358 188 1425 5
radio 340 188 210 211 0 1425
text 358 205 1426 5
radio 340 205 210 211 0 1426
text 358 222 1427 5
radio 340 222 210 211 0 1427
text 358 239 1428 5
radio 340 239 210 211 0 1428
text 358 256 1429 5
radio 340 256 210 211 0 1429
text 358 273 1430 5
radio 340 273 210 211 0 1430
text 358 290 1431 5
radio 340 290 210 211 0 1431
text 358 307 1432 5
radio 340 307 210 211 0 1432
page 6
text 278 52 1201 6
radio 260 52 210 211 0 1201
text 278 69 1202 6
radio 260 69 210 211 0 1202
text 278 86 1203 6
radio 260 86 210 211 0 1203
text 278 103 1204 6
radio 260 103 210 211 0 1204
text 278 120 1205 6
radio 260 120 210 211 0 1205
text 278 137 1206 6
radio 260 137 210 211 0 1206
text 278 154 1207 6
radio 260 154 210 211 0 1207
text 278 171 1208 6
radio 260 171 210 211 0 1208
text 278 188 1209 6
radio 260 188 210 211 0 1209
text 278 205 1210 6
radio 260 205 210 211 0 1210
text 278 222 1211 6
radio 260 222 210 211 0 1211
text 278 239 1212 6
radio 260 239 210 211 0 1212
text 278 256 1213 6
radio 260 256 210 211 0 1213
text 278 273 1214 6
radio 260 273 210 211 0 1214
text 278 290 1215 6
radio 260 290 210 211 0 1215
text 278 307 1216 6
radio 260 307 210 211 0 1216
text 358 52 1217 6
radio 340 52 210 211 0 1217
text 358 69 1218 6
radio 340 69 210 211 0 1218
text 358 86 1219 6
radio 340 86 210 211 0 1219
text 358 103 1220 6
radio 340 103 210 211 0 1220
text 358 120 1221 6
radio 340 120 210 211 0 1221
text 358 137 1222 6
radio 340 137 210 211 0 1222
text 358 154 1223 6
radio 340 154 210 211 0 1223
text 358 171 1224 6
radio 340 171 210 211 0 1224
page 7
text 278 52 2401 7
radio 260 52 210 211 0 2401
text 278 69 2402 7
radio 260 69 210 211 0 2402
text 278 86 2403 7
radio 260 86 210 211 0 2403
text 278 103 2404 7
radio 260 103 210 211 0 2404
text 278 120 2405 7
radio 260 120 210 211 0 2405
text 278 137 2406 7
radio 260 137 210 211 0 2406
text 278 154 2407 7
radio 260 154 210 211 0 2407
text 278 171 2408 7
radio 260 171 210 211 0 2408
text 278 188 2409 7
radio 260 188 210 211 0 2409
text 278 205 2410 7
radio 260 205 210 211 0 2410
text 278 222 2411 7
radio 260 222 210 211 0 2411
text 278 239 2412 7
radio 260 239 210 211 0 2412
text 278 256 2413 7
radio 260 256 210 211 0 2413
text 278 273 2414 7
radio 260 273 210 211 0 2414
text 278 290 2415 7
radio 260 290 210 211 0 2415
text 278 307 2416 7
radio 260 307 210 211 0 2416
text 358 52 2417 7
radio 340 52 210 211 0 2417
text 358 69 2418 7
radio 340 69 210 211 0 2418
text 358 86 2419 7
radio 340 86 210 211 0 2419
text 358 103 2420 7
radio 340 103 210 211 0 2420
text 358 120 2421 7
radio 340 120 210 211 0 2421
text 358 137 2422 7
radio 340 137 210 211 0 2422
text 358 154 2423 7
radio 340 154 210 211 0 2423
text 358 171 2424 7
radio 340 171 210 211 0 2424
text 358 188 2425 7
radio 340 188 210 211 0 2425
text 358 205 2426 7
radio 340 205 210 211 0 2426
text 358 222 2427 7
radio 340 222 210 211 0 2427
text 358 239 2428 7
radio 340 239 210 211 0 2428
text 358 256 2429 7
radio 340 256 210 211 0 2429
page 8
text 278 52 2212 8
radio 260 52 210 211 0 2212
text 278 69 2213 8
radio 260 69 210 211 0 2213
text 278 86 2214 8
radio 260 86 210 211 0 2214
text 278 103 2215 8
radio 260 103 210 211 0 2215
text 278 120 2216 8
radio 260 120 210 211 0 2216
text 278 137 2217 8
radio 260 137 210 211 0 2217
page 9
text 278 52 1101 9
radio 260 52 210 211 0 1101
text 278 69 1102 9
radio 260 69 210 211 0 1102
text 278 86 1103 9
radio 260 86 210 211 0 1103
text 278 103 1104 9
radio 260 103 210 211 0 1104
text 278 120 1105 9
radio 260 120 210 211 0 1105
text 278 137 1106 9
radio 260 137 210 211 0 1106
text 278 154 1107 9
radio 260 154 210 211 0 1107
text 278 171 1108 9
radio 260 171 210 211 0 1108
page 10
text 278 52 1109 10
radio 260 52 210 211 0 1109
text 278 69 1110 10
radio 260 69 210 211 0 1110
text 278 86 1111 10
radio 260 86 210 211 0 1111
text 278 103 1112 10
radio 260 103 210 211 0 1112
text 278 120 1113 10
radio 260 120 210 211 0 1113
text 278 137 1114 10
radio 260 137 210 211 0 1114
text 278 154 1115 10
radio 260 154 210 211 0 1115
text 278 171 1116 10
radio 260 171 210 211 0 1116
page 11
text 278 52 1117 11
radio 260 52 210 211 0 1117
text 278 69 1118 11
radio 260 69 210 211 0 1118
text 278 86 1119 11
radio 260 86 210 211 0 1119
text 278 103 1120 11
radio 260 103 210 211 0 1120
text 278 120 1121 11
radio 260 120 210 211 0 1121
text 278 137 1122 11
radio 260 137 210 211 0 1122
text 278 154 1123 11
radio 260 154 210 211 0 1123
text 278 171 1124 11
radio 260 171 210 211 0 1124
text 278 188 1125 11
radio 260 188 210 211 0 1125
text 278 205 1126 11
radio 260 205 210 211 0 1126
text 278 222 1127 11
radio 260 222 210 211 0 1127
text 278 239 1128 11
radio 260 239 210 211 0 1128
text 278 256 1129 11
radio 260 256 210 211 0 1129
text 278 273 1130 11
radio 260 273 210 211 0 1130
text 278 290 1131 11
radio 260 290 210 211 0 1131
text 278 307 1132 11
radio 260 307 210 211 0 1132
page 12
text 278 52 1133 12
radio 260 52 210 211 0 1133
text 278 69 1134 12
radio 260 69 210 211 0 1134
text 278 86 1135 12
radio 260 86 210 211 0 1135
text 278 103 1136 12
radio 260 103 210 211 0 1136
text 278 120 1137 12
radio 260 120 210 211 0 1137
text 278 137 1138 12
radio 260 137 210 211 0 1138
text 278 154 1139 12
radio 260 154 210 211 0 1139
text 278 171 1140 12
radio 260 171 210 211 0 1140
text 278 188 1141 12
radio 260 188 210 211 0 1141
text 278 205 1142 12
radio 260 205 210 211 0 1142
text 278 222 1143 12
radio 260 222 210 211 0 1143
text 278 239 1144 12
radio 260 239 210 211 0 1144
text 278 256 1145 12
radio 260 256 210 211 0 1145
text 278 273 1146 12
radio 260 273 210 211 0 1146
text 278 290 1147 12
radio 260 290 210 211 0 1147
text 278 307 1148 12
radio 260 307 210 211 0 1148

[DIALOG d_HAIR_DYE TEXT]
Hair Color Selection Menu
Brown
Chestnut
Auburn
Blue
Green
Red
Light
Blonde
Black
Beige
Golden
Dk Brown
Dye my hair this color!

[DIALOG d_HAIR_DYE button]
// This is done internally.

[DIALOG d_HELPGM]	// 12
// Put up a help system dialog that lists ingame commands etc.
0, 0	// location on the screen.
resizepic 0 0 3600 600 450
page 0
gumppic 285 178 1418
gumppic 15 50 1800
gumppic 37 63 50468
gumppic 15 50 1889
gumppic 15 50 1883
gumppic 15 50 1811
gumppic 15 50 1812
gumppic 15 50 1891
gumppic 37 63 50409
gumppic 130 91 50628
gumppic 29 76 50984
text 220 17 995 0
button 250 300 243 241 1 0 0
page 1
text 240 40 995 1
text 240 55 995 2
text 240 70 995 3
text 240 95 995 4
button 250 115 210 211 1 0 1
text 300 115 995 5
button 250 140 210 211 1 0 2
text 300 140 995 6
button 250 165 210 211 1 0 3
text 300 165 995 7
button 250 190 210 211 1 0 4
text 300 190 995 8
button 250 215 210 211 1 0 5
text 300 215 995 9
button 250 240 210 211 1 0 6
text 300 240 995 10
button 250 265 210 211 1 0 7
text 300 265 995 11

[DIALOG d_HELPGM TEXT]
SPHERE Help System
Hail! Welcome to the SPHERE command help
system. Pick the catagory of the command from
the list below.
Select     Category
Administrator
Game Master
Counselor
Player
Triggers and Events
Properties and Methods
SPHERE FAQ

[DIALOG d_HELPGM BUTTON]
ONBUTTON=1

ONBUTTON=2

ONBUTTON=3

ONBUTTON=4

ONBUTTON=5

ONBUTTON=6

ONBUTTON=7

[DIALOG d_TINKER]
// tinker skill create dialog
0, 0	// location on the screen.
page 0
resizepic 25 0 2600 500 400
resizepic 45 60 5100 450 25
resizepic 45 330 5100 450 25
text 150 25 995 0
text 125 360 995 55
button 100 364 3 4 1 0 2
button 340 358 242 241 1 0 0
button 410 358 247 248 1 0 1
text 70 60 0 1
button 120 63 5209 5003 0 2 0
text 170 60 0 2
button 220 63 5209 5003 0 1 0
text 270 60 0 3
button 315 63 5209 5003 0 3 0
text 370 60 0 7
button 440 63 5209 5003 0 7 0
text 65 330 0 4
button 125 333 5208 5003 0 4 0
text 180 330 0 5
button 280 333 5208 5003 0 5 0
text 320 330 0 10
button 410 333 5208 5003 0 6 0
page 2
text 100 120 995 15
radio 145 150 210 211  0 7164
tilepic 100 140 7164
text 100 220 995 16
radio 145 250 210 211  0 14092
tilepic 85 145 14092
text 275 120 995 14
radio 340 150 210 211 0 4414
tilepic 280 140 4414
page 1
text 70 95 995 23
radio 130 120 210 211 0 3998
tilepic 85 120 3998
text 70 175 995 54
radio 130 205 210 211 0 7865
tilepic 90 200 7865
text 70 255 995 22
radio 130 280 210 211 0 3997
tilepic 75 280 3997}
text 210 95 995 13
radio 270 120 210 211 0 3739
tilepic 220 120 3739
text 230 175 995 11
radio 270 205 210 211 0 3907
tilepic 220 205 3907
text 230 255 995 29
radio 270 280 210 211 0 4148
tilepic 230 280 4148
text 370 95 995 27
radio 405 120 210 211 0 4327
tilepic 360 120 4327
text 360 175 995 24
radio 405 205 210 211 0 4324
tilepic 360 205 4324
text 360 255 995 28
radio 405 280 210 211 0 4136
tilepic 360 280 4136
page 3
text 70 95 995 35
radio 130 120 210 211 0 4179
tilepic 80 115 4179
text 70 175 995 36
radio 130 205 210 211 0 4189
tilepic 70 205 4189
text 230 95 995 41
radio 270 120 210 211 0 4175
tilepic 225 120 4175
text 70 255 995 37
radio 130 280 210 211 0 4181
tilepic 75 280 4181
text 230 175 995 63
radio 270 205 210 211 0 4185
tilepic 220 205 4185
text 360 95 995 64
radio 405 120 210 211 0 4100
tilepic 355 120 4100
text 360 175 995 65
radio 405 205 210 211 0 4321
tilepic 360 205 4321
page 4
text 70 95 995 43
radio 130 120 210 211 0 4234
tilepic 70 120 4234
text 70 175 995 44
radio 130 205 210 211 0 4231
tilepic 70 205 4231
text 230 95 995 45
radio 270 120 210 211 0 4233
tilepic 230 120 4233
text 230 175 995 45
radio 270 205 210 211 0 4232
tilepic 220 205 4232
text 360 95 995 45
radio 405 120 210 211 0 4229
tilepic 355 120 4229
text 360 175 995 56
radio 405 205 210 211 0 4230
tilepic 360 205 4230
page 5
text 70 95 995 53
radio 130 120 210 211 0 4113
tilepic 80 120 4113
text 70 175 995 52
radio 130 205 210 211 0 4112
tilepic 70 205 4112
text 70 255 995 58
radio 130 280 210 211 0 2597
tilepic 75 280 2597
text 230 95 995 49
radio 270 120 210 211 0 2599
tilepic 215 120 2599
text 230 175 995 51
radio 270 205 210 211 0 4167
tilepic 220 195 4167
text 230 255 995 61
radio 270 280 210 211 0 6217
tilepic 220 280 6217
text 360 95 995 60
radio 405 120 210 211 0 6225
tilepic 355 120 6225
text 360 175 995 59
radio 405 205 210 211 0 5365
tilepic 360 205 5365
page 6
text 70 95 995 25
radio 130 120 210 211 0 4325
tilepic 80 120 4325
text 70 175 995 30
radio 130 205 210 211 0 4138
tilepic 70 205 4138
text 70 255 995 26
radio 130 280 210 211 0 4326
tilepic 75 280 4326
text 230 95 995 17
radio 270 120 210 211 0 4028
tilepic 225 120 4028
text 230 175 995 18
radio 270 205 210 211 0 5091
tilepic 220 205 5091
text 230 255 995 21
radio 270 280 210 211 0 3718
tilepic 220 280 3718
text 360 95 995 20
radio 405 120 210 211 0 3898
tilepic 300 120 3898
text 360 175 995 62
radio 405 205 210 211 0 4021
tilepic 360 205 4021
text 360 255 995 12
radio 405 280 210 211 0 5371
tilepic 360 290 5371
page 7
text 70 95 995 6
radio 130 120 210 211 0 5110
tilepic 75 120 5110
text 70 175 995 57
radio 130 205 210 211 0 3781
tilepic 70 205 3781
text 70 255 995 40
radio 130 280 210 211 0 3778
tilepic 75 280 3778
text 230 95 995 8
radio 270 120 210 211 0 2552
tilepic 250 120 2552
radio 215 120 210 211 0 2553
tilepic 210 120 2553
text 230 175 995 9
radio 270 205 210 211 0 2548
tilepic 235 205 2548
radio 215 205 210 211 0 2549
tilepic 220 205 2549
text 230 255 995 19
radio 270 280 210 211 0 2550
tilepic 245 280 2550
radio 215 280 210 211 0 2551
tilepic 215 280 2551
text 360 95 995 34
radio 405 120 210 211 0 2519
tilepic 360 120 2519
text 360 175 995 46
radio 405 205 210 211 0 2507
tilepic 360 205 2507
text 360 255 995 50
radio 405 280 210 211 0 4097
tilepic 360 280 4097

[DIALOG d_TINKER TEXT]
TINKER SELECTION MENU
Traps
Tools
Parts
Jewelry
Miscellaneous
butcher knife
Utensils
spoons
forks
More Tools
hatchet
lockpick
mortar & pestle
Poison Trap
Dart Trap
Explosion Trap
tongs
smith's hammer
knives
shovel
pickaxe
sewing kit
scissors
draw knife
froe
inshave
scorp
dovetail saw
saw
hammer
moulding plane
smoothing plane
jointing plane
plate
gears
springs
hinge
axle
clock frame
cleaver
clock parts
sticks
ring
earrings
necklace
goblet
fork
spoon
candelabra
pewter mug
globe
iron key
keyring
tinker's tools
Make Last
bracelet
skinning knife
lantern
spy glass
scales
heating stand
sledge hammer
sextant parts
keg tap
barrel hoops

[DIALOG D_TINKER button]

// ...

[DIALOG d_Travel]
// a travel dialog
0, 0	// this is always the size.
resizepic 0 0 3600 229 173
page 0
text 40 17 0 0   
text 40 37 1152 1
text 40 57 1152 2
text 40 77 1152 3
button 20 40 1209 1210 1 0 1      
button 20 60 1209 1210 1 0 2
button 20 80 1209 1210 1 0 3

[DIALOG d_Travel TEXT]
Welcome <SRC.NAME>
Towns
Dungeons
Special Places

[DIALOG d_Travel BUTTON]
ONBUTTON=0
	SYSMESSAGE=You've decided not to travel.
ONBUTTON=1 //TOWNS
SRC.DIALOG d_TravelTown
ONBUTTON=2 //DUNGEONS
SRC.DIALOG d_TravelDung
ONBUTTON=3  //SPECIAL PLACES
SRC.DIALOG d_TravelSpec 

[DIALOG d_TravelTown]                 //TOWNS
0, 0	// this is always the size.
resizepic 0 0 3600 215 200
page 0
text 40 17 0 0   
text 40 37 1152 1
text 40 57 1152 2
text 40 77 1152 3
text 40 97 1152 4
text 40 117 1152 5   
text 40 137 1152 6
text 40 157 0 7
button 20 40 1209 1210 1 0 1
button 20 60 1209 1210 1 0 2
button 20 80 1209 1210 1 0 3
button 20 100 1209 1210 1 0 4
button 20 120 1209 1210 1 0 5
button 20 140 1209 1210 1 0 7
button 20 160 1209 1210 1 0 6

[DIALOG d_TravelTown TEXT]
Which Town?
Britain
Serpent's Hold
Cove
Vesper
Bucaneer's Den
Papua
Previous

[DIALOG d_TravelTown BUTTON]
ONBUTTON=0
SYSMESSAGE=Menu Aborted
ONBUTTON=1 //BRITAIN
SRC.GO 1427,1697,0
ONBUTTON=2 //SERPENTS HOLD
SRC.GO 3009,3363,15
ONBUTTON=3 //COVE
SRC.GO 2264,1202,0
ONBUTTON=4 //VESPER
SRC.GO 2892,686,0
ONBUTTON=5 //BUCANEER'S DEN
SRC.GO 2733,2160,0
ONBUTTON=6//PREVIOUS
SRC.DIALOG d_Travel
ONBUTTON=7//PAPUA
SRC.GO=5726,3205,-3

[DIALOG d_TravelDung]               //DUNGEONS
0, 0	// this is always the size.
resizepic 0 0 3600 215 165
page 0
text 40 17 0 0   
text 40 37 1152 1
text 40 57 1152 2
text 40 77 1152 3
text 40 97 1152 4
text 40 117 0 5   
button 20 40 1209 1210 1 0 1
button 20 60 1209 1210 1 0 2
button 20 80 1209 1210 1 0 3
button 20 100 1209 1210 1 0 4
button 20 120 1209 1210 1 0 5

[DIALOG d_TravelDung TEXT]
Which Dungeon?
Destard
Despise
Deceit
Wrong
Previous

[DIALOG d_TravelDung BUTTON]
ONBUTTON=0
SYSMESSAGE=Menu Aborted
ONBUTTON=1 //DESTARD
SRC.GO=1182,2639,0
ONBUTTON=2 //DESPISE
SRC.GO=1300,1075,0
ONBUTTON=3 //DECEIT
SRC.GO=4115,433,5
ONBUTTON=4 //WRONG
SRC.GO=2049,238,10
ONBUTTON=5 //PREVIOUS
SRC.DIALOG d_Travel

[DIALOG d_TravelSpec]              //SPECIAL PLACES
0, 0	// this is always the size.
resizepic 0 0 3600 205 225
page 0
text 40 17 0 0   
text 40 37 1152 1
text 40 57 1152 2
text 40 77 1152 3
text 40 97 1152 4
text 40 117 1152 5  
text 40 137 1152 6  
text 40 157 1152 7 
text 40 177 0 8
button 20 40 1209 1210 1 0 1
button 20 60 1209 1210 1 0 2
button 20 80 1209 1210 1 0 3
button 20 100 1209 1210 1 0 4
button 20 120 1209 1210 1 0 5
button 20 140 1209 1210 1 0 6
button 20 160 1209 1210 1 0 7
button 20 180 1209 1210 1 0 8

[DIALOG d_TravelSpec TEXT]
Which Special Place?
Fight Night
Green Acres
Britain Graveyard
Britain Mines
Battle Arena
Special People
Star Chamber
Previous

[DIALOG d_TravelSpec BUTTON]
ONBUTTON=0
SYSMESSAGE=Menu Aborted
ONBUTTON=1 //Fight Night
SRC.GO=1971,811,25
ONBUTTON=2 //Green Acres
SRC.GO 5434,1099,0
ONBUTTON=3 //Britain Graveyard
SRC.GO=1384,1497,10
ONBUTTON=4 //Britain Mines
SRC.GO=1264,1256,0
ONBUTTON=5 //BATTLE ARENA
SRC.GO=5193,1180,0
ONBUTTON=6 //SPECIAL PEOPLE
SRC.GO=5187,1532,0
ONBUTTON=7 //STAR CHAMBER
SRC.GO=5146,1774,0
ONBUTTON=8 //PREVIOUS
SRC.DIALOG d_Travel


[DIALOG d_TravelSupply]             //SUPPLY HALL
// Sample dialog to travel to the supply hall.
0, 0	// this is always the size.
resizepic 0 0 3600 225 100
page 0
text 40 17 0 0   
text 40 37 1152 1
button 20 40 1209 1210 1 0 1

[DIALOG d_TravelSupply TEXT]
Where to?
Supply Room

[DIALOG d_TravelSupply BUTTON]
ONBUTTON=0
	SYSMESSAGE=Menu Aborted
ONBUTTON=1 //Supply Room
	SRC.GO=5271,1234,5

[DIALOG d_Advanced_Vending_Machine]
100 100
resizepic 0 0 5054 420 295
page 0
resizepic 10 10 83 395 275
text 130 20 42 0
text 160 60 154 2
button 35 94 1209 1210 1 0 1
text 55 90 96 3
button 35 119 1209 1210 1 0 2
text 55 115 10 4
button 35 144 1209 1210 1 0 3
text 55 140 169 5
text 130 180 154 6
button 35 209 1209 1210 1 0 4
text 55 205 33 7
button 35 234 1209 1210 1 0 5
text 55 230 1347 8

[DIALOG d_Advanced_Vending_Machine TEXT]
Vending Machine
*WARNING: HERE IS NO CONFIRMATION*
Reagents
Small Pack (10 of each reag) for 500 gp
Battle Pack (15 of each reag) for 750 gp
Mage's Pack (30 of each reag) for 1500 gp
Arrows and bolts
50 Arrows for 500 gp
50 Bolts for 500 gp

[DIALOG d_Advanced_Vending_Machine BUTTON]
ONBUTTON=0
ONBUTTON=1
	IF <SRC.RESTEST 500 i_GOLD>
		src.f_reagents_bounce 10
		SRC.CONSUME=500 i_GOLD
		SRC.MESSAGE=Here is your reagents. Thank you for your 500 gold.
		SRC.SOUND=0F7
		RETURN 1
	ELSE
		SRC.MESSAGE=You don't have enought gold - this will cost you 500 gold
	ENDIF

ONBUTTON=2
	IF <SRC.RESTEST 750 i_GOLD>
		src.f_reagents_bounce 15
		SRC.CONSUME=750 i_GOLD
		SRC.MESSAGE=Here is your reagents. Thank you for your 750 gold.
		SRC.SOUND=0F7
		RETURN 1
	ELSE
		SRC.MESSAGE=You don't have enought gold - this will cost you 750 gold
	ENDIF

ONBUTTON=3
	IF <SRC.RESTEST 1500 i_GOLD>
		src.f_reagents_bounce 30
		SRC.CONSUME=1500 i_GOLD
		SRC.MESSAGE=Here is your reagents. Thank you for your 1500 gold.
		SRC.SOUND=0F7
		RETURN 1
	ELSE
		SRC.MESSAGE=You don't have enought gold - this will cost you 1500 gold
	ENDIF

ONBUTTON=4

	IF <SRC.RESTEST 500 i_GOLD>
		SRC.NEWITEM=i_arrow
		SRC.ACT.AMOUNT=50
		SRC.ACT.BOUNCE
		SRC.CONSUME=500 i_GOLD
		SRC.MESSAGE That will be 500 Gold Thank Thee.
		SOUND 0F7
		RETURN 1
	ELSE
		MESSAGE You lack 500 Gold to pay.
	ENDIF

ONBUTTON=5

	IF <SRC.RESTEST 500 i_GOLD>
		SRC.NEWITEM=i_xbolt
		SRC.ACT.AMOUNT=50
		SRC.ACT.BOUNCE
		SRC.CONSUME=500 i_GOLD
		SRC.MESSAGE That will be 500 Gold Thank Thee.
		SOUND 0F7
		RETURN 1
	ELSE
		MESSAGE You lack 500 Gold to pay.
	ENDIF

[FUNCTION f_reagents_bounce]
	NEWITEM=i_reag_black_pearl
	ACT.AMOUNT=<argn>
	ACT.BOUNCE
	NEWITEM=i_reag_blood_moss
	ACT.AMOUNT=<argn>
	ACT.BOUNCE
	NEWITEM=i_reag_garlic
	ACT.AMOUNT=<argn>
	ACT.BOUNCE
	NEWITEM=i_reag_ginseng
	ACT.AMOUNT=<argn>
	ACT.BOUNCE
	NEWITEM=i_reag_mandrake_root
	ACT.AMOUNT=<argn>
	ACT.BOUNCE
	NEWITEM=i_reag_nightshade
	ACT.AMOUNT=<argn>
	ACT.BOUNCE
	NEWITEM=i_reag_sulfur_ash
	ACT.AMOUNT=<argn>
	ACT.BOUNCE
	NEWITEM=i_reag_spider_silk
	ACT.AMOUNT=<argn>
	ACT.BOUNCE
	return 1

[DIALOG d_Travel_Stone]
100 100
resizepic 0 0 5054 455 350
page 0
resizepic 10 10 83 430 330
text 150 20 52 0
text 30 50 92 1	// Towns for 1000 gp
text 240 50 36 2	// Dungeons for 5000 gp
text 50 80 52 3	// Britain
button 30 84 1209 1210 1 0 1
text 50 100 90 4	// Trinsic
button 30 104 1209 1210 1 0 2
text 50 120 90 5	// Vesper
button 30 124 1209 1210 1 0 3
text 50 140 90 6	// Minoc
button 30 144 1209 1210 1 0 4
text 50 160 90 7	// Cove
button 30 164 1209 1210 1 0 5
text 50 180 90 8	// Occlo
button 30 184 1209 1210 1 0 6
text 50 200 90 9	// Yew
button 30 204 1209 1210 1 0 7
text 50 220 90 10	// Jhelom
button 30 224 1209 1210 1 0 8
text 50 240 90 11	// Nujel'm
button 30 244 1209 1210 1 0 9
text 50 260 90 12	// Moonglow
button 30 264 1209 1210 1 0 10
text 50 280 37 13
button 30 284 1209 1210 1 0 11
text 50 300 37 14
button 30 304 1209 1210 1 0 12
text 270 100 42 15	// Destard
button 250 104 1209 1210 1 0 14
text 270 160 42 16	// Covetous
button 250 164 1209 1210 1 0 16
text 270 200 42 17	// Yew Crypts
button 250 204 1209 1210 1 0 17
text 270 220 42 18	// Shame
button 250 224 1209 1210 1 0 18
text 270 140 42 20	// Wrong
button 250 144 1209 1210 1 0 15
text 270 260 42 19	// Deceit
button 250 264 1209 1210 1 0 19
text 270 80 42 21	// Despise
button 250 84 1209 1210 1 0 13
text 270 300 42 22	// Hythloth
button 250 304 1209 1210 1 0 20

[DIALOG d_Travel_Stone TEXT]
Travel Stone
Towns for 1000 gp
Dungeons for 5000 gp
Britain
Trinsic
Vesper
Minoc
Cove
Occlo
Yew
Jhelom
Nujel'm
Moonglow
Serpent's Hold
Bucaneer's Den
Destard
Covetous
Yew Crypts
Shame
Deceit
Wrong
Despise
Hythloth

[DIALOG d_Travel_Stone BUTTON]
ONBUTTON=0

ONBUTTON=1	// Britain
if (<src.restest 1000 i_gold>)
	src.f_create_moongate 0
	if rand(100)==1
		src.act.morep 1013,1937,0
	else
		DORAND 3
			src.act.morep 1654,1464,0
			src.act.morep 1395,1511,10
			src.act.morep 1365,1763,13
		ENDDO
	endif
	src.act.name=Britain
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=2	// Trinsic: 1811,2780
if (<src.restest 1000 i_gold>)
	src.f_create_moongate 0
	if rand(100)==1
		src.act.morep 1703,2678,10
	else
		src.act.morep 1811,2780,0
	endif
	src.act.name=Trinsic
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=3	// Vesper
if (<src.restest 1000 i_gold>)
	src.f_create_moongate 0
	if rand(100)==1
		src.act.morep 2601,986,0
	else
		DORAND 3
			src.act.morep 2893,588,0
			src.act.morep 2810,710,0
			src.act.morep 2713,987,0
		ENDDO
	endif
	src.act.name=Vesper
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=4	// Minoc
if (<src.restest 1000 i_gold>)
	src.f_create_moongate 0
	if rand(100)==1
		src.act.morep 2672,519,16
	else
		DORAND 3
			src.act.morep 2514,638,0
			src.act.morep 2575,519,15
			src.act.morep 2546,373,15
		ENDDO
	endif
	src.act.name=Minoc
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=5	// Cove
if (<src.restest 1000 i_gold>)
	src.f_create_moongate 0
	if rand(100)==1
		src.act.morep 2209,1252,0
	else
		src.act.morep 2287,1210,0
	endif
	src.act.name=Cove
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=6	// Occlo
if (<src.restest 1000 i_gold>)
	src.f_create_moongate 0
	if rand(100)==1
		src.act.morep 3488,2836,1
	else
		DORAND 3
			src.act.morep 3572,2593,0
			src.act.morep 3663,2432,37
			src.act.morep 3792,2774,13
		ENDDO
	endif
	src.act.name=Occlo
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=7	// Yew
if (<src.restest 1000 i_gold>)
	src.f_create_moongate 0
	if rand(100)==1
		src.act.morep 687,1383,0
	else
		DORAND 2
			src.act.morep 695,1124,0
			src.act.morep 735,862,0
		ENDDO
	endif
	src.act.name=Yew
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=8	// Jhelom
if (<src.restest 1000 i_gold>)
	src.f_create_moongate 0
	if rand(100)==1
		src.act.morep 1128,3468,0
	else
		DORAND 3
			src.act.morep 1292,3706,0
			src.act.morep 1438,3674,0
			src.act.morep 1499,3771,5
		ENDDO
	endif
	src.act.name=Jhelom
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=9	// Nujel'm
if (<src.restest 1000 i_gold>)
	src.f_create_moongate 0
	if rand(100)==1
		src.act.morep 3522,1147,20
	else
		DORAND 2
			src.act.morep 3513,1208,0
			src.act.morep 3521,1108,20
		ENDDO
	endif
	src.act.name=Nujel'm
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=10	// Moonglow
if (<src.restest 1000 i_gold>)
	src.f_create_moongate 0
	if rand(100)==1
		src.act.morep 4664,1411,0
	else
		DORAND 3
			src.act.morep 4443,1202,0
			src.act.morep 4509,1093,0
			src.act.morep 4364,1100,0
		ENDDO
	endif
	src.act.name=Moonglow
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=11	// Serpent's Hold
if (<src.restest 1000 i_gold>)
	src.f_create_moongate <eval(color_o_bloodrock)>
	if rand(100)==1
		src.act.morep 2775,3546,0
	else
		DORAND 3
			src.act.morep 2904,3407,35
			src.act.morep 2892,3483,10
			src.act.morep 3011,3543,15
		ENDDO
	endif
	src.act.name=Serpent's Hold
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=12	// Bucaneer's Den
if (<src.restest 1000 i_gold>)
	src.f_create_moongate <eval(color_o_bloodrock)>
	if rand(100)==1
		src.act.morep 
	else
		DORAND 3
			src.act.morep 2745,2241,0
			src.act.morep 2678,2117,0
			src.act.morep 2748,2126,0
		ENDDO
	endif
	src.act.name=Bucaneer's Den
	src.f_take_money 1000
	return 0
else
	message You lack 1000 gold coins to pay for magic gate!
endif

ONBUTTON=13	// Despise
if (<src.restest 5000 i_gold>)
	src.f_create_moongate <eval(color_o_bloodrock)>
	if rand(100)==1
		src.act.morep 1349,1231,0
	else
		src.act.morep 1307,1081,0
	endif
	src.act.name=Despise
	src.f_take_money 5000
	return 0
else
	message You lack 5000 gold coins to pay for magic gate!
endif

ONBUTTON=14	// Destard
if (<src.restest 5000 i_gold>)
	src.f_create_moongate <eval(color_o_bloodrock)>
	if rand(100)==1
		src.act.morep 5163,1000,-5	// under the wyrm :)
	else
		src.act.morep 1175,2644,0
	endif
	src.act.name=Destard
	src.f_take_money 5000
	return 0
else
	message You lack 5000 gold coins to pay for magic gate!
endif

ONBUTTON=15	// Wrong
if (<src.restest 5000 i_gold>)
	src.f_create_moongate <eval(color_o_bloodrock)>
	if rand(100)==1
		src.act.morep 1932,314,0	// some cave
	else
		src.act.morep 2041,245,10
	endif
	src.act.name=Wrong
	src.f_take_money 5000
	return 0
else
	message You lack 5000 gold coins to pay for magic gate!
endif

ONBUTTON=16	// Covetous
if (<src.restest 5000 i_gold>)
	src.f_create_moongate <eval(color_o_bloodrock)>
	if rand(100)==1
		src.act.morep 2601,988,0
	else
		src.act.morep 2499,927,0
	endif
	src.act.name=Covetous
	src.f_take_money 5000
	return 0
else
	message You lack 5000 gold coins to pay for magic gate!
endif

ONBUTTON=17	// Yew Crypts
if (<src.restest 5000 i_gold>)
	src.f_create_moongate <eval(color_o_bloodrock)>
	if rand(100)==1
		src.act.morep 970,704,0
	else
		src.act.morep 972,770,0
	endif
	src.act.name=Yew Crypts
	src.f_take_money 5000
	return 0
else
	message You lack 5000 gold coins to pay for magic gate!
endif

ONBUTTON=18	// Shame
if (<src.restest 5000 i_gold>)
	src.f_create_moongate <eval(color_o_bloodrock)>
	if rand(100)==1
		src.act.morep 444,1580,0
	else
		src.act.morep 513,1567,0
	endif
	src.act.name=Shame
	src.f_take_money 5000
	return 0
else
	message You lack 5000 gold coins to pay for magic gate!
endif

ONBUTTON=19	// Deceit
if (<src.restest 5000 i_gold>)
	src.f_create_moongate <eval(color_o_bloodrock)>
	if rand(100)==1
		src.act.morep 4034,532,0
	else
		src.act.morep 4110,439,5
	endif
	src.act.name=Deceit
	src.f_take_money 5000
	return 0
else
	message You lack 5000 gold coins to pay for magic gate!
endif

ONBUTTON=20	// Hythloth
if (<src.restest 5000 i_gold>)
	src.f_create_moongate <eval(color_o_bloodrock)>
	if rand(100)==1
		src.act.morep 4594,3545,30
	else
		src.act.morep 4722,3826,0
	endif
	src.act.name=Hythloth
	src.f_take_money 5000
	return 0
else
	message You lack 5000 gold coins to pay for magic gate!
endif

[FUNCTION f_create_moongate]
	sfx 020e
	newitem i_moongate_blue
	act.color=<argn>
	act.p=<p>
	return 1

[FUNCTION f_take_money]
	act.timer=15
	act.attr=(<src.act.attr>|attr_decay)
	consume <argn> i_gold
	update
	message That is <argn> gold coins worth of magic gate!
	return 1

[EOF]
