Дам некоторые скриптики... - UoKit.com Форумы


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

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

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

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

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

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

Дам некоторые скриптики..., Вот берите пользуйте может пригодится

adidas-spb	3.12.2005, 21:50 Сообщение #1
Neophyte Сообщений: 35 Регистрация: 8.10.2005 Группа: Пользователи Наличность: 0 Пользователь №: 4.309	Все скрипты я пользую эти на Sphere R4.0.2 Цитата Амулеты магические реген всякий... [itemdef i_amul_mana] id=4232 name=Amulet of mana TYPE=t_jewelry on=@create color=00920 attr 0026 ON=@Equip if !<link.ischar> name=<src.name>'s <typedef.name> link=<src.uid> sfx=01ff elif <link>!=<src.uid> src.sysmessage This is not yours! unequip link.bounce <uid> endif timer=1 ON=@UNequip timer=-1 ON=@TIMER timer 1 IF !(<link.mana>==<link.int> ) link.mana <link.mana> + {1 5} endif if <link.mana> > <link.int> link.mana = <link.int> endif return 1 [itemdef i_amul_hits] id=4232 name=Amulet of hits TYPE=t_jewelry on=@create color=00446 attr 0026 ON=@Equip if !<link.ischar> name=<src.name>'s <typedef.name> link=<src.uid> sfx=01ff elif <link>!=<src.uid> src.sysmessage This is not yours! unequip link.bounce <uid> endif timer=1 ON=@UNequip timer=-1 ON=@TIMER timer 1 IF !(<cont.hits>==<cont.str> ) cont.hits <cont.hits> + {5 20} endif if <cont.hits> > <cont.str> cont.hits = <cont.str> endif return 1 [itemdef i_amul_stam] id=4232 name=Amulet of stamina TYPE=t_jewelry on=@create color=0055c attr 0026 ON=@Equip if !<link.ischar> name=<src.name>'s <typedef.name> link=<src.uid> sfx=01ff elif <link>!=<src.uid> src.sysmessage This is not yours! unequip link.bounce <uid> endif timer=1 ON=@UNequip timer=-1 ON=@TIMER timer 1 IF !(<cont.stam>==<cont.dex> ) cont.stam <cont.stam> + {1 5} endif if <cont.stam> > <cont.dex> cont.stam = <cont.dex> endif return 1 Цитата // Script Anti Teot - AmountFix, DupeFix ////////////////////////////////////////// // Events ////////////////////////////////////////// [EVENTS e_fix_teot] ON=@Login f_amountfix ON=@Logout f_amountfix ON=@Death f_amountfix ON=@ItemClick f_amountfix_item ON=@ItemDClick f_amountfix_item ON=@ItemEquip f_amountfix_item ON=@ItemPickup_Pack f_amountfix_item ////////////////////////////////////////// // Funcoes ////////////////////////////////////////// [FUNCTION f_amountfix_item] IF (<ACT.AMOUNT> <= 0) \|\| (<act.type>==t_teot_fix) SERV.LOG TEOT AMOUNTFIX: acct='<SRC.ACCOUNT>', char='<SRC.NAME>', uid='<UID>' (<NAME> ). ACT.REMOVE ENDIF [FUNCTION dupefix] findlayer.27.timer=0 [FUNCTION f_amountfix] FORCONT <FINDLAYER.21> 0 IF (<amount> <= 0) SERV.LOG TEOT DUPE FIX: acct='<SRC.ACCOUNT>', char='<SRC.NAME>', uid='<UID>' (<NAME> ). attr 090 amount 1 REMOVE RETURN 1 ENDIF ENDFOR [FUNCTION f_amountfix2] FORCONT <FINDLAYER.26> IF !(<TYPE>==t_gold) IF (<amount> > 255 ) //SERV.LOG TEOT DUPE FIX: acct='<SRC.ACCOUNT>', char='<SRC.NAME>', uid='<UID>' (<NAME> ). remove //src.jail ENDIF ENDIF ENDFOR [TYPEDEF t_teot_fix] ON=@Timer REMOVE RETURN 1 ////////////////////////////////////////// // Item ////////////////////////////////////////// [ITEMDEF i_amountfix] ID=0ed6 NAME=Amount Fix TYPE=T_SCRIPT ON=@CREATE ATTR=0b0 ON=@TIMER IF !(<VAR0.SAVE> ) VAR.SAVE=1 SERV.ALLCLIENTS f_amountfix SERV.SAVE ENDIF RETURN 1 ///В sphere_serv_triggers.scp/// //[FUNCTION f_onserver_start] //VAR.SAVE //[FUNCTION f_onserver_save] //IF !(<ARGN> ) && !(<VAR0.SAVE> ) //UID.(AQUI VAI UID).TIMER=5 //ENDIF //RETURN 1 ////////////////////////////////////////// // speakshopkeep.scp ////////////////////////////////////////// ///ON=sell //ON=thoupurchase* //ON=youpurchase* //ON=youbuy* //ON=Isale* //SRC.f_amountfix //ON=buy //ON=supplies //ON=wares //SRC.f_amountfix //f_dupefix /////////////////////////////////////////////////////////////////////////////////////////////

adidas-spb	3.12.2005, 21:52 Сообщение #2
Neophyte Сообщений: 35 Регистрация: 8.10.2005 Группа: Пользователи Наличность: 0 Пользователь №: 4.309	Ньюби хорса.. Цитата [itemdef i_et_horse] name=$ Horse id=i_mt_horse_gray TDATA3=c_et layer=25 on=@create color=00a22 on=@equip link=<src.uid> on=@unequip src.newitem i_et_eh src.act.bounce src.act.link=<src.uid> src.act.name=<src.name>'s $ Horse src.act.color=<src.tag.horsecolor> //remove [chardef c_et] id=c_horse_gray on=@create //color=00a22 on=@click remove return 1 on=@npcrestock remove return 1 on=@skillstart remove return 1 [itemdef i_et_eh] NAME=Ethereal Horse id=i_pet_horse type=t_normal CATEGORY=Other SUBSECTION= Ethereal pets DESCRIPTION=$ Horse on=@create attr=14 on=@dclick if (<link>==04fffffff) link=<src.uid> Name <src.name>'s <name> attr= 0507f more1= 07fff7fff src.newitem i_et_horse src.act.more1=c_et src.act.color=<src.tag.horsecolor> src.act.equip remove return 1 endif if <src.flags> & statf_onhorse src.message You are already mounted return 1 endif if (<link>==<src.UID> ) src.sysmessage=<name> src.newitem i_et_horse src.act.more1=c_et src.act.color=<src.tag.horsecolor> src.act.equip remove return 1 endif src.message=Only <link.name> cant use this $ Horse ! return 1 endif return 0 endif Ньюби Liama Цитата [itemdef i_et_ll] name=Ethereal Llama id=i_mt_llama TDATA3=c_el layer=25 On=@Create color=0 On=@UneQuip src.newitem i_et_l src.act.link=<src.uid> src.act.name=<src.name>'s Player Liama src.act.color=<src.tag.0446> src.act.more2=<src.uid> src.act.bounce [chardef c_el] id=0dc On=@Create color=0446 on=@click Remove return 1 On=@npcrestock remove return 1 On=@skillstart remove return 1 [itemdef i_et_l] NAME=Ethereal Llama id=i_pet_llama type=t_normal WEIGHT=4 On=@Create color=0446 attr=14 On=@Dclick if !(0<src.tag.power>==0) src.message It is only for Power Players return 1 endif if <src.flags> & statf_onhorse src.sysmessage You are already amounted! return 1 endif if <cont.uid>==<src.findlayer(21).uid> else src.message You must have the Player Liama in your backpack. return 1 endif if (<link>==04fffffff) link=<src.uid> Name <src.name>'s <name> attr= 0507f more1= 07fff7fff src.newitem i_et_ll src.act.more1=c_el src.act.color=<src.tag.0446> src.act.more2=<src.uid> src.act.equip remove return 1 endif if (<link>==<src.uid>) src.sysmessage=<name> src.newitem i_et_ll src.act.more1=c_el src.act.more2=<src.uid> src.act.color=<src.tag.0446> src.act.equip remove return 1 endif src.message=Only <link.name> cant use this Player Liama ! return 1

adidas-spb	3.12.2005, 21:53 Сообщение #3
Neophyte Сообщений: 35 Регистрация: 8.10.2005 Группа: Пользователи Наличность: 0 Пользователь №: 4.309	Ну вот кароче скритек на пвп-арену какуйнить... я сам еще толком неразабрался ну думаю вы разберетесь... Цитата [ITEMDEF I_HUMAN_START] NAME=Human Start Stone ID=0ed6 TYPE=t_normal ON=@Create COLOR=0445 ATTR=00010 ON=@Dclick IF <SRC.TARG.DISTANCE><3 SRC.DIALOGCLOSE d_start SRC.DIALOG d_start RETURN 1 ELSE SRC.SYSMESSAGE @50 You are too far away. RETURN 1 ENDIF [DIALOG d_start] 320,400 nomove noclose resizepic 0 0 3500 340 130 text 100 10 50 0 text 45 35 1968 1 text 45 60 1968 2 radio 20 38 2117 2118 0 1 radio 20 63 2117 2118 0 2 button 70 90 242 241 1 0 0 button 210 90 247 248 1 0 1 [DIALOG d_start TEXT] Choose your Destiny! The Supporter of the Order The Supporter of the Chaos [DIALOG d_start BUTTON] ONBUTTON=1 IF (<argchk[1]> == 1) SRC.allskills 1000 src.str 150 src.dex 100 src.int 100 src.hits 150 src.stam 100 src.mana 100 src.tag.destiny = 1 src.tag.points = 9000000000000000 src.tag.credits = 1 src.color= 083ea src.oskin=083ea SERV.NEWITEM=i_full_spellbook NEW.BOUNCE SERV.NEWITEM=i_gold 50000 NEW.BOUNCE src.go base SRC.SYSMESSAGE @64 Your Destiny The Part of Order ELSE IF (<argchk[2]> == 1) SRC.allskills 1000 src.str 150 src.dex 100 src.int 100 src.hits 150 src.stam 100 src.mana 100 src.tag.points = 900000 src.tag.credits = 90000 src.tag.destiny = 90000 src.color= 083ea src.oskin=083ea SERV.NEWITEM=i_full_spellbook NEW.BOUNCE src.go base SRC.SYSMESSAGE @50 Your Destiny The Part of Chaos ENDIF ENDIF -------------------------------------------------------------------------------- Рассы и Рассовые Вещи: PHP:-------------------------------------------------------------------------------- [ITEMDEF i_race_stone1] ID=0ed4 NAME=Race Stone TYPE=t_script ON=@DCLICK SRC.DIALOGCLOSE d_racestone1 SRc.DIALOG d_racestone1 RETURN 1 [DIALOG d_racestone1] 20,20 page 0 resizepic 0 0 2600 200 440 button 25 50 208 209 0 1 1 button 25 70 208 209 0 2 2 button 25 90 208 209 0 3 3 text 55 17 45 0 text 19 37 0 1 text 19 386 0 1 text 50 50 0 2 text 50 70 0 3 text 50 90 0 4 text 19 123 0 5 button 70 400 249 249 1 0 10000 page 1 text 70 140 45 6 text 19 153 0 7 text 50 170 0 8 text 50 190 0 9 text 50 210 0 10 text 50 230 0 11 radio 25 170 210 211 0 1 radio 25 190 210 211 0 2 radio 25 210 210 211 0 3 radio 25 230 210 211 0 4 button 25 50 209 209 0 1 0 page 2 text 55 140 45 12 text 19 153 0 13 text 50 170 0 14 text 50 190 0 15 text 50 210 0 16 text 50 230 0 17 button 25 170 210 211 0 4 4 button 25 190 210 211 0 5 5 button 25 210 210 211 0 6 6 button 25 230 210 211 0 7 7 button 25 70 209 209 0 2 0 page 3 text 60 140 45 18 text 19 153 0 19 text 50 170 0 20 text 50 190 0 21 text 19 203 0 22 text 60 220 45 23 text 19 233 0 24 text 50 250 0 25 text 50 270 0 26 radio 25 170 210 211 0 5 radio 25 190 210 211 0 6 radio 25 250 210 211 0 7 radio 25 270 210 211 0 8 button 25 90 209 209 0 4 0 page 4 text 45 140 45 27 text 19 153 0 28 text 50 170 0 29 text 50 190 0 30 text 50 210 0 31 text 50 230 0 32 text 50 250 0 33 text 50 270 0 34 radio 25 170 210 211 0 9 radio 25 190 210 211 0 10 radio 25 210 210 211 0 11 radio 25 230 210 211 0 12 radio 25 250 210 211 0 13 radio 25 270 210 211 0 14 button 25 70 209 209 0 2 0 page 5 text 50 140 45 35 text 19 153 0 36 text 50 170 0 37 text 50 190 0 38 text 50 210 0 39 text 50 230 0 40 text 50 250 0 41 text 50 270 0 42 radio 25 170 210 211 0 15 radio 25 190 210 211 0 16 radio 25 210 210 211 0 17 radio 25 230 210 211 0 18 radio 25 250 210 211 0 19 radio 25 270 210 211 0 20 button 25 70 209 209 0 2 0 page 6 text 50 140 45 43 text 19 153 0 44 text 50 170 0 45 text 50 190 0 46 text 50 210 0 47 text 50 230 0 48 text 50 250 0 49 text 50 270 0 50 radio 25 170 210 211 0 21 radio 25 190 210 211 0 22 radio 25 210 210 211 0 23 radio 25 230 210 211 0 24 radio 25 250 210 211 0 25 radio 25 270 210 211 0 26 button 25 70 209 209 0 2 0 page 7 text 50 140 45 51 text 19 153 0 52 text 50 170 0 53 text 50 190 0 54 text 50 210 0 55 text 50 230 0 56 text 50 250 0 57 text 50 270 0 58 radio 25 170 210 211 0 27 radio 25 190 210 211 0 28 radio 25 210 210 211 0 29 radio 25 230 210 211 0 30 radio 25 250 210 211 0 31 radio 25 270 210 211 0 32 button 25 70 209 209 0 2 0 [DIALOG d_racestone1 TEXT] Race Stone -------------------- Races Race items Guilds -------------------- Races -------------------- Archimage Elfien Orcish Druid Race Items -------------------- Archimage Elfien Orcish Druid Guild Stones -------------------- Chaos Guild Order Guild -------------------- Guild Shields -------------------- Chaos Shield Order Shield Archimage Items -------------------- Armor 4000 cred Cloak 2000 cred Sash 2000 cred Hat 2000 cred Sandals 2000 cred Staff 2000 cred Elfien Items -------------------- Armor 4000 cred Bow 2000 cred Sandals 2000 cred Braclet 2000 cred Spear 2000 cred Cloak 2000 cred Orcish Items -------------------- Armor 4000 cred Cloak 2000 cred Shield 2000 cred Helm 2000 cred Mace 2000 cred Boots 2000 cred Druid Items -------------------- Armor 4000 cred Hat 2000 cred Robe 2000 cred Boots 2000 cred Cape 2000 cred Staff 2000 cred [DIALOG d_racestone1 BUTTON] ONBUTTON=10000 IF <ARGCHK[1]> IF <SRC.OSKIN>=0601 SRC.SYSMESSAGE @75,1 You are already Arhimage. RETURN 1 ELIF <SRC.OSKIN>!=083ea SRC.SYSMESSAGE @75,1 Only human can choose this race. RETURN 1 ELIF <SRC.TAG0.CREDITS>< SRC.SYSMESSAGE @75,1 You must have credits to select arhimage class RETURN 1 ELIF <SRC.RESTEST i_kamen_Gold, i_kamen_Ice, i_kamen_order, i_kamen_dread, i_kamen_millenium> SRC.TAG.RACE=Archimage SRC.TITLE=First Level Mage SERV.NEWITEM=TM_MAGESUX NEW.BOUNCE SRC.TAG.RACENUMBER=4 SRC.TAG.CREDITS -= SRC.TAG.HUMAN=0 src.consume 1 i_kamen_Gold src.consume 1 i_kamen_ice src.consume 1 i_kamen_order src.consume 1 i_kamen_dread src.consume 1 i_kamen_millenium SRC.EVENTS +e_arhimage SRC.OSKIN=0601 SRC.COLOR=0601 SRC.UPDATE ELSE SRC.SYSMESSAGE @75,1 You must have Gold, Ice, Order, Dread and Millenium Amethyst to select arhimage class RETURN 1 ENDIF ELSEIF <ARGCHK[2]> IF <SRC.OSKIN>=537 SRC.SYSMESSAGE @75,1 You are already Elfian. RETURN 1 ELIF <SRC.OSKIN>!=083ea SRC.SYSMESSAGE @75,1 Only human can choose this race. RETURN 1 ELIF <SRC.TAG0.CREDITS>< SRC.SYSMESSAGE @75,1 You must have credits to select Elfian race RETURN 1 ELIF <SRC.RESTEST i_kamen_Gold, i_kamen_Ice, i_kamen_chaos, i_kamen_dread, i_kamen_millenium> SRC.TAG.RACE=Elfian SRC.TITLE=First Level Elfian SERV.NEWITEM=TM_ELFSUX NEW.BOUNCE SRC.TAG.HUMAN=0 SRC.TAG.RACENUMBER=7 SRC.TAG.CREDITS -= src.consume 1 i_kamen_Gold src.consume 1 i_kamen_ice src.consume 1 i_kamen_chaos src.consume 1 i_kamen_dread src.consume 1 i_kamen_millenium SRC.EVENTS +e_elf SRC.OSKIN=537 SRC.COLOR=537 SRC.UPDATE ELSE SRC.SYSMESSAGE @75,1 You must have Gold, Ice, Chaos, Dread and Millenium Amethyst to select arhimage class RETURN 1 ENDIF ELSEIF <ARGCHK[3]> IF <SRC.OSKIN>=0488 SRC.SYSMESSAGE @75,1 You are already Orc. RETURN 1 ELIF <SRC.OSKIN>!=083ea SRC.SYSMESSAGE @75,1 Only human can choose this race. RETURN 1 ELIF <SRC.TAG0.CREDITS>< SRC.SYSMESSAGE @75,1 You must have 3000 credits to select Orc race RETURN 1 ELIF <SRC.RESTEST i_kamen_Gold, i_kamen_Ice, i_kamen_chaos, i_kamen_dread, i_kamen_millenium> SRC.TAG.RACE=Orc SRC.TITLE=First Level Orcish SERV.NEWITEM=TM_ORCSUX NEW.BOUNCE SRC.TAG.RACENUMBER=1 SRC.TAG.HUMAN=0 SRC.TAG.CREDITS -= src.consume 1 i_kamen_Gold src.consume 1 i_kamen_ice src.consume 1 i_kamen_chaos src.consume 1 i_kamen_dread src.consume 1 i_kamen_millenium SRC.EVENTS +e_orc SRC.OSKIN=0488 SRC.COLOR=0488 SRC.UPDATE ELSE SRC.SYSMESSAGE @75,1 You must have Gold, Ice, Chaos, Dread and Millenium Amethyst to select arhimage class RETURN 1 ENDIF ELSEIF <ARGCHK[4]> IF <SRC.OSKIN>=07c6 SRC.SYSMESSAGE @75,1 You are already Druid. RETURN 1 ELIF <SRC.OSKIN>!=083ea SRC.SYSMESSAGE @75,1 Only human can choose this race. RETURN 1 ELIF <SRC.TAG0.CREDITS>< SRC.SYSMESSAGE @75,1 You must have credits to select Druid race RETURN 1 ELIF <SRC.RESTEST i_kamen_Gold, i_kamen_Ice, i_kamen_order, i_kamen_dread, i_kamen_millenium> SRC.TAG.RACE=Druid SRC.TITLE=First Level Druid SERV.NEWITEM=TM_DRUIDSUX NEW.BOUNCE SRC.TAG.RACENUMBER=8 SRC.TAG.LEVELDRUID=1 SRC.TAG.HUMAN=0 SRC.TAG.CREDITS -= src.consume 1 i_kamen_Gold src.consume 1 i_kamen_ice src.consume 1 i_kamen_order src.consume 1 i_kamen_dread src.consume 1 i_kamen_millenium SRC.EVENTS +e_druid SRC.OSKIN=07c6 SRC.COLOR=07c6 SRC.UPDATE ELSE SRC.SYSMESSAGE @75,1 You must have Gold, Ice, Order, Dread and Millenium Amethyst to select arhimage class RETURN 1 ENDIF ELSEIF <ARGCHK[5]> IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_deed_guildstone NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @75,1 You must have credits ENDIF ELSEIF <ARGCHK[6]> IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_deed_guildstone NEW.BOUNCE SRC.TAG.CREDITS -=4000 ELSE SRC.SYSMESSAGE @75,1 You must have credits ENDIF ELSEIF <ARGCHK[7]> //Chaos Shield ELSEIF <ARGCHK[8]> //Order Shield ELSEIF <ARGCHK[9]> //Archimage Item N1 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_Mage_tunic NEW.BOUNCE SERV.NEWITEM=i_Mage_leggings NEW.BOUNCE SERV.NEWITEM=i_Mage_gloves NEW.BOUNCE SERV.NEWITEM=i_Mage_sleeves NEW.BOUNCE SERV.NEWITEM=i_Mage_gorget NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[10]> //Archimage Item N2 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_mage_cloak NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[11]> //Archimage Item N3 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_mage_sash NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[12]> //Archimage Item N4 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_mage_hat NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[13]> //Archimage Item N5 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_mage_sandals NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[14]> //Archimage Item N5 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_mage_staff NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[15]> //Elfian Item N1 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_Elf_Armor_tunic NEW.BOUNCE SERV.NEWITEM=i_Elf_Armor_leggings NEW.BOUNCE SERV.NEWITEM=i_Elf_armor_cap NEW.BOUNCE SERV.NEWITEM=i_Elf_armor_gloves NEW.BOUNCE SRC.TAG.CREDITS -=4000 ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[16]> //Elfien Item N2 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_elf_bow NEW.BOUNCE SRC.TAG.CREDITS -=2000 ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[17]> //Elfien Item N3 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_elf_sandals NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[18]> //Elfien Item N4 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_elf_bracelet NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[19]> //Elfien Item N5 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_elf_spear NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[20]> //Elfien Item N6 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_elf_cloak NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[21]> //Orc Item N1 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_ORC_tunic NEW.BOUNCE SERV.NEWITEM=i_ORC_leggins NEW.BOUNCE SERV.NEWITEM=i_ORC_helm NEW.BOUNCE SERV.NEWITEM=i_ORC_gloves NEW.BOUNCE SERV.NEWITEM=i_ORC_sleeves NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[22]> //Orc Item N2 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_orc_cloak NEW.BOUNCE SRC.TAG.CREDITS -=2000 ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[23]> //Orcish Item N3 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_orc_shield NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[24]> //Orcish Item N4 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_orc_magic_helm NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[25]> //Orcish Item N5 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_orc_hammer NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[26]> //Orcish Item N6 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_orc_sandals NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[27]> //Druid Item N1 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_Druid_tunic NEW.BOUNCE SERV.NEWITEM=i_Druid_leggings NEW.BOUNCE SERV.NEWITEM=i_Druid_GORGET NEW.BOUNCE SERV.NEWITEM=i_Druid_gloves NEW.BOUNCE SERV.NEWITEM=i_Druid_sleeves NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[28]> //Druid Item N2 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_druid_hat NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[29]> //Druid Item N3 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_druid_robe NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[30]> //Druid Item N4 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_druid_boots NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[31]> //Druid Item N5 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_druid_cape NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF ELSEIF <ARGCHK[32]> //Druid Item N6 IF <SRC.TAG0.CREDITS>>= SERV.NEWITEM=i_druid_staff NEW.BOUNCE SRC.TAG.CREDITS -= ELSE SRC.SYSMESSAGE @1,1 You need more Credits! ENDIF -------------------------------------------------------------------------------- ПвП Телепортер: PHP:-------------------------------------------------------------------------------- [ITEMDEF i_return_base] ID=0116b NAME=Return to Tatalia TYPE=t_sign_gump ON=@CREATE ATTR=08010 COLOR=0481 ON=@DCLICK IF <SRC.TARG.DISTANCE><3 SRC.DIALOGCLOSE d_return_to_base SRC.DIALOG d_return_to_base RETURN 1 ELSE SRC.SYSMESSAGE @050 You are too far away. RETURN 1 ENDIF [DIALOG d_return_to_base] 320,400 nomove noclose resizepic 0 0 3500 340 130 text 80 10 50 0 text 45 35 1968 1 text 45 60 1968 2 radio 20 38 2117 2118 0 1 radio 20 63 2117 2118 0 2 button 70 90 242 241 1 0 0 button 210 90 247 248 1 0 1 [DIALOG d_return_to_base TEXT] Return to Base? I will return to Tatalia I'm Ghost and i need return to Tatalia [DIALOG d_return_to_base BUTTON] ONBUTTON=1 IF (<argchk[1]> == 1) IF (<SRC.BODY>==c_man) \|\| (<SRC.BODY>==c_woman) SRC.TAG.RETURNTOBASE=5 SRC.NEWITEM=i_see_return_to_base_alive SRC.ACT.EQUIP SRC.NEWITEM=i_return_to_base_alive SRC.ACT.EQUIP SRC.TAG.X=<SRC.P.X> SRC.TAG.Y=<SRC.P.Y> SRC.TAG.Z=<SRC.P.Z> SRC.SYSMESSAGE @050 Please wait <EVAL <SRC.TAG.RETURNTOBASE>> seconds ELSE SRC.SYSMESSAGE @050 You are not a alive <SRC.SEX>. ENDIF ELIF (<argchk[2]> == 1) IF (<SRC.BODY>==c_ghost_man) \|\| (<SRC.BODY>==c_ghost_woman) SRC.NEWITEM=i_see_return_to_base_ghost SRC.ACT.EQUIP SRC.NEWITEM=i_return_to_base_ghost SRC.ACT.EQUIP SRC.TAG.RETURNTOBASE=5 SRC.SYSMESSAGE @050 Please wait <EVAL <SRC.TAG.RETURNTOBASE>> seconds. RETURN 1 ELSE SRC.SYSMESSAGE @050 You are not dead yet. ENDIF ENDIF [ITEMDEF i_return_to_base_alive] ID=i_worldgem_bit NAME=Return to Base TYPE=t_eq_script ON=@CREATE ATTR=04094 ON=@EQUIP LINK=<SRC.UID> TIMER=5 ON=@TIMER IF ((<link.tag.x>!=<link.p.x> )\|\|(<link.tag.y>!=<link.p.y> )\|\|(<link.tag.z>!=<link.p.z> ))\|\|(<link.flags>&020)\|\|(<link.flags>&000000080)\|\|(<link.flags>&000000004) LINK.SYSMESSAGE @050 Teleportation Failed. RETURN 0 ELIF (<LINK.RESTEST i_see_return_to_base_alive> LINK.GO 3766,1295 REMOVE LINK.FIX LINK.UPDATE LINK.ACT.REMOVE RETURN 0 ELSE RETURN 0 ENDIF [ITEMDEF i_see_return_to_base_alive] ID=i_worldgem_bit NAME=Return to Base (See) TYPE=t_eq_script ON=@CREATE ATTR=04094 ON=@EQUIP LINK=<SRC.UID> TIMER=1 ON=@TIMER IF <LINK.RESTEST i_return_to_base_alive> IF ((<link.tag.x>!=<link.p.x> )\|\|(<link.tag.y>!=<link.p.y> )\|\|(<link.tag.z>!=<link.p.z> ))\|\|(<link.flags>&020)\|\|(<link.flags>&000000080)\|\|(<link.flags>&000000004) LINK.FINDID.i_return_to_base_alive.timer=1 RETURN 0 ELSE TIMER=1 IF <LINK.TAG.RETURNTOBASE>>0 LINK.TAG.RETURNTOBASE=<LINK.TAG.RETURNTOBASE>-1 LINK.SYSMESSAGE @050 Please wait <EVAL <LINK.TAG.RETURNTOBASE>> seconds. LINK.FIX LINK.UPDATE RETURN 1 ELSE REMOVE RETURN 0 ENDIF RETURN 1 ENDIF ELSE RETURN 0 ENDIF [ITEMDEF i_return_to_base_ghost] ID=i_worldgem_bit NAME=Return To Base (Ghost) TYPE=t_eq_script ON=@CREATE ATTR=04094 ON=@EQUIP LINK=<SRC.UID> TIMER=5 ON=@TIMER LINK.GO 3764,1258,21 LINK.RESURRECT LINK.UPDATE LINK.FIX REMOVE RETURN 0 [ITEMDEF i_see_return_to_base_ghost] ID=i_worldgem_bit NAME=Return To Base (Ghost)(See) TYPE=t_eq_script ON=@CREATE ATTR=04094 ON=@EQUIP LINK=<SRC.UID> TIMER=1 ON=@TIMER TIMER=1 IF <LINK.TAG.RETURNTOBASE>>0 LINK.TAG.RETURNTOBASE=<LINK.TAG.RETURNTOBASE>-1 LINK.SYSMESSAGE @050 Please wait <EVAL <LINK.TAG.RETURNTOBASE>> seconds. RETURN 1 ELSE RETURN 0 ENDIF [FUNCTION second_remaining] ELSEIF <TAG.RETURNTOBASE>>0 TAG.RETURNTOBASE=<TAG.RETURNTOBASE>-1 DIALOGCLOSE d_return_to_base_alive DIALOG d_return_to_base_alive ELSE DIALOGCLOSE d_return_to_base_alive DIALOG d_return_to_base_alive RETURN 1 ENDIF [DIALOG d_return_to_base_alive] 320,400 nomove resizepic 0 0 3500 340 130 text 30 50 50 0 [DIALOG d_return_to_base_alive TEXT] You must wait <eval <SRC.TAG.RETURNTOBASE>> seconds . [DIALOG d_return_to_base_ghost] 320,400 nomove resizepic 0 0 3500 340 130 text 30 50 50 0 [DIALOG d_return_to_base_ghost TEXT] You must wait <eval <SRC.TAG.RETURNTOBASE>> seconds .

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

The Thorn	6.12.2005, 19:17 Сообщение #5
Neophyte Сообщений: 47 Регистрация: 22.10.2005 Группа: Пользователи Наличность: 0 Пользователь №: 4.396	а разве копии можно выкладывать? (IMG:style_emoticons/default/mad.gif) я такие уже видел в "Часто требуемые скрипты" (IMG:style_emoticons/default/laugh.gif)

NFx	8.12.2005, 14:02 Сообщение #6
SpS 60+(умер), NE Priest 40+ жифф Сообщений: 1.505 Регистрация: 3.9.2003 Группа: Пользователи Наличность: 0 Из: Подмосковье Пользователь №: 950	там просто похожие должны быть (IMG:style_emoticons/default/smile.gif) этож типовые сркипты на которых все учатся ниче сложного и оригинального -------------------- Важна не реклама, а качество. Качество - девиз хороших серверов. Продуманность и готовность - девиз очень хороших серверов. ..::Lorien Role-Playing Shard(RunUO)::..

ppp	9.12.2005, 18:09 Сообщение #7
Registred Сообщений: 3 Регистрация: 9.12.2005 Группа: Пользователи Наличность: 0 Пользователь №: 4.565	всё равно не его... (IMG:style_emoticons/default/biggrin.gif)

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

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

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

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

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

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

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

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

Сейчас: 28.4.2024, 13:55

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

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

Designed by Nickostyle