Skip to content

Instantly share code, notes, and snippets.

@DarkLotus
Created February 27, 2016 07:30
Show Gist options
  • Select an option

  • Save DarkLotus/3e830ffe44d991a5bc0a to your computer and use it in GitHub Desktop.

Select an option

Save DarkLotus/3e830ffe44d991a5bc0a to your computer and use it in GitHub Desktop.
vendor.scp
VERSION=0.55
[ITEMDEF i_new_deed_vendor]
DEFNAME=i_new_deed_vendor
ID=i_deed
TYPE=t_scroll
NAME=contract of employment
RESOURCES=i_deed, i_gold
VALUE=217500
ON=@DClick
// Player must be attempting to place the vendor within Shopping Malls #1 or #2
IF !(STRMATCH("<SRC.REGION.NAME>","Shopping Mall")) && !(STRMATCH("<SRC.REGION.NAME>","Shopping Mall 2"))
SRC.SysMessage You must place the vendor within the mall!
RETURN 1
ENDIF
// Player must be standing on the deed, so it does not conflict SRC and CONT!
IF (<DISTANCE>>0) || (<SRC.CanSeeLos>!=1)
SPEAK You must stand on the deed to place a vendor.
RETURN 1
ENDIF
// Create new NPC and set money to 500
IF (<SRC.BODY>==c_man)
SRC.NEWNPC C_house_VENDOR
ELIF (<SRC.BODY>==c_woman)
SRC.NEWNPC C_house_VENDOR_F
ENDIF
SRC.ACT.FINDLAYER(29).MORE1=500
SRC.ACT.NAME=<SRC.NAME>
// Greeting on NPC create
SRC.ACT.SAY Greetings, I will be working for you.
// Set position same as pLayer
SRC.ACT.P <P>
// Set total vendor count for Player
SRC.TAG.VendorCount <EVAL <LINK.TAG.VendorCount>> + 1
// Set owner (TAG) for vendor
SRC.ACT.TAG.OwnerUID <SRC.UID>
SRC.TAG.Vendor <SRC.ACT.UID>
// Set custom memory & equip on vendor (Usage Unknown?)
SRC.NEWITEM i_custom_mem_vendor
SRC.ACT.COLOR memory_ipet
SRC.ACT.LINK <SRC.UID>
SRC.ACT.MORE <SRC.UID>
SRC.ACT.MORE2 memory_ipet
SRC.ACT.CONT <SRC.TAG.Vendor>
SRC.ACT.TIMER 60
// Update the player
SRC.UPDATE
// Remove deed
REMOVE
// Exit DClick
RETURN 1
// ENDIF
CATEGORY=Provisions - Deeds
SUBSECTION=Vendor Deeds
DESCRIPTION=Vendor Deed
[ITEMDEF i_custom_mem_vendor]
DEFNAME=i_custom_mem_vendor
ID=i_memory
NAME=Vendor Memory
ON=@Timer
LINK <MORE>
COLOR <MORE2>
TIMER 60
RETURN 1
[CHARDEF c_house_vendor]
DEFNAME=C_HOUSE_VENDOR
NAME=#NAMES_HUMANMALE the vendor
ID=C_MAN
CAN=mt_equip
HireDayWage=50
TSpeech=spk_house_vendor
ON=@Create
NPC=brain_vendor
// Set the color to a skin color
COLOR=colors_skin
// Set flags to Invulnerability & Paralyzed
FLAGS=000000005
// Set need to gold
NEED=i_gold
// Set speech color
SPEECHCOLOR 0035
// Set HiredWage (TAG)
TAG.HiredWage 0
// Set food
FOOD=100
// Set STR & DEX & INT
STR=100
DEX=100
INT=100
// Create Hair
ITEMNEWBIE=random_male_hair
COLOR=colors_hair
// Create Items
ITEM=i_shirt_plain
COLOR=colors_all
ITEM=random_pants
COLOR=colors_all
ITEM=random_shoes
COLOR=colors_neutral
CATEGORY=Civilized
SUBSECTION=Player Vendors
DESCRIPTION=Vendor Male
ON=@Click
Food=100
IF (0<TAG.OwnerUID>==<SRC.UID>) || (0<TAG.CoOwnerUID>==<SRC.UID>)
MESSAGE (*Vendor*)
IF (0<TAG.BuyFeature>==01)
MESSAGE [ Buying : Disabled ]
ELSE
MESSAGE [ Buying : Enabled ]
ENDIF
ENDIF
ON=@DClick
IF !(0<TAG.OwnerAgree>==02) && (0<TAG.OwnerUID>==<SRC.UID>)
TAG.VendorAgreement Rule I: You agree not to sell items which may mislead the customer. This includes, but is not limited to, empty bags, books or other items. This excludes Runes that give descriptions of items bieng sold and the price of rune must be 500000 or higher. If you are caught violating this rule, you may have your vendor removed with out any compensation or any notice what so ever. <VAR.BR><VAR.BR>Rule II: You agree not to sell items which make the vendor a Chance type buy system (ie. having boxes with items and some with nothing in them, having the buyer guess for the item). This form of selling, and stating it as a "lottery" is illegal. It is not a lottery, it is a illegal way of generating income. Any vendor caught abusing this law, will be removed without warning, or compensation.
DIALOG d_vendor_agreement
RETURN 1
ENDIF
IF (0<TAG.OwnerUID>==<SRC.UID>) || (0<TAG.CoOwnerUID>==<SRC.UID>) || (<SRC.ISGM>)
TAG.Active = 1
DIALOG d_vendor_main
SRC.SysMessage Say 'Help' for a list of vendor commands.
RETURN 1
ELSE
IF (0<TAG.BuyFeature>==01)
SPEAK This feature has been disabled by the owner.
RETURN 1
ENDIF
IF !(0<TAG.OwnerAgree>==02)
SPEAK My owner has not yet agreed to the vendor rules.
RETURN 1
ENDIF
SAY Aye, take a look at my goods.
BUY
RETURN 1
ENDIF
ON=@GetHit
IF (0<TAG.OwnerUID>==<SRC.UID>) || (0<TAG.CoOwnerUID>==<SRC.UID>)
SPEAK <SRC.SEX Sir/Madam>, I will work for you but not if you beat me!
RETURN 1
ENDIF
ON=@Hit
RETURN 1
ON=@NPCSeeNewPlayer
RETURN 1
[CHARDEF c_house_vendor_f]
DEFNAME=C_HOUSE_VENDOR_F
NAME=#NAMES_HUMANFEMALE the vendor
ID=C_WOMAN
CAN=mt_equip
HIREDAYWAGE=50
TSPEECH=spk_house_vendor
ON=@Create
// Set brain to vendor
NPC=brain_vendor
// Set the color to a skin color
COLOR=colors_skin
// Set flags to Invulnerability & Paralyzed
FLAGS=000000005
// Set need to gold
NEED=i_gold
// Set speech color
SPEECHCOLOR 0035
// Set HiredWage (TAG)
TAG.HiredWage 0
// Set food
FOOD=100
// Set STR & DEX & INT
STR=100
DEX=100
INT=100
// Create Hair
ITEMNEWBIE=random_female_hair
COLOR=colors_hair
// Create Items
ITEM=i_shirt_plain
COLOR=colors_all
ITEM=random_skirt
COLOR=colors_all
ITEM=random_shoes
COLOR=colors_neutral
CATEGORY=Civilized
SUBSECTION=Player Vendors
DESCRIPTION=Vendor Female
ON=@Click
Food=100
IF (0<TAG.OwnerUID>==<SRC.UID>) || (0<TAG.CoOwnerUID>==<SRC.UID>)
MESSAGE (*Vendor*)
IF (0<TAG.BuyFeature>==01)
MESSAGE [ Buying : Disabled ]
ELSE
MESSAGE [ Buying : Enabled ]
ENDIF
ENDIF
ON=@DClick
IF !(0<TAG.OwnerAgree>==02) && (0<TAG.OwnerUID>==<SRC.UID>)
TAG.VendorAgreement Rule I: You agree not to sell items which may mislead the customer. This includes, but is not limited to, empty bags, books or other items. This excludes Runes that give descriptions of items bieng sold and the price of rune must be 500000 or higher. If you are caught violating this rule, you may have your vendor removed with out any compensation or any notice what so ever. <VAR.BR><VAR.BR>Rule II: You agree not to sell items which make the vendor a chance type buy system (ie. having boxes with items and some with nothing in them, having the buyer guess for the item). This form of selling, and stating it as a "lottery" is illegal. It is not a lottery, it is a illegal way of generating income. Any vendor caught abusing this law, will be removed without warning, or compensation.
DIALOG d_vendor_agreement
RETURN 1
ENDIF
IF (0<TAG.OwnerUID>==<SRC.UID>) || (0<TAG.CoOwnerUID>==<SRC.UID>) || (<SRC.ISGM>)
TAG.Active = 1
DIALOG d_vendor_main
SRC.SysMessage Say 'Help' for a list of vendor commands.
RETURN 1
ELSE
IF (0<TAG.BuyFeature>==01)
SPEAK This feature has been disabled by the owner.
RETURN 1
ENDIF
IF !(0<TAG.OwnerAgree>==02)
SPEAK My owner has not yet agreed to the vendor rules.
RETURN 1
ENDIF
SAY Aye, take a look at my goods.
BUY
RETURN 1
ENDIF
ON=@GetHit
IF (0<TAG.OwnerUID>==<SRC.UID>) || (0<TAG.CoOwnerUID>==<SRC.UID>)
SPEAK <SRC.SEX Sir/Madam>, I will work for you but not if you beat me!
RETURN 1
ENDIF
ON=@Hit
RETURN 1
ON=@NPCSeeNewPlayer
RETURN 1
[SPEECH spk_house_vendor]
DEFNAME=spk_house_vendor
ON=help*
IF (0<TAG.OwnerUID>==<SRC.UID>) || (0<TAG.CoOwnerUID>==<SRC.UID>)
SRC.SysMessage <NAME> Price - Set price of an item in your vendors inventory
SRC.SYSMESSAGE
SRC.SysMessage <NAME> Inventory, or <NAME> Stock - View your vendors inventory
SRC.SYSMESSAGE
SRC.SysMessage <NAME> Customize - Customize your vendor
SRC.SYSMESSAGE
SRC.SysMessage <NAME> Cash - To collect the gold your vendor holds.
SRC.SYSMESSAGE
SRC.SysMessage <NAME> Turn - To change the direction your vendor is facing
RETURN 1
ELSE
RETURN 1
ENDIF
ON=buy*
IF (<DISTANCE>>1) || (<SRC.CanSeeLos>!=1)
RETURN 1
ENDIF
IF (0<TAG.BuyFeature>==01)
SPEAK This feature has been disabled by the owner.
RETURN 1
ENDIF
IF (0<TAG.OwnerUID>==<SRC.UID>) || (0<TAG.CoOwnerUID>==<SRC.UID>)
SPEAK This is your shop <SRC.SEX sir/madam>, just take what you want.
RETURN 1
ELSE
BUY
RETURN 1
ENDIF
ON=sell*
RETURN 1
ON=cash*
IF (<DISTANCE>>1) || (<SRC.CanSeeLos>!=1)
RETURN 1
ENDIF
IF (0<TAG.OwnerUID>==<SRC.UID>)
IF (<EVAL <FINDLAYER(29).MORE1>> > 1000)
CASH
ELSE
SRC.SysMessage You may not take out gold if the vendor holds less than 1000 gold pieces!
endif
RETURN 1
ELSE
RETURN 1
ENDIF
ON=turn*
IF (0<TAG.OwnerUID>==<SRC.UID>) || (0<TAG.CoOwnerUID>==<SRC.UID>) || (<SRC.ISGM>)
SPEAK I will turn any direction you wish.
FLIP
RETURN 1
ELSE
RETURN 1
ENDIF
ON=customize*
IF (<DISTANCE>>1) || !(<SRC.CanSeeLos>=1)
SPEAK You are too far away.
RETURN 1
ENDIF
IF (0<TAG.OwnerUID>==<SRC.UID>) || (0<TAG.CoOwnerUID>==<SRC.UID>) || (<SRC.ISGM>)
DIALOG d_vendor_customize
RETURN 1
ELSE
RETURN 1
ENDIF
ON=*
RETURN 1
[function f_CloseVendorDialogs]
dialogclose d_vendor_main 0
dialogclose d_vendor_customize 0
dialogclose d_vendor_agreement 0
dialogclose d_vend_color_select_layer_5_22 0
dialogclose d_vend_color_layer_5 0
dialogclose d_vend_color_layer_22 0
dialogclose d_vend_color_select_layer_4_23 0
dialogclose d_vend_color_layer_4 0
dialogclose d_vend_color_layer_23 0
dialogclose d_vend_color_select_layer_12_17 0
dialogclose d_vend_color_layer_12 0
dialogclose d_vend_color_layer_17 0
dialogclose d_vend_color_layer_6 0
dialogclose d_vend_color_layer_3 0
dialogclose d_vend_color_select_layer_3_20 0
dialogclose d_vend_color_layer_3 0
dialogclose d_vend_color_layer_20 0
dialogclose d_vend_color_select_layer_11_16 0
dialogclose d_vend_color_layer_11 0
dialogclose d_vend_color_layer_16 0
[DIALOG d_vendor_main]
60, 40
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 25 5054 450 340
resizepic 25 75 3000 400 200
resizepic 25 290 3000 400 40
text 25 40 1153 0
text 40 85 0 1
text 40 105 0 2
text 40 125 0 3
text 40 155 0 4
text 40 175 0 5
text 40 200 0 6
button 40 240 4005 4006 1 0 1
text 80 240 0 7
button 240 240 4005 4006 1 0 2
text 280 240 0 8
button 40 300 4005 4006 1 0 3
text 80 300 0 9
button 150 300 4005 4006 1 0 4
text 190 300 0 10
button 300 300 4005 4006 1 0 5
text 340 300 0 11
[DIALOG d_vendor_main TEXT]
Mythik - Vendor System v1.0
Service Time
UO Days : Infinite
Earth Days : Infinite
Accounting
Gold Stored : <EVAL <FINDLAYER(29).MORE1>>
Service Charge : <EVAL <TAG.HIREDWAGE>>
Enable Buy
Disable Buy
Stock
Customize
Rules
[DIALOG d_vendor_main BUTTON]
ONBUTTON=0
return 1
ONBUTTON=1
IF (0<TAG.BuyFeature>==01)
SPEAK Buying Enabled!
TAG.BuyFeature 00
RETURN 1
ELSE
SPEAK Buying feature already enabled!
RETURN 1
ENDIF
ONBUTTON=2
IF (0<TAG.BuyFeature>==00)
SPEAK Buying Disabled!
TAG.BuyFeature 01
RETURN 1
ELSE
SPEAK Buying feature already disabled!
RETURN 1
ENDIF
ONBUTTON=3
FINDLAYER(26).OPEN
RETURN 1
ONBUTTON=4
DIALOG d_vendor_customize
RETURN 1
ONBUTTON=5
TAG.VendorAgreement Rule I: You agree not to sell items which may mislead the customer. This includes, but is not limited to, empty bags, books or other items. This excludes Runes that give descriptions of items bieng sold and the price of rune must be 500000 or higher. If you are caught violating this rule, you may have your vendor removed with out any compensation or any notice what so ever. <VAR.BR><VAR.BR>Rule II: You agree not to sell items which make the vendor a chance type buy system (ie. having boxes with items and some with nothing in them, having the buyer guess for the item). This form of selling, and stating it as a "lottery" is illegal. It is not a lottery, it is a illegal way of generating income. Any vendor caught abusing this law, will be removed without warning, or compensation.
DIALOG d_vendor_agreement
[DIALOG d_vendor_agreement]
60, 40
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 25 5054 450 340
resizepic 25 290 3000 400 40
text 25 40 1153 0
text 200 300 1153 1
HTMLGump 25 75 400 200 2 3000 2
button 150 300 4005 4006 1 0 1
[DIALOG d_vendor_agreement TEXT]
Mythik - Vendor Agreement
I agree !
<TAG.VendorAgreement>
[DIALOG d_vendor_agreement BUTTON]
ONBUTTON=0
TAG.VendorAgreement
return 1
ONBUTTON=1
TAG.OwnerAgree 02
Dialog d_vendor_main
TAG.VendorAgreement
[dialog d_vendor_customize] // VENDOR CUSTOMIZATION
60,60 // Position
src.f_CloseVendorDialogs
page 0 // Page 0
resizepic 25 0 2600 500 400 // Backround
resizepic 45 60 5100 450 25 // Backround Rectangle Top
resizepic 45 330 5100 450 25 // Backround Rectangle Bottom
text 130 15 995 0 // Title Text
button 340 358 242 241 1 0 2 // Cancel Button 2
button 410 358 247 248 1 0 1 // Okay Button 1
text 60 60 0 1 // Upper Torso Text
button 160 63 5209 5003 0 1 0 // Upper Torso Button
text 190 60 0 15 // Over Chest Text
button 270 63 5209 5003 0 3 0 // Over Chest Button
text 300 60 0 32 // Footwear Text
button 370 63 5209 5003 0 5 0 // Footwear Button
text 400 60 0 19 // Hats Text
button 440 63 5209 5003 0 4 0 // Hats Button
text 65 330 0 11 // Lower Torso Text
button 165 333 5208 5003 0 2 0 // Lower Torso Button
text 195 330 0 37 // Back Text
button 245 333 5208 5003 0 6 0 // Back Button
text 275 330 0 39 // Hair Text
button 320 333 5208 5003 0 7 0 // Hair Button
text 350 330 0 50 // Held Items Text
button 450 333 5208 5003 0 8 0 // Held Items Button
page 1 // Page 1
text 70 95 995 3 // Shirt Text
button 130 120 210 211 1 0 3 // Shirt Button
tilepic 70 120 5399 // Shirt Picture
text 70 175 995 4 // Fancy Shirt Text
button 130 205 210 211 1 0 4 // Fancy Shirt Button
tilepic 75 200 7933 // Fancy Shirt Picture
text 70 255 995 7 // Plain Dress
button 130 280 210 211 1 0 5 // Plain Dress Button
tilepic 75 280 7937 // Plain Dress Picture
text 200 95 995 8 // Fancy Dress Text
button 270 120 210 211 1 0 6 // Fancy Dress Button
tilepic 210 110 7935 // Fancy Dress Picture
text 200 175 995 9 // Robe Text
button 270 205 210 211 1 0 7 // Robe Button
tilepic 210 200 7939 // Robe Picture
resizepic 85 358 5100 100 25 // Color Backround Box
text 95 360 0 59 // Color Text
button 150 361 210 211 1 0 8 // Color Button
resizepic 190 358 5100 100 25 // Remove Backround Box
text 205 360 0 60 // Remove Text
button 260 361 210 211 1 0 9 // Remove Button
page 2 // Page 2
text 100 120 995 12 // Fancy Pants Text
button 145 150 210 211 1 0 10 // Fancy Pants Button
tilepic 100 140 5433 // Fancy Pants Picture
text 100 220 995 13 // Kilt Text
button 145 250 210 211 1 0 11 // Kilt Button
tilepic 100 250 5431 // Kilt Pic
text 275 120 995 14 // Skirt Text
button 340 150 210 211 1 0 12 // Skirt Button
tilepic 280 140 5398 // Skirt Picture
resizepic 85 358 5100 100 25 // Color Backround Box
text 95 360 0 59 // Color Text
button 150 361 210 211 1 0 13 // Color Button
resizepic 190 358 5100 100 25 // Remove Backround Box
text 205 360 0 60 // Remove Text
button 260 361 210 211 1 0 14 // Remove Button
page 3 // Page 3
text 70 95 995 2 // Doublet Text
button 130 120 210 211 1 0 15 // Doublet Button
tilepic 65 120 8059 // Doublet Picture
text 200 95 995 5 // Tunic Text
button 270 120 210 211 1 0 16 // Tunic Button
tilepic 210 110 8097 // Tunic Picture
text 200 175 995 6 // Surcoat Text
button 270 205 210 211 1 0 17 // Surcoat Button
tilepic 210 200 8189 // Surcoat Picture
text 70 165 995 16 // Body Sash Text
button 130 205 210 211 1 0 18 // Body Sash Button
tilepic 80 200 5441 // Body Sash Picture
text 70 255 995 17 // Half Apron Text
button 130 280 210 211 1 0 19 // Half Apron Button
tilepic 75 280 5435 // Half Apron Picture
text 200 255 995 18 // Full Apron Text
button 270 280 210 211 1 0 20 // Full Apron Button
tilepic 210 280 5437 // Full Apron Picture
text 340 95 995 10 // Jesters Robe Text
button 400 120 210 211 1 0 21 // Jesters Robe Button
tilepic 330 115 8095 // Jesters Robe Picture
resizepic 85 358 5100 100 25 // Color Backround Box
text 95 360 0 59 // Color Text
button 150 361 210 211 1 0 22 // Color Button
resizepic 190 358 5100 100 25 // Remove Backround Box
text 205 360 0 60 // Remove Text
button 260 361 210 211 1 0 23 // Remove Button
page 4 // Page 4
text 70 95 995 20 // Hats Text
button 130 120 210 211 1 0 24 // Hats Button
tilepic 75 120 5444 // Hats Picture
text 70 175 995 21 // Bandana Text
button 130 205 210 211 1 0 25 // Bandana Button
tilepic 75 200 5440 // Bandana Picture
text 70 255 995 22 // Floopy Text
button 130 280 210 211 1 0 26 // Floppy Button
tilepic 75 280 5907 // Floppy Picture
text 180 95 995 23 // Wide Text
button 240 120 210 211 1 0 27 // Wide Button
tilepic 190 120 5908 // Wide Picture
text 180 175 995 24 // Cap Text
button 240 205 210 211 1 0 28 // Cap Button
tilepic 190 205 5909 // Cap Picture
text 180 255 995 25 // Tall Text
button 240 280 210 211 1 0 29 // Tall Button
tilepic 195 280 5910 // Tall Picture
text 305 95 995 26 // Straw Text
button 350 120 210 211 1 0 30 // Straw Button
tilepic 305 120 5911 // Straw Picture
text 305 175 995 27 // Wizards Text
button 350 205 210 211 1 0 31 // Wizards Button
tilepic 305 205 5912 // Wizards Picture
text 305 255 995 28 // Bonnet Text
button 350 280 210 211 1 0 32 // Bonnet Button
tilepic 310 280 5913 // Bonnet Picture
text 405 95 995 29 // Feathered Text
button 450 120 210 211 1 0 33 // Feathered Button
tilepic 405 120 5914 // Feathered Picture
text 405 175 995 30 // Tricone Text
button 450 205 210 211 1 0 34 // Tricone Button
tilepic 405 205 5915 // Tricone Picture
text 405 255 995 31 // Jesters Text
button 450 280 210 211 1 0 35 // Jesteres Button
tilepic 410 280 5916 // Jesteres Picture
resizepic 85 358 5100 100 25 // Color Backround Box
text 95 360 0 59 // Color Text
button 150 361 210 211 1 0 36 // Color Button
resizepic 190 358 5100 100 25 // Remove Backround Box
text 205 360 0 60 // Remove Text
button 260 361 210 211 1 0 37 // Remove Button
page 5 // Page 5
text 100 120 995 33 // Sandals Text
button 145 150 210 211 1 0 38 // Sandals Button
tilepic 100 140 5901 // Sandals Picture
text 100 220 995 34 // Shoes Text
button 145 250 210 211 1 0 39 // Shoes Button
tilepic 100 250 5904 // Shoes Picture
text 275 120 995 35 // Boots Text
button 340 150 210 211 1 0 40 // Boots Button
tilepic 280 140 5899 // Boots Picture
text 275 220 995 36 // Thigh Boots Text
button 340 250 210 211 1 0 41 // Thigh Boots Button
tilepic 280 240 5906 // Thigh Boots Picture
resizepic 85 358 5100 100 25 // Color Backround Box
text 95 360 0 59 // Color Text
button 150 361 210 211 1 0 42 // Color Picture
resizepic 190 358 5100 100 25 // Remove Backround Box
text 205 360 0 60 // Remove Text
button 260 361 210 211 1 0 43 // Remove Button
page 6 // Page 6
text 100 120 995 38 // Cloak Text
button 145 150 210 211 1 0 44 // Cloak Button
tilepic 85 150 5397 // Cloak Picture
resizepic 85 358 5100 100 25 // Color Backround Box
text 95 360 0 59 // Color Text
button 150 361 210 211 1 0 45 // Color Button
resizepic 190 358 5100 100 25 // Remove Backround Box
text 205 360 0 60 // Remove Text
button 260 361 210 211 1 0 46 // Remove Button
page 7 // Page 7
text 90 95 995 40 // Short Text
button 70 95 210 211 1 0 47 // Short Button
text 90 120 995 41 // Long Text
button 70 120 210 211 1 0 48 // Long Button
text 90 145 995 42 // Pony Tail Text
button 70 145 210 211 1 0 49 // Pony Tail Button
text 90 170 995 43 // Mohawk Text
button 70 170 210 211 1 0 50 // Mohawk Button
text 90 195 995 44 // Pageboy Text
button 70 195 210 211 1 0 51 // Pageboy Button
text 90 220 995 45 // Topknot Text
button 70 220 210 211 1 0 52 // Topknot Button
text 90 245 995 46 // Curly Text
button 70 245 210 211 1 0 53 // Curly Button
text 90 270 995 47 // Receeding Text
button 70 270 210 211 1 0 54 // Receeding Button
text 90 295 995 48 // 2 Tails Text
button 70 295 210 211 1 0 55 // 2 Tails Button
text 270 95 995 52 // Moustache Text
button 250 95 210 211 1 0 56 // Moustache Button
text 270 120 995 53 // Short Beard Text
button 250 120 210 211 1 0 57 // Short Beard Button
text 270 145 995 54 // Short Beard / Moustache Text
button 250 145 210 211 1 0 58 // Short Beard / Moustache Button
text 270 170 995 55 // Long Beard Text
button 250 170 210 211 1 0 59 // Long Beard Button
text 270 195 995 56 // Long Beard / Moustache Text
button 250 195 210 211 1 0 60 // Long Beard / Moustache Button
text 270 220 995 57 // Goatee Text
button 250 220 210 211 1 0 61 // Goatee Button
text 270 245 995 58 // Vandyke Text
button 250 245 210 211 1 0 62 // Vandyke Button
resizepic 85 358 5100 100 25 // Color Backround Box
text 95 360 0 59 // Color Text
button 150 361 210 211 1 0 63 // Color Button
resizepic 190 358 5100 100 25 // Remove Backround Box
text 205 360 0 60 // Remove Text
button 260 361 210 211 1 0 64 // Remove Button
page 8 // Page 8
text 90 95 995 64 // Fishing Pole Text
button 70 95 210 211 1 0 65 // Fishing Pole Button
text 90 120 995 65 // Pickaxe Text
button 70 120 210 211 1 0 66 // Pickaxe Button
text 90 145 995 66 // Pitchfork Text
button 70 145 210 211 1 0 67 // Pitchfork Button
text 90 170 995 67 // Cleaver Text
button 70 170 210 211 1 0 68 // Cleaver Button
text 90 195 995 68 // Mace Text
button 70 195 210 211 1 0 69 // Mace Button
text 90 220 995 69 // Torch Text
button 70 220 210 211 1 0 70 // Torch Button
text 90 245 995 70 // Hammer Text
button 70 245 210 211 1 0 71 // Hammer Button
text 90 270 995 71 // Longsword Text
button 70 270 210 211 1 0 72 // Longsword Button
text 90 295 995 72 // Gnarlled Staff Text
button 70 295 210 211 1 0 73 // Gnarlled Staff Button
text 270 95 995 73 // Crossbow Text
button 250 95 210 211 1 0 74 // Croosbow Button
text 270 120 995 74 // War Mace Text
button 250 120 210 211 1 0 75 // War Mace Button
text 270 145 995 75 // Two-Handed Axe Text
button 250 145 210 211 1 0 76 // Two-Handed Axe Button
text 270 170 995 76 // Spear Text
button 250 170 210 211 1 0 77 // Spear Button
text 270 195 995 77 // Katana Text
button 250 195 210 211 1 0 78 // Katana Button
text 270 220 995 78 // Spellbook Text
button 250 220 210 211 1 0 79 // Spellbook Button
resizepic 190 358 5100 100 25 // Remove Backround Box
text 205 360 0 60 // Remove Text
button 260 361 210 211 1 0 80 // Remove Button
[dialog d_vendor_customize TEXT] // VENDOR CUSTOMIZE TEXT
VENDOR CUSTOMIZATION MENU
Upper Torso
Doublet
Shirt
Fancy shirt
Tunic
Surcoat
Plain dress
Fancy dress
Robe
Jester's Robe
Lower Torso
Fancy pants
Kilt
Skirt
Over chest
Body sash
Half apron
Full apron
Hats
Skullcap
Bandana
Floppy
Wide
Cap
Tall
Straw
Wizards
Bonnet
Feathered
Tricorne
Jester's
Footwear
Sandals
Shoes
Boots
Thigh Boots
Back
Cloak
Hair
Short
Long
Pony Tail
Mohawk
Pageboy
Topknot
Curly
Receding
2 Tails
Bald
Held Items
None
Moustache
Short Beard
Short Beard / Moustache
Long Beard
Long Beard / Moustache
Goatee
VanDyke
Colorize
Remove
Change Name
Male
Change Greeting
Fishing Pole
Pickaxe
Pitchfork
Cleaver
Mace
Torch
Hammer
Long Sword
Gnarled Staff
Crossbow
War Mace
Two-Handed Axe
Spear
Katana
Spellbook
[dialog d_vendor_customize BUTTON] // VENDOR CUSTOMIZE BUTTON
ONBUTTON=0
RETURN 1
ONBUTTON=1
RETURN 1
ONBUTTON=2
RETURN 1
ONBUTTON=3 //shirt
IF (<SRC.RESTEST 100 i_gold>)
SRC.CONSUME 100 i_gold
FINDLAYER(5).REMOVE
FINDLAYER(22).REMOVE
SRC.NEWITEM 01517
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ONBUTTON=4 //fancy shirt
IF (<SRC.RESTEST 110 i_gold>)
SRC.CONSUME 110 i_gold
FINDLAYER(5).REMOVE
FINDLAYER(22).REMOVE
SRC.NEWITEM 01efd
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 110 gold to purchase this
ENDIF
ONBUTTON=5 //plain dress
IF (<SRC.RESTEST 135 i_gold>)
SRC.CONSUME 135 i_gold
FINDLAYER(5).REMOVE
FINDLAYER(22).REMOVE
SRC.NEWITEM 01f01
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 135 gold to purchase this
ENDIF
ONBUTTON=6 //fancy dress
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(22).REMOVE
SRC.NEWITEM 01eff
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=7 //robe
IF (<SRC.RESTEST 115 i_gold>)
SRC.CONSUME 115 i_gold
FINDLAYER(22).REMOVE
SRC.NEWITEM 01f03
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
FINDLAYER(22).COLOR=colors_all
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=8 // VENDOR CUSTOMIZE COLOR LAYER 5/22
IF (<FINDLAYER.5.UID>>0) && (<FINDLAYER.22.UID>>0)
DIALOG d_vend_color_select_layer_5_22
RETURN 1
ELSEIF (<FINDLAYER.5.UID>>0)
DIALOG d_vend_color_layer_5
RETURN 1
ELSE
DIALOG d_vend_color_layer_22
RETURN 1
ENDIF
ONBUTTON=9
FINDLAYER(5).REMOVE
FINDLAYER(22).REMOVE
RETURN 1
ONBUTTON=10 //fancy pants
IF (<SRC.RESTEST 75 i_gold>)
SRC.CONSUME 75 i_gold
FINDLAYER(4).REMOVE
SRC.NEWITEM 01539
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 75 gold to purchase this
ENDIF
ONBUTTON=11 //kilt
IF (<SRC.RESTEST 50 i_gold>)
SRC.CONSUME 50 i_gold
FINDLAYER(23).REMOVE
SRC.NEWITEM 01537
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 50 gold to purchase this
ENDIF
ONBUTTON=12 //skirt
IF (<SRC.RESTEST 50 i_gold>)
SRC.CONSUME 50 i_gold
FINDLAYER(23).REMOVE
SRC.NEWITEM 01516
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 50 gold to purchase this
ENDIF
ONBUTTON=13 // <<<<<-----COLOR BUTTON, ADD GUMP THERE
IF (<FINDLAYER.4.UID>>0) && (<FINDLAYER.23.UID>>0)
DIALOG d_vend_color_select_layer_4_23
RETURN 1
ELSEIF (<FINDLAYER.4.UID>>0)
DIALOG d_vend_color_layer_4
RETURN 1
ELSE
DIALOG d_vend_color_layer_23
RETURN 1
ENDIF
ONBUTTON=14
FINDLAYER(4).REMOVE
FINDLAYER(23).REMOVE
RETURN 1
ONBUTTON=15 //doublet
IF (<SRC.RESTEST 60 i_gold>)
SRC.CONSUME 60 i_gold
FINDLAYER(17).REMOVE
SRC.NEWITEM 01f7b
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 60 gold to purchase this
ENDIF
ONBUTTON=16 //tunic
IF (<SRC.RESTEST 60 i_gold>)
SRC.CONSUME 60 i_gold
FINDLAYER(17).REMOVE
SRC.NEWITEM 01fa1
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 60 gold to purchase this
ENDIF
ONBUTTON=17 //surcoat
IF (<SRC.RESTEST 75 i_gold>)
SRC.CONSUME 75 i_gold
FINDLAYER(17).REMOVE
SRC.NEWITEM 01ffd
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 75 gold to purchase this
ENDIF
ONBUTTON=18 //body sash
IF (<SRC.RESTEST 45 i_gold>)
SRC.CONSUME 45 i_gold
FINDLAYER(17).REMOVE
SRC.NEWITEM 01541
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 45 gold to purchase this
ENDIF
ONBUTTON=19 //half apron
IF (<SRC.RESTEST 45 i_gold>)
SRC.CONSUME 45 i_gold
FINDLAYER(12).REMOVE
SRC.NEWITEM 0153b
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 45 gold to purchase this
ENDIF
ONBUTTON=20 //full apron
IF (<SRC.RESTEST 55 i_gold>)
SRC.CONSUME 55 i_gold
FINDLAYER(17).REMOVE
SRC.NEWITEM 0153d
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 55 gold to purchase this
ENDIF
ONBUTTON=21 //jester suit
IF (<SRC.RESTEST 65 i_gold>)
SRC.CONSUME 65 i_gold
FINDLAYER(17).REMOVE
SRC.NEWITEM 01f9f
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 65 gold to purchase this
ENDIF
ONBUTTON=22 // <<<<<-----COLOR BUTTON, ADD GUMP THERE
IF (<FINDLAYER.12.UID>>0) && (<FINDLAYER.17.UID>>0)
DIALOG d_vend_color_select_layer_12_17
RETURN 1
ELSEIF (<FINDLAYER.12.UID>>0)
DIALOG d_vend_color_layer_12
RETURN 1
ELSE
DIALOG d_vend_color_layer_17
RETURN 1
ENDIF
ONBUTTON=23
FINDLAYER(12).REMOVE
FINDLAYER(17).REMOVE
RETURN 1
ONBUTTON=24 //skullcap
IF (<SRC.RESTEST 35 i_gold>)
SRC.CONSUME 35 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 01544
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 35 gold to purchase this
ENDIF
ONBUTTON=25 //bandana
IF (<SRC.RESTEST 35 i_gold>)
SRC.CONSUME 35 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 0153f
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 35 gold to purchase this
ENDIF
ONBUTTON=26 //floppy
IF (<SRC.RESTEST 45 i_gold>)
SRC.CONSUME 45 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 01713
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 45 gold to purchase this
ENDIF
ONBUTTON=27 //wide brim
IF (<SRC.RESTEST 50 i_gold>)
SRC.CONSUME 50 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 01714
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 50 gold to purchase this
ENDIF
ONBUTTON=28 //cap
IF (<SRC.RESTEST 50 i_gold>)
SRC.CONSUME 50 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 01715
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 50 gold to purchase this
ENDIF
ONBUTTON=29 //tall
IF (<SRC.RESTEST 55 i_gold>)
SRC.CONSUME 55 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 01716
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 55 gold to purchase this
ENDIF
ONBUTTON=30 //straw
IF (<SRC.RESTEST 55 i_gold>)
SRC.CONSUME 55 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 01717
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 55 gold to purchase this
ENDIF
ONBUTTON=31 //wizards
IF (<SRC.RESTEST 75 i_gold>)
SRC.CONSUME 75 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 01718
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 75 gold to purchase this
ENDIF
ONBUTTON=32 //bonet
IF (<SRC.RESTEST 60 i_gold>)
SRC.CONSUME 60 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 01719
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 60 gold to purchase this
ENDIF
ONBUTTON=33 //feathered
IF (<SRC.RESTEST 65 i_gold>)
SRC.CONSUME 65 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 0171a
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 65 gold to purchase this
ENDIF
ONBUTTON=34 //tricone
IF (<SRC.RESTEST 65 i_gold>)
SRC.CONSUME 65 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 0171b
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 65 gold to purchase this
ENDIF
ONBUTTON=35 //jesters
IF (<SRC.RESTEST 65 i_gold>)
SRC.CONSUME 65 i_gold
FINDLAYER(6).REMOVE
SRC.NEWITEM 0171c
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 65 gold to purchase this
ENDIF
ONBUTTON=36 // <<<<<-----COLOR BUTTON, ADD GUMP THERE
IF (<FINDLAYER.6.UID>>0)
DIALOG d_vend_color_layer_6
RETURN 1
ENDIF
ONBUTTON=37
FINDLAYER(6).REMOVE
RETURN 1
ONBUTTON=38 //sandals
IF (<SRC.RESTEST 25 i_gold>)
SRC.CONSUME 25 i_gold
FINDLAYER(3).REMOVE
SRC.NEWITEM 0170d
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 25 gold to purchase this
ENDIF
ONBUTTON=39 //shoes
IF (<SRC.RESTEST 35 i_gold>)
SRC.CONSUME 35 i_gold
FINDLAYER(3).REMOVE
SRC.NEWITEM 01710
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 35 gold to purchase this
ENDIF
ONBUTTON=40 //boots
IF (<SRC.RESTEST 40 i_gold>)
SRC.CONSUME 40 i_gold
FINDLAYER(3).REMOVE
SRC.NEWITEM 0170c
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 40 gold to purchase this
ENDIF
ONBUTTON=41 //thigh boots
IF (<SRC.RESTEST 45 i_gold>)
SRC.CONSUME 45 i_gold
FINDLAYER(3).REMOVE
SRC.NEWITEM 01712
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 45 gold to purchase this
ENDIF
ONBUTTON=42 // <<<<<-----COLOR BUTTON, ADD GUMP THERE
IF (<FINDLAYER.3.UID>>0)
DIALOG d_vend_color_layer_3
RETURN 1
ENDIF
ONBUTTON=43
FINDLAYER(3).REMOVE
RETURN 1
ONBUTTON=44 //cloak
IF (<SRC.RESTEST 75 i_gold>)
SRC.CONSUME 75 i_gold
FINDLAYER(20).REMOVE
SRC.NEWITEM 01515
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 75 gold to purchase this
ENDIF
ONBUTTON=45 // <<<<<-----COLOR BUTTON, ADD GUMP THERE
IF (<FINDLAYER.3.UID>>0) && (<FINDLAYER.20.UID>>0)
DIALOG d_vend_color_select_layer_3_20
RETURN 1
ELSEIF (<FINDLAYER.3.UID>>0)
DIALOG d_vend_color_layer_3
RETURN 1
ELSE
DIALOG d_vend_color_layer_20
RETURN 1
ENDIF
ONBUTTON=46
FINDLAYER(20).REMOVE
RETURN 1
ONBUTTON=47 //short hair
IF (<SRC.RESTEST 100 i_gold>)
SRC.CONSUME 100 i_gold
FINDLAYER(11).REMOVE
SRC.NEWITEM 0203b
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ONBUTTON=48 //long
IF (<SRC.RESTEST 100 i_gold>)
SRC.CONSUME 100 i_gold
FINDLAYER(11).REMOVE
SRC.NEWITEM 0203c
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ONBUTTON=49 //pony tail
IF (<SRC.RESTEST 100 i_gold>)
SRC.CONSUME 100 i_gold
FINDLAYER(11).REMOVE
SRC.NEWITEM 0203d
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ONBUTTON=50 //mohawk
IF (<SRC.RESTEST 100 i_gold>)
SRC.CONSUME 100 i_gold
FINDLAYER(11).REMOVE
SRC.NEWITEM 02044
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ONBUTTON=51 //pageboy
IF (<SRC.RESTEST 100 i_gold>)
SRC.CONSUME 100 i_gold
FINDLAYER(11).REMOVE
SRC.NEWITEM 02045
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ONBUTTON=52 //topknot
IF (<SRC.RESTEST 100 i_gold>)
SRC.CONSUME 100 i_gold
FINDLAYER(11).REMOVE
SRC.NEWITEM 0204a
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ONBUTTON=53 //curley
IF (<SRC.RESTEST 100 i_gold>)
SRC.CONSUME 100 i_gold
FINDLAYER(11).REMOVE
SRC.NEWITEM 02047
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ONBUTTON=54 //receding
IF (<SRC.RESTEST 100 i_gold>)
SRC.CONSUME 100 i_gold
FINDLAYER(11).REMOVE
SRC.NEWITEM 02048
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
RETURN 1
ONBUTTON=55 //2 tails
IF (<SRC.RESTEST 100 i_gold>)
SRC.CONSUME 100 i_gold
FINDLAYER(11).REMOVE
SRC.NEWITEM 02049
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ONBUTTON=56 //moustache
IF (<SRC.RESTEST 100 i_gold>)
IF (<BODY>==c_Man)
SRC.CONSUME 100 i_gold
FINDLAYER(16).REMOVE
SRC.NEWITEM 02041
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ELSE
SRC.SYSMESSAGE Female's cannot have facial hair!
ENDIF
ONBUTTON=57 //short beard
IF (<SRC.RESTEST 100 i_gold>)
IF (<BODY>==c_Man)
SRC.CONSUME 100 i_gold
FINDLAYER(16).REMOVE
SRC.NEWITEM 0203f
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ELSE
SRC.SYSMESSAGE Female's cannot have facial hair!
ENDIF
ONBUTTON=58 //short beard/moustache
IF (<SRC.RESTEST 100 i_gold>)
IF (<BODY>==c_Man)
SRC.CONSUME 100 i_gold
FINDLAYER(16).REMOVE
SRC.NEWITEM 0204b
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ELSE
SRC.SYSMESSAGE Female's cannot have facial hair!
ENDIF
ONBUTTON=59 //long beard
IF (<SRC.RESTEST 100 i_gold>)
IF (<BODY>==c_Man)
SRC.CONSUME 100 i_gold
FINDLAYER(16).REMOVE
SRC.NEWITEM 0203e
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ELSE
SRC.SYSMESSAGE Female's cannot have facial hair!
ENDIF
ONBUTTON=60 //long beard/moustache
IF (<SRC.RESTEST 100 i_gold>)
IF (<BODY>==c_Man)
SRC.CONSUME 100 i_gold
FINDLAYER(16).REMOVE
SRC.NEWITEM 0204c
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ELSE
SRC.SYSMESSAGE Female's cannot have facial hair!
ENDIF
ONBUTTON=61 //goatee
IF (<SRC.RESTEST 100 i_gold>)
IF (<BODY>==c_Man)
SRC.CONSUME 100 i_gold
FINDLAYER(16).REMOVE
SRC.NEWITEM 02040
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ELSE
SRC.SYSMESSAGE Female's cannot have facial hair!
ENDIF
ONBUTTON=62 //vandyke
IF (<SRC.RESTEST 100 i_gold>)
IF (<BODY>==c_Man)
SRC.CONSUME 100 i_gold
FINDLAYER(16).REMOVE
SRC.NEWITEM 0204d
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 100 gold to purchase this
ENDIF
ELSE
SRC.SYSMESSAGE Female's cannot have facial hair!
ENDIF
ONBUTTON=63 // <<<<<-----COLOR BUTTON, ADD GUMP THERE
IF (<FINDLAYER.11.UID>>0) && (<FINDLAYER.16.UID>>0)
DIALOG d_vend_color_select_layer_11_16
RETURN 1
ELSEIF (<FINDLAYER.11.UID>>0)
DIALOG d_vend_color_layer_11
RETURN 1
ELSE
DIALOG d_vend_color_layer_16
RETURN 1
ENDIF
ONBUTTON=64
FINDLAYER(11).REMOVE
FINDLAYER(16).REMOVE
RETURN 1
ONBUTTON=65 //fishing pole
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(2).REMOVE
SRC.NEWITEM 0dbf
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=66 //pickaxe
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(2).REMOVE
SRC.NEWITEM 0e86
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=67 //pitchfork
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(2).REMOVE
SRC.NEWITEM 0e87
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=68 //cleaver
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(1).REMOVE
SRC.NEWITEM 0ec3
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=69 //mace
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(1).REMOVE
SRC.NEWITEM 0f5c
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=70 //torch
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(2).REMOVE
SRC.NEWITEM 0f64
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=71 //hammer
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(1).REMOVE
SRC.NEWITEM 013e3
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=72 //longsword
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(1).REMOVE
SRC.NEWITEM 0f61
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=73 //gnarled staff
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(2).REMOVE
SRC.NEWITEM 013f8
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=74 //crossbow
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(2).REMOVE
SRC.NEWITEM 013fd
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=75 //war mace
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(1).REMOVE
SRC.NEWITEM 01407
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=76 //two-handed axe
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(2).REMOVE
SRC.NEWITEM 01443
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=77 //spear
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(2).REMOVE
SRC.NEWITEM 0f62
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=78 //katana
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(1).REMOVE
SRC.NEWITEM 013ff
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=79 //spellbook
IF (<SRC.RESTEST 150 i_gold>)
SRC.CONSUME 150 i_gold
FINDLAYER(1).REMOVE
SRC.NEWITEM 0efa
SRC.ACT.CONT=<SERIAL>
ACT.EQUIP
RETURN 1
ELSE
SRC.SysMessage You require 150 gold to purchase this
ENDIF
ONBUTTON=80
FINDLAYER(1).REMOVE
FINDLAYER(2).REMOVE
RETURN 1
////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// BEGIN VENDOR CUSTOMIZE COLOR
[DIALOG d_vend_color_select_layer_3_20] // VENDOR CUSTOMIZE COLOR CHOOSE LAYER 3/20
0,0 // Position
src.f_CloseVendorDialogs
resizepic 200 175 5054 400 300 // Curved Grey background
resizepic 210 185 3000 380 280 // Curved White background
resizepic 220 195 3000 360 100 // Curved White box
text 260 315 0000 0 // Continue Text
button 220 315 4005 4006 1 0 1 // Continue Button
text 260 340 0000 1 // Cancel Text
button 220 340 4005 4006 1 0 2 // Cancel Button
text 230 200 0000 2 // Description
text 230 215 0000 3 // Description
[DIALOG d_vend_color_select_layer_3_20 TEXT]
I want to change the footwear color // layer 3.
I want to change the cape color // layer 20.
You have chosen to color multiple items.
Which item do you wish to color?
[DIALOG d_vend_color_select_layer_3_20 BUTTON]
ONBUTTON=0
ONBUTTON=1
DIALOG d_vend_color_layer_3
RETURN 1
ONBUTTON=2
DIALOG d_vend_color_layer_20
RETURN 1
[DIALOG d_vend_color_layer_3] // VENDOR CUSTOMIZE COLOR LAYER 3
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_3 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_3 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(03).COLOR=colors_skin
ENDIF
[DIALOG d_vend_color_layer_20] // VENDOR CUSTOMIZE COLOR LAYER 20
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_20 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_20 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(20).COLOR=colors_skin
ENDIF
[DIALOG d_vend_color_select_layer_4_23] // VENDOR CUSTOMIZE COLOR CHOOSE LAYER 4/23
0,0 // Position
src.f_CloseVendorDialogs
resizepic 200 175 5054 400 300 // Curved Grey background
resizepic 210 185 3000 380 280 // Curved White background
resizepic 220 195 3000 360 100 // Curved White box
text 260 315 0000 0 // Continue Text
button 220 315 4005 4006 1 0 1 // Continue Button
text 260 340 0000 1 // Cancel Text
button 220 340 4005 4006 1 0 2 // Cancel Button
text 230 200 0000 2 // Description
text 230 215 0000 3 // Description
[DIALOG d_vend_color_select_layer_4_23 TEXT]
I want to change the pants color // layer 4.
I want to change the skirt or kilt color // layer 23.
You have chosen to color multiple items.
Which item do you wish to color?
[DIALOG d_vend_color_select_layer_4_23 BUTTON]
ONBUTTON=0
ONBUTTON=1
DIALOG d_vend_color_layer_4
RETURN 1
ONBUTTON=2
DIALOG d_vend_color_layer_23
RETURN 1
[DIALOG d_vend_color_layer_4] // VENDOR CUSTOMIZE COLOR LAYER 4
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_4 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_4 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(04).COLOR=colors_skin
ENDIF
[DIALOG d_vend_color_layer_23] // VENDOR CUSTOMIZE COLOR LAYER 23
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_23 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_23 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(23).COLOR=colors_skin
ENDIF
[DIALOG d_vend_color_select_layer_5_22] // VENDOR CUSTOMIZE COLOR CHOOSE LAYER 5/22
0,0 // Position
src.f_CloseVendorDialogs
resizepic 200 175 5054 400 300 // Curved Grey background
resizepic 210 185 3000 380 280 // Curved White background
resizepic 220 195 3000 360 100 // Curved White box
text 260 315 0000 0 // Continue Text
button 220 315 4005 4006 1 0 1 // Continue Button
text 260 340 0000 1 // Cancel Text
button 220 340 4005 4006 1 0 2 // Cancel Button
text 230 200 0000 2 // Description
text 230 215 0000 3 // Description
[DIALOG d_vend_color_select_layer_5_22 TEXT]
I want to change the shirt color // layer 5.
I want to change robe color //layer 22.
You have chosen to color multiple items.
Which item do you wish to color?
[DIALOG d_vend_color_select_layer_5_22 BUTTON]
ONBUTTON=0
ONBUTTON=1
DIALOG d_vend_color_layer_5
RETURN 1
ONBUTTON=2
DIALOG d_vend_color_layer_22
RETURN 1
[DIALOG d_vend_color_layer_5] // VENDOR CUSTOMIZE COLOR LAYER 5
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_5 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_5 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(5).COLOR=colors_skin
ENDIF
[DIALOG d_vend_color_layer_6] // VENDOR CUSTOMIZE COLOR LAYER 6
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_6 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_6 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(6).COLOR=colors_skin
ENDIF
[DIALOG d_vend_color_layer_22] // VENDOR CUSTOMIZE COLOR LAYER 22
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_22 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_22 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(22).COLOR=colors_skin
ENDIF
[DIALOG d_vend_color_select_layer_11_16] // VENDOR CUSTOMIZE COLOR CHOOSE LAYER 11/16
0,0 // Position
src.f_CloseVendorDialogs
resizepic 200 175 5054 400 300 // Curved Grey background
resizepic 210 185 3000 380 280 // Curved White background
resizepic 220 195 3000 360 100 // Curved White box
text 260 315 0000 0 // Continue Text
button 220 315 4005 4006 1 0 1 // Continue Button
text 260 340 0000 1 // Cancel Text
button 220 340 4005 4006 1 0 2 // Cancel Button
text 230 200 0000 2 // Description
text 230 215 0000 3 // Description
[DIALOG d_vend_color_select_layer_11_16 TEXT]
I want to change the hair color // layer 11.
I want to change the beard color // layer 16.
You have chosen to color multiple items.
Which item do you wish to color?
[DIALOG d_vend_color_select_layer_11_16 BUTTON]
ONBUTTON=0
ONBUTTON=1
DIALOG d_vend_color_layer_11
RETURN 1
ONBUTTON=2
DIALOG d_vend_color_layer_16
RETURN 1
[DIALOG d_vend_color_layer_11] // VENDOR CUSTOMIZE COLOR LAYER 11
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_11 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_11 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(11).COLOR=colors_skin
ENDIF
[DIALOG d_vend_color_layer_16] // VENDOR CUSTOMIZE COLOR LAYER 16
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_16 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_16 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(16).COLOR=colors_skin
ENDIF
[DIALOG d_vend_color_select_layer_12_17] // VENDOR CUSTOMIZE COLOR CHOOSE LAYER 12/17
0,0 // Position
src.f_CloseVendorDialogs
resizepic 200 175 5054 400 300 // Curved Grey background
resizepic 210 185 3000 380 280 // Curved White background
resizepic 220 195 3000 360 100 // Curved White box
text 260 315 0000 0 // Continue Text
button 220 315 4005 4006 1 0 1 // Continue Button
text 260 340 0000 1 // Cancel Text
button 220 340 4005 4006 1 0 2 // Cancel Button
text 230 200 0000 2 // Description
text 230 215 0000 3 // Description
[DIALOG d_vend_color_select_layer_12_17 TEXT]
I want to change the apron color // layer 12.
I want to change the tunic color // layer 17.
You have chosen to color multiple items.
Which item do you wish to color?
[DIALOG d_vend_color_select_layer_12_17 BUTTON]
ONBUTTON=0
ONBUTTON=1
DIALOG d_vend_color_layer_12
RETURN 1
ONBUTTON=2
DIALOG d_vend_color_layer_17
RETURN 1
[DIALOG d_vend_color_layer_12] // VENDOR CUSTOMIZE COLOR LAYER 12
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_12 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_12 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(12).COLOR=colors_skin
ENDIF
[DIALOG d_vend_color_layer_17] // VENDOR CUSTOMIZE COLOR LAYER 17
80, 80
src.f_CloseVendorDialogs
PAGE 0
resizepic 0 0 5054 327 369
resizepic 10 13 3500 304 344
text 68 27 0 0
button 45 55 4005 4006 1 0 1
button 45 78 4005 4006 1 0 2
button 45 101 4005 4006 1 0 3
button 45 124 4005 4006 1 0 4
text 80 55 0 1
text 80 78 1152 2
text 80 101 0 3
text 80 124 2010 4
button 45 147 4005 4006 1 0 5
text 80 147 32 5
button 45 170 4005 4006 1 0 6
button 45 193 4005 4006 1 0 7
button 45 239 4005 4006 1 0 8
button 45 262 4005 4006 1 0 9
button 45 285 4005 4006 1 0 10
button 45 308 4005 4006 1 0 11
button 175 55 4005 4006 1 0 12
button 175 78 4005 4006 1 0 13
button 175 101 4005 4006 1 0 14
text 80 170 102 6
text 80 193 152 7
text 80 239 1501 8
text 80 262 1101 9
text 80 285 1201 10
text 80 308 1801 11
text 210 55 2001 12
text 210 78 301 13
text 210 101 270 14
button 45 216 4005 4006 1 0 15
text 80 216 162 15
button 175 124 4005 4006 1 0 16
button 175 147 4005 4006 1 0 17
text 210 124 2011 16
text 210 147 1106 17
text 210 170 95 18
text 210 193 32 19
text 210 216 31 20
button 175 170 4005 4006 1 0 18
button 175 193 4005 4006 1 0 19
button 175 216 4005 4006 1 0 20
button 175 239 4005 4006 1 0 21
text 210 239 53 21
text 210 262 162 22
text 210 285 2010 23
button 175 262 4005 4006 1 0 22
button 175 285 4005 4006 1 0 23
button 175 308 4005 4006 1 0 24
text 210 308 455 24
[DIALOG d_vend_color_layer_17 TEXT]
Randomized Color Selection
Random
White
Black
Brown
Red
Blue
Yellow
Orange
Gray
Pink
Neutral
Snake
Bird
Slime
Green
Animal
Daemon
Wyrm
Dragon
Blood
Lava
Poison
Hair
Skin
[DIALOG d_vend_color_layer_17 BUTTON]
on=1
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_all
ENDIF
on=2
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_white
ENDIF
on=3
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_black
ENDIF
on=4
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_brown
ENDIF
on=5
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_red
ENDIF
on=6
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_blue
ENDIF
on=7
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_yellow
ENDIF
on=8
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_orange
ENDIF
on=9
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_gray
ENDIF
on=10
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_pink
ENDIF
on=11
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_neutral
ENDIF
on=12
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_snake
ENDIF
on=13
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_bird
ENDIF
on=14
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_slime
ENDIF
on=15
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_orange
ENDIF
on=16
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_animal
ENDIF
on=17
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_daemon
ENDIF
on=18
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_wyrm
ENDIF
on=19
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_red_drag
ENDIF
on=20
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_blood
ENDIF
on=21
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_lava
ENDIF
on=22
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_poison
ENDIF
on=23
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_hair
ENDIF
on=24
IF (<SRC.RESTEST 200 i_gold>)
SRC.CONSUME 200 i_gold
FINDLAYER(17).COLOR=colors_skin
ENDIF
[EOF]
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment