SupplyStone - UoKit.com Форумы


			Помощь Поиск Пользователи Календарь Правила

Здравствуйте, гость ( Вход | Регистрация )

UoKit.com Форумы > Ultima Online : Dev > Sphere Server > Архив готовых скриптов

ОБЩИЕ ПРАВИЛА ФОРУМА

Ответить в эту тему

Открыть новую тему

SupplyStone

h00lig@H	12.8.2004, 13:59 Сообщение #1
Neophyte Сообщений: 28 Регистрация: 3.8.2004 Группа: Пользователи Наличность: 0 Из: Lativa Пользователь №: 2.093	Vot vam scriptix kanesna starij nu poleznij! [ITEMDEF i_supply_stone] //Supply Stones Created by Gm Jes Name=Supply Stone ID=01184 ON=@CREATE ATTR=00010 COLOR=07b3 CATEGORY=!!Custom!! SUBSECTION=Special Stones DESCRIPTION=Supply Stone ON=@DCLICK DIALOG d_Supplies return 1 [ITEMDEF i_mini_supply_stone] Name=Supply Stone ID=0186e ON=@CREATE COLOR=07b1 ATTR=00010 CATEGORY=!!Custom!! SUBSECTION=Special Stones DESCRIPTION=Mini-supply stone ON=@DCLICK DIALOG d_Supplies return 1 ///////////////////////////////////////////////////////////////// //////// Supplies Dialog /////////////////////////////////////// //////// Scripted by:Gm Jes//////////////////////////////////// ////////////////////////////////////////////////////////////// [DIALOG d_Supplies] 0, 0 // this is always the size. resizepic 0 0 3600 345 345 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 177 1152 7 text 40 157 1152 8 text 40 197 1152 9 text 40 217 1152 10 text 40 237 1152 11 text 40 260 1152 12 text 40 280 1152 13 text 40 300 1152 14 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 button 20 200 1209 1210 1 0 9 button 20 220 1209 1210 1 0 10 button 20 240 1209 1210 1 0 11 button 20 260 1209 1210 1 0 12 button 20 280 1209 1210 1 0 13 [DIALOG d_Supplies TEXT] Welcome <SRC.NAME>, Have Fun! Reagents - Normal (800 gp) Reagents - Pagan (1.4k) Bottles Arrows Bolts Bandages Deeds ATM Card (8k) Travel Menu Character Status (300gp) Full Spellbook (1k) Runebook (1k) Recall Skrolls (10 for 1k) Supply stone Created by: GM Jes & corected by GM Mr XX [DIALOG d_Supplies BUTTON] ONBUTTON=0 MESSAGE Menu Aborted ONBUTTON=1 //norm regs IF <SRC.GM>==1 SRC.NEWITEM=0f7a SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7b SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f84 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f85 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f86 SRC.ACT.AMOUNT=90 SRC.ACT.BOUNCE SRC.NEWITEM=0f88 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8c SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8d SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 800 i_gold> SRC.NEWITEM=0f7a SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7b SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f84 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f85 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f86 SRC.ACT.AMOUNT=90 SRC.ACT.BOUNCE SRC.NEWITEM=0f88 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8c SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8d SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.CONSUME=800 i_gold SRC.MESSAGE That will be 800 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 800 Gold to pay! ENDIF ONBUTTON=2 //necro regs IF <SRC.GM>==1 SRC.NEWITEM=0f89 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f78 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f79 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7c SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7d SRC.ACT.AMOUNT=90 SRC.ACT.BOUNCE SRC.NEWITEM=0f7e SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7f SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f80 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f81 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f82 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f83 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f87 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8a SRC.ACT.AMOUNT=90 SRC.ACT.BOUNCE SRC.NEWITEM=0f8b SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8e SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8f SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f90 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f81 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.GM>==1 SRC.NEWITEM=0f89 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f78 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f79 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7c SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7d SRC.ACT.AMOUNT=90 SRC.ACT.BOUNCE SRC.NEWITEM=0f7e SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7f SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f80 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f81 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f82 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f83 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f87 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8a SRC.ACT.AMOUNT=90 SRC.ACT.BOUNCE SRC.NEWITEM=0f8b SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8e SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8f SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f90 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f81 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.GM>==1 SRC.NEWITEM=0f89 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f78 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f79 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7c SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7d SRC.ACT.AMOUNT=90 SRC.ACT.BOUNCE SRC.NEWITEM=0f7e SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7f SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f80 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f81 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f82 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f83 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f87 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8a SRC.ACT.AMOUNT=90 SRC.ACT.BOUNCE SRC.NEWITEM=0f8b SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8e SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8f SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f90 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f81 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 1400 i_gold> SRC.NEWITEM=0f89 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f78 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f79 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7c SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7d SRC.ACT.AMOUNT=90 SRC.ACT.BOUNCE SRC.NEWITEM=0f7e SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f7f SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f80 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f81 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f82 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f83 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f87 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8a SRC.ACT.AMOUNT=90 SRC.ACT.BOUNCE SRC.NEWITEM=0f8b SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8e SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f8f SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f90 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.NEWITEM=0f81 SRC.ACT.AMOUNT=80 SRC.ACT.BOUNCE SRC.CONSUME=1400 i_gold SRC.MESSAGE That will be 1400 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 1400 Gold to pay! ENDIF ONBUTTON=3 SRC.DIALOG d_Suppliesbottles ONBUTTON=4 SRC.DIALOG d_Suppliesarrows ONBUTTON=5 SRC.DIALOG d_Suppliesbolts ONBUTTON=6 SRC.DIALOG d_Suppliesaids ONBUTTON=7 IF <SRC.GM>==1 SRC.NEWITEM=i_atm_card src.act.bounce SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 8000 i_gold> SRC.NEWITEM=i_atm_card src.act.bounce SRC.CONSUME=8000 i_gold else MESSAGE You Lack 8000 Gold to pay! ENDIF ONBUTTON=8 SRC.DIALOG d_deedsmenu ONBUTTON=9 IF <src.GM>==1 src.DIALOG d_stone_travel ELSE src.Say No Exit for you! src.Emote Feels violated src.tl src.DIALOG d_stone_travel ONBUTTON=10 IF <SRC.GM>==1 Message Have Fun <src.Name> src.DIALOG d_status SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 300 i_gold> SRC.CONSUME=300 i_gold Message Have fun <src.Name> src.DIALOG d_Status else MESSAGE You Lack 300 GP?!pathetic... ENDIF ONBUTTON=11 IF <Src.GM>==1 SRC.NEWITEM=i_spellbook_full1 SRC.Act.bounce SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 1000 i_gold> SRC.NEWITEM=i_spellbook_full1 SRC.act.Bounce SRC.ATTR=04 src.consume=1000 i_gold ELSE message you lack 1k for this item. ONBUTTON=12 IF <Src.GM>==1 SRC.NEWITEM=i_runebook1 SRC.Act.bounce SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 1000 i_gold> SRC.NEWITEM=i_runebook1 SRC.act.Bounce SRC.ATTR=04 src.consume=1000 i_gold ELSE message you lack 1k for this item. ONBUTTON=13 IF <Src.GM>==1 SRC.NEWITEM=i_scroll_recall SRC.ACT.AMOUNT=10 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 1000 i_gold> SRC.NEWITEM=i_scroll_recall SRC.ACT.AMOUNT=10 SRC.ACT.BOUNCE src.consume=1000 i_gold ELSE message you lack 1k for this item. [DIALOG d_Suppliesbottles] 0, 0 // this is always the size. resizepic 0 0 3600 300 173 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 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 [DIALOG d_Suppliesbottles TEXT] How many bottles do you want? 20 Bottles (100 gp) 60 Bottles (500 gp) 300 Bottles (1500 gp) Main Menu [DIALOG d_Suppliesbottles BUTTON] ONBUTTON=0 SYSMESSAGE Menu Aborted ONBUTTON=1 IF <SRC.GM>==1 SRC.NEWITEM=0f0e SRC.ACT.AMOUNT=20 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 100 i_gold> SRC.NEWITEM=0f0e SRC.ACT.AMOUNT=20 SRC.ACT.BOUNCE SRC.CONSUME=100 i_gold SRC.MESSAGE That will be 100 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 100 Gold to pay! ENDIF ONBUTTON=2 IF <SRC.GM>==1 SRC.NEWITEM=0f0e SRC.ACT.AMOUNT=60 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 500 i_gold> SRC.NEWITEM=0f0e SRC.ACT.AMOUNT=60 SRC.ACT.BOUNCE SRC.CONSUME=500 i_gold SRC.MESSAGE That will be 500 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 500 Gold to pay! ENDIF ONBUTTON=3 IF <SRC.GM>==1 SRC.NEWITEM=0f0e SRC.ACT.AMOUNT=300 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 1500 i_gold> SRC.NEWITEM=0f0e SRC.ACT.AMOUNT=300 SRC.ACT.BOUNCE SRC.CONSUME=1500 i_gold SRC.MESSAGE That will be 1500 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 1500 Gold to pay! ENDIF ONBUTTON=4 SRC.DIALOG d_Supplies [DIALOG d_Suppliesarrows] 0, 0 // this is always the size. resizepic 0 0 3600 300 179 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 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 [DIALOG d_Suppliesarrows TEXT] How many arrows do you want? 50 Arrows (100 gp) 100 Arrows (500 gp) 200 Arrows (1500 gp) Main Menu [DIALOG d_Suppliesarrows BUTTON] ONBUTTON=0 SYSMESSAGE Menu Aborted ONBUTTON=1 IF <SRC.GM>==1 SRC.NEWITEM=0f3f SRC.ACT.AMOUNT=50 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 100 i_gold> SRC.NEWITEM=0f3f SRC.ACT.AMOUNT=50 SRC.ACT.BOUNCE SRC.CONSUME=100 i_gold SRC.MESSAGE That will be 100 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 100 Gold to pay! ENDIF ONBUTTON=2 IF <SRC.GM>==1 SRC.NEWITEM=0f3f SRC.ACT.AMOUNT=100 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 500 i_gold> SRC.NEWITEM=0f3f SRC.ACT.AMOUNT=100 SRC.ACT.BOUNCE SRC.CONSUME=500 i_gold SRC.MESSAGE That will be 500 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 500 Gold to pay! ENDIF ONBUTTON=3 IF <SRC.GM>==1 SRC.NEWITEM=0f3f SRC.ACT.AMOUNT=200 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 1500 i_gold> SRC.NEWITEM=0f3f SRC.ACT.AMOUNT=200 SRC.ACT.BOUNCE SRC.CONSUME=1500 i_gold SRC.MESSAGE That will be 1500 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 1500 Gold to pay! ENDIF ONBUTTON=4 SRC.DIALOG d_Supplies [DIALOG d_Suppliesbolts] 0, 0 // this is always the size. resizepic 0 0 3600 300 173 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 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 [DIALOG d_Suppliesbolts TEXT] How many bolts do you want? 50 Bolts (100 gp) 100 Bolts (500 gp) 200 Bolts (1500 gp) Main Menu [DIALOG d_Suppliesbolts BUTTON] ONBUTTON=0 SYSMESSAGE Menu Aborted ONBUTTON=1 IF <SRC.GM>==1 SRC.NEWITEM=01bfb SRC.ACT.AMOUNT=50 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 100 i_gold> SRC.NEWITEM=01bfb SRC.ACT.AMOUNT=50 SRC.ACT.BOUNCE SRC.CONSUME=100 i_gold SRC.MESSAGE That will be 100 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 100 Gold to pay! ENDIF ONBUTTON=2 IF <SRC.GM>==1 SRC.NEWITEM=01bfb SRC.ACT.AMOUNT=100 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 500 i_gold> SRC.NEWITEM=01bfb SRC.ACT.AMOUNT=100 SRC.ACT.BOUNCE SRC.CONSUME=500 i_gold SRC.MESSAGE That will be 500 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 500 Gold to pay! ENDIF ONBUTTON=3 IF <SRC.GM>==1 SRC.NEWITEM=01bfb SRC.ACT.AMOUNT=200 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 1500 i_gold> SRC.NEWITEM=01bfb SRC.ACT.AMOUNT=200 SRC.ACT.BOUNCE SRC.CONSUME=1500 i_gold SRC.MESSAGE That will be 1500 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 1500 Gold to pay! ENDIF ONBUTTON=4 SRC.DIALOG d_Supplies [DIALOG d_Suppliesaids] 0, 0 // this is always the size. resizepic 0 0 3600 690 173 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 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 [DIALOG d_Suppliesaids TEXT] How many Bandages do you want? 60 Bandages (500 gp) 200 Bandages (1500 gp) 500 Bandages (3500 gp) [WARNING: These are heavy! Be careful about your weight.] Main Menu [DIALOG d_Suppliesaids BUTTON] ONBUTTON=0 SYSMESSAGE Menu Aborted ONBUTTON=1 IF <SRC.GM>==1 SRC.NEWITEM=0e21 SRC.ACT.AMOUNT=60 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 500 i_gold> SRC.NEWITEM=0e21 SRC.ACT.AMOUNT=60 SRC.ACT.BOUNCE SRC.CONSUME=500 i_gold SRC.MESSAGE That will be 500 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You lack 500 Gold to pay! ENDIF ONBUTTON=2 IF <SRC.GM>==1 SRC.NEWITEM=0e21 SRC.ACT.AMOUNT=200 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 1500 i_gold> SRC.NEWITEM=0e21 SRC.ACT.AMOUNT=200 SRC.ACT.BOUNCE SRC.CONSUME=1500 i_gold SRC.MESSAGE That will be 1500 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 1500 Gold to pay! ENDIF ONBUTTON=3 IF <SRC.GM>==1 SRC.NEWITEM=0e21 SRC.ACT.AMOUNT=500 SRC.ACT.BOUNCE SRC.Message Since you are a GM you get it free! SOUND 0F7 RETURN 1 ELSE IF <SRC.RESTEST 3500 i_gold> SRC.NEWITEM=0e21 SRC.ACT.AMOUNT=500 SRC.ACT.BOUNCE SRC.CONSUME=3500 i_gold SRC.MESSAGE That will be 3500 Gold. SOUND 0F7 RETURN 1 ELSE MESSAGE You Lack 3500 Gold to pay! ENDIF ONBUTTON=4 SRC.DIALOG d_Supplies [ITEMDEf i_atm_card] ID=01f14 NAME=ATM Card Type=0 ON=@CREATE COLOR=0481 ATTR=ATTR_NEWBIE ON=@DCLICK SRC.SYSMESSAGE You can only use this at an ATM! Return 1 [ITEMDEF i_atm_stone] NAME=ATM ID=00edc ON=@CREATE COLOR=0481 ATTR=0010 ON=@DCLICK IF <SRC.GM>==1 SRC.BANKSELF ELSE IF <SRC.RESTEST 1 i_atm_card> SRC.BANKSELF SRC.SYSMESSAGE You have accessed your bank box using your ATM card! Return 1 ELSE SRC.SYSMESSAGE You must have an ATM Card to access the ATM! Return 1 [DIALOG d_deedsmenu] 0, 0 // this is always the size. resizepic 0 0 3600 345 180 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 127 1152 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 130 1209 1210 1 0 5 [DIALOG d_deedsmenu TEXT] Welcome <SRC.NAME>, Choose your Deed Anvil (10k) Forge (10k) Spinning wheel (10k) Locked Chest (10k ) Main Menu [DIALOG d_deedsmenu BUTTON] ONBUTTON=0 MESSAGE Menu Aborted ONBUTTON=1 IF <SRC.GM>==1 SRC.NEWITEM=I_DEED_Anvil SRC.ACT.BOUNCE Return 1 Else IF <SRC.RESTEST 10000 i_gold> SRC.NEWITEM=I_DEED_Anvil SRC.ACT.BOUNCE SRC.CONSUME=10000 i_gold Else message You lack the 100k to pay for this item Endif ONBUTTON=2 ON=0 Forge deed (10k) IF <SRC.GM>==1 SRC.NEWITEM=I_DEED_FORGE SRC.ACT.BOUNCE Return Else IF <SRC.RESTEST 1000 i_gold> SRC.NEWITEM=I_DEED_FORGE SRC.ACT.BOUNCE SRC.CONSUME=1000 i_gold Else message You lack the 10k to pay for this item Endif ONBUTTON=3 IF <SRC.GM>==1 SRC.NEWITEM=I_DEED_Spinwheel SRC.ACT.BOUNCE Return 1 Else IF <SRC.RESTEST 10000 i_gold> SRC.NEWITEM=I_DEED_Spinwheel SRC.ACT.BOUNCE SRC.CONSUME=10000 i_gold Else message You lack the 10k to pay for this item Endif ONBUTTON=4 IF <SRC.GM>==1 SRC.NEWITEM=I_DEED_LOCKED_CHEST_4 SRC.ACT.BOUNCE Return 1 Else IF <SRC.RESTEST 1000 i_gold> SRC.NEWITEM=I_DEED_LOCKED_CHEST_4 SRC.ACT.BOUNCE SRC.CONSUME=10000 i_gold Else message You lack the 10000 gp to pay for this item Endif ONBUTTON=5 src.DIALOG d_supplies [ITEMDEF I_DEED_ANVIL] DEFNAME=I_DEED_ANVIL NAME=Deed to an Anvil ID=i_deed RESOURCES=i_deed,i_anvil TYPE=4133 CATEGORY=!!Custom!! SUBSECTION=Deeds DESCRIPTION=Anvil ON=@Create //MORE=i_anvil NAME=Deed to an Anvil [TYPEDEF 4133] ON=@DCLICK IF (<SRC.REGION.FLAGS>==01092) \|\| (<SRC.REGION.FLAGS>==01192) MOREP=<SRC.P> SRC.HOME=<MOREP> SRC.NEWITEM=i_anvil SRC.ACT.P=<SRC.HOME> REMOVE RETURN 0 ELSE SRC.MESSAGE You may only place in or next to a house! RETURN 1 [ITEMDEF I_DEED_FORGE] DEFNAME=I_DEED_FORGE NAME=Deed to a Forge ID=i_deed RESOURCES=i_deed,i_forge TYPE=4132 CATEGORY=!!Custom!! SUBSECTION=Deeds DESCRIPTION=Forge ON=@Create //MORE=i_forge NAME=Deed to a Forge [TYPEDEF 4132] ON=@DCLICK IF (<SRC.REGION.FLAGS>==01092) \|\| (<SRC.REGION.FLAGS>==01192) MOREP=<SRC.P> SRC.HOME=<MOREP> SRC.NEWITEM=i_forge SRC.ACT.P=<SRC.HOME> REMOVE RETURN 0 ELSE SRC.MESSAGE You may only place in or next to a house! RETURN 1 [ITEMDEF I_DEED_SPINWHEEL] DEFNAME=I_DEED_SPINWHEEL NAME=Deed to a Spinning Wheel //no additional directional deed needed ID=i_deed RESOURCES=i_deed,i_spinning_wheel TYPE=4131 CATEGORY=!!Custom!! SUBSECTION=Deeds DESCRIPTION=Spinning Wheel RESOURCES=20 i_BOARD, 3 i_cloth, 1 i_INGOT_IRON SKILLMAKE=CARPENTRY 73.6, TAILORING 65.0 ON=@Create //MORE=i_spinning_wheel NAME=Deed to a Spinning Wheel [TYPEDEF 4131] ON=@DCLICK IF (<SRC.REGION.FLAGS>==01092) \|\| (<SRC.REGION.FLAGS>==01192) MOREP=<SRC.P> SRC.HOME=<MOREP> SRC.NEWITEM=i_spinning_wheel SRC.ACT.P=<SRC.HOME> REMOVE RETURN 0 ELSE SRC.MESSAGE You may only place in or next to a house! RETURN 1 [ITEMDEF I_DEED_LOCKED_CHEST_4] DEFNAME=I_DEED_LOCKED_CHEST_4 NAME=Deed to a Locked Chest ID=0014ef TYPE=t_DEED_LOCKED_CHEST VALUE=1110 CATEGORY=!!Custom!! SUBSECTION=Deeds DESCRIPTION=Locked Chest ON=@CREATE NAME=Deed to a Locked Chest [TYPEDEF t_DEED_LOCKED_CHEST] // Locked Chest Trigger ON=@DCLICK IF (<SRC.REGION.FLAGS>==01092) \|\| (<SRC.REGION.FLAGS>==01192) SRC.NEWITEM=009ab //chest SRC.ACT.BOUNCE SRC.ACT.MORE=rand(0ffff) SRC.TAG.CHESTSERIAL=<SRC.ACT.UID> SRC.TAG.CHESTKEYCODE=<SRC.ACT.MORE> SRC.NEWITEM=0100f // key SRC.ACT.P=<SRC.P> SRC.ACT.MORE=<SRC.TAG.CHESTKEYCODE> SRC.ACT.LINK=<SRC.TAG.CHESTSERIAL> SRC.ACT.NAME=Key to a Locked Chest SRC.ACT.BOUNCE SRC.ACT.DUPE SRC.ACT.BOUNCE REMOVE ELSE SRC.MESSAGE You may only place in or next to a house! RETURN 1 [ITEMDEF I_DEED_BBOARDN] DEFNAME=I_DEED_BBOARDN NAME=Deed to a Bulletin Board N ID=i_deed RESOURCES=i_deed,i_bulletin_board_2 TYPE=4130 CATEGORY=!!Custom!! SUBSECTION=Deeds DESCRIPTION=Bulletin Board N RESOURCES=60 i_log SKILLMAKE=CARPENTRY 90.0 ON=@Create //MORE=i_bulletin_board_2 NAME=Deed to a Bulletin Board N [TYPEDEF 4130] ON=@DCLICK IF (<SRC.REGION.FLAGS>==01092) \|\| (<SRC.REGION.FLAGS>==01192) MOREP=<SRC.P> SRC.HOME=<MOREP> SRC.NEWITEM=i_bulletin_board_2 SRC.ACT.P=<SRC.HOME> REMOVE RETURN 0 ELSE SRC.MESSAGE You may only place in or next to a house! RETURN 1 [ITEMDEF I_DEED_BBOARDW] DEFNAME=I_DEED_BBOARDW NAME=Deed to a Bulletin Board W ID=i_deed RESOURCES=i_deed,i_bulletin_board TYPE=t_bul_w CATEGORY=!!Custom!! SUBSECTION=Deeds DESCRIPTION=Bulletin Board W RESOURCES=60 i_log SKILLMAKE=CARPENTRY 90.0 ON=@Create //MORE=i_bulletin_board NAME=Deed to a Bulletin Board W [TYPEDEF t_bul_w] ON=@DCLICK IF (<SRC.REGION.FLAGS>==01092) \|\| (<SRC.REGION.FLAGS>==01192) MOREP=<SRC.P> SRC.HOME=<MOREP> SRC.NEWITEM=i_bulletin_board SRC.ACT.P=<SRC.HOME> REMOVE RETURN 0 ELSE SRC.MESSAGE You may only place in or next to a house! RETURN 1 [ITEMDEF I_SPELLBOOK_FULL1] DEFNAME=i_spellbook_full1 Name=Spellbook Newb Full id=i_spellbook ON=@Create COLOR=0481 Attr=attr_newbie type=t_spellbook MORE=0ffffffff MORE2=0ffffffff Category=New XX SUBSECTION=XX [ITEMDEF i_stone_travel] DEFNAME=i_stone_travel ID=01172 TYPE=t_script ON=@CREATE COLOR=0486 ATTR=8010 NAME=Travel Stone ON=@DCLICK SRC.SFX 555 DIALOG d_stone_travel RETURN 1 [DIALOG d_stone_travel] 0,0 resizepic 0 0 2600 525 350 resizepic 25 60 5100 475 30 resizepic 25 280 5100 475 30 text 161 30 126 0 button 40 68 3 4 1 0 1 text 60 63 76 1 button 115 68 3 4 1 0 2 text 135 63 76 2 button 220 68 3 4 1 0 3 text 240 63 76 3 button 285 68 3 4 1 0 4 text 305 63 76 4 button 375 68 3 4 1 0 5 text 395 63 76 5 [DIALOG d_stone_travel TEXT] Travel Stone Towns Graveyards Forts Dungeons PvP Area [DIALOG d_stone_travel BUTTON] ONBUTTON=1 DIALOG d_stone_travelt RETURN 1 ONBUTTON=2 DIALOG d_stone_travelg RETURN 1 ONBUTTON=3 DIALOG d_stone_travelf RETURN 1 ONBUTTON=4 DIALOG d_stone_traveld RETURN 1 ONBUTTON=5 SRC.GO 2560,125 RETURN 1 [DIALOG d_stone_travelt] 0,0 resizepic 0 0 2600 525 400 gumppic 40 40 231 text 130 68 126 0 button 25 110 2450 2451 1 0 1 text 75 110 76 1 button 25 135 2450 2451 1 0 2 text 75 135 76 2 button 25 160 2450 2451 1 0 3 text 75 160 76 3 button 25 185 2450 2451 1 0 4 text 75 185 76 4 button 25 210 2450 2451 1 0 5 text 75 210 76 5 button 25 235 2450 2451 1 0 6 text 75 235 76 6 button 25 260 2450 2451 1 0 7 text 75 260 76 7 button 25 285 2450 2451 1 0 8 text 75 285 76 8 button 260 110 2450 2451 1 0 9 text 310 110 76 9 button 260 135 2450 2451 1 0 10 text 310 135 76 10 button 260 160 2450 2451 1 0 11 text 310 160 76 11 button 260 185 2450 2451 1 0 12 text 310 185 76 12 button 260 210 2450 2451 1 0 13 text 310 210 76 13 button 260 235 2450 2451 1 0 14 text 310 235 76 14 button 260 260 2450 2451 1 0 15 text 310 260 76 15 button 260 285 2450 2451 1 0 16 text 310 285 76 16 button 50 365 2466 1467 1 0 17 [DIALOG d_stone_travelt TEXT] Travel Stone Britain Buccaneer's Den Cove Delucia Jhelom Magincia Minoc Moonglow Nujel'm Ocllo Papua Serpent's Hold Skara Brae Trinsic Vesper Yew [DIALOG d_stone_travelt BUTTON] ONBUTTON=1 SRC.GO 1435,1697 RETURN 1 ONBUTTON=2 SRC.GO 2714,2164 RETURN 1 ONBUTTON=3 SRC.GO 2246,1214 RETURN 1 ONBUTTON=4 SRC.GO 5270,3993,37 RETURN 1 ONBUTTON=5 SRC.GO 1405,4022 RETURN 1 ONBUTTON=6 SRC.GO 3714,2220,20 RETURN 1 ONBUTTON=7 SRC.GO 2466,443,15 RETURN 1 ONBUTTON=8 SRC.GO 4476,1180 RETURN 1 ONBUTTON=9 SRC.GO 3756,1244 RETURN 1 ONBUTTON=10 SRC.GO 3686,2519 RETURN 1 ONBUTTON=11 SRC.GO 5771,3162,37 RETURN 1 ONBUTTON=12 SRC.GO 3021,3397,15 RETURN 1 ONBUTTON=13 SRC.GO 594,2156 RETURN 1 ONBUTTON=14 SRC.GO 1823,2822 RETURN 1 ONBUTTON=15 SRC.GO 2895,688 RETURN 1 ONBUTTON=16 SRC.GO 546,991 RETURN 1 ONBUTTON=17 DIALOG d_stone_travel RETURN 1 [DIALOG d_stone_traveld] 0,0 resizepic 0 0 2600 525 300 gumppic 40 40 231 text 120 68 126 0 button 25 110 2450 2451 1 0 1 text 75 110 76 1 button 25 135 2450 2451 1 0 2 text 75 135 76 2 button 25 160 2450 2451 1 0 3 text 75 160 76 3 button 25 185 2450 2451 1 0 4 text 75 185 76 4 button 25 210 2450 2451 1 0 5 text 75 210 76 5 button 260 110 2450 2451 1 0 6 text 310 110 76 6 button 260 135 2450 2451 1 0 7 text 310 135 76 7 button 260 160 2450 2451 1 0 8 text 310 160 76 8 button 260 185 2450 2451 1 0 9 text 310 185 76 9 button 50 260 2466 2467 1 0 10 [DIALOG d_stone_traveld TEXT] Travel Stone Covetous Deciet Despise Destard Hythloth Shame Wrong Fire Dungeon Ice Dungeon [DIALOG d_stone_traveld BUTTON] ONBUTTON=1 SRC.GO 2499,922 RETURN 1 ELSE ONBUTTON=2 SRC.GO 4111,434,5 RETURN 1 ONBUTTON=3 SRC.GO 1301,1080 RETURN 1 ONBUTTON=4 SRC.GO 1176,2639 RETURN 1 ONBUTTON=5 SRC.GO 4722,3825 RETURN 1 ONBUTTON=6 SRC.GO 514,1561 RETURN 1 ONBUTTON=7 SRC.GO 2044,238,10 RETURN 1 ONBUTTON=8 SRC.GO 5760,2907,17 RETURN 1 ONBUTTON=9 SRC.GO 1999,81,5 RETURN 1 ONBUTTON=10 DIALOG d_stone_travel RETURN 1 [DIALOG d_stone_travelf] 0,0 resizepic 0 0 2600 525 300 gumppic 40 40 231 text 120 68 126 0 button 25 110 2450 2451 1 0 1 text 75 110 76 1 button 25 135 2450 2451 1 0 2 text 75 135 76 2 button 25 160 2450 2451 1 0 3 text 75 160 76 3 button 25 185 2450 2451 1 0 4 text 75 185 76 4 button 25 210 2450 2451 1 0 5 text 75 210 76 5 button 260 110 2450 2451 1 0 6 text 310 110 76 6 button 50 260 2466 2467 1 0 7 [DIALOG d_stone_travelf TEXT] Travel Stone Cove Orc Fort Yew Brigand Camp Yew Fort of the Damned Yew Orc Fort Delucia Orc Fort Terathen Fort Entrance [DIALOG d_stone_travelf BUTTON] ONBUTTON=1 SRC.GO 2171,1332,0 RETURN 1 ONBUTTON=2 SRC.GO 885,1682,0 RETURN 1 ONBUTTON=3 SRC.GO 972,768,0 RETURN 1 ONBUTTON=4 SRC.GO 634,1500,0 RETURN 1 ONBUTTON=5 SRC.GO 5211,3630,3 RETURN 1 ONBUTTON=6 SRC.GO 5451,3140,-60 RETURN 1 ONBUTTON=7 DIALOG d_stone_travel RETURN 1 [DIALOG d_stone_travelg] 0,0 resizepic 0 0 2600 525 300 gumppic 40 40 231 text 120 68 126 0 button 25 110 2450 2451 1 0 1 text 75 110 76 1 button 25 135 2450 2451 1 0 2 text 75 135 76 2 button 25 160 2450 2451 1 0 3 text 75 160 76 3 button 25 185 2450 2451 1 0 4 text 75 185 76 4 button 25 210 2450 2451 1 0 5 text 75 210 76 5 button 50 260 2466 2467 1 0 6 [DIALOG d_stone_travelg TEXT] Travel Stone Britain Graveyard Cove Graveyard Moonglow Graveyard Vesper Graveyard Yew Graveyard [DIALOG d_stone_travelg BUTTON] ONBUTTON=1 SRC.GO 1384,1492,10 RETURN 1 ONBUTTON=2 SRC.GO 2442,1123,5 RETURN 1 ONBUTTON=3 SRC.GO 4549,1330,8 RETURN 1 ONBUTTON=4 SRC.GO 2782,867,0 RETURN 1 ONBUTTON=5 SRC.GO 724,1136,0 RETURN 1 ONBUTTON=6 DIALOG d_stone_travel RETURN 1 [ITEMDEF Character_status_Stone] ID=0edc Name=Character Status Type=92 ON=@DCLICK DIALOG d_status [DIALOG d_Status] 0,0 gumppic 100 150 39 // Background text 120 190 000 0 //Text 0 text 120 220 000 1 //Text 1 text 120 240 000 2 //Text 2 text 120 260 000 3 //Text 3 text 120 280 000 4 //Text 4 Button 270 390 2311 2312 1 1 1 // OKAY gumppic 245 135 50990 // Lord British [DIALOG d_status TEXT] The stats of <SRC.NAME> are: Your Fame Is: <SRC.FAME> Your Karma Is: <SRC.KARMA> Your Kills Are: <SRC.KILLS> Your Hunger Is: <SRC.FOOD> [DIALOG d_status BUTTON] ONBUTTON=1 DIALOG d_Supplies SRC.SYSMESSAGE=Have fun <SRC.NAME>! [EOF] -------------------- uokit.com By Qmer

	12.8.2004, 17:43 Сообщение #2
Гость	или мне кажеться или это так, скрипт с блуд лэнда?

DihlofozzZ	12.8.2004, 23:08 Сообщение #3
Администратор форума Сообщений: 5.602 Регистрация: 8.3.2003 Группа: Администраторы Наличность: 0 Из: Москва Россия Пользователь №: 237	не, там вроде такого не было%) а вот в Code можно было и добавить)) -------------------- С уважением Администратор Форума. Контактный Email: dihlofozzz@uokit.com

« Предыдущая тема · Архив готовых скриптов · Следующая тема »

Ответить в эту тему

Открыть новую тему

1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)

Пользователей: 0

Режим отображения: Стандартный · Переключить на: Линейный · Переключить на: Древовидный

Подписка на тему · Сообщить другу · Версия для печати · Подписка на этот форум

Текстовая версия | Версия для КПК

Сейчас: 23.6.2025, 22:44

Русская версия Invision Power Board v2.1.7 © 2025 IPS, Inc.

Лицензия зарегистрирована на: UoKit.com

Designed by Nickostyle