***********************************
*Owner XwerswoodX tarafından yazılmıştır*
*********TARİH: 5 Ocak 2007**********
***********************************
////////////////////////////////
[itemdef i_stone_alisveris]
DEFNAME=i_stone_alisveris
NAME=@180 Criminal Uo Alisveris Tasi
id=i_gravestone_18
ON=@Create
COLOR=00
On=@click
src.dialog d_alisveris_aspendos
On=@dclick
src.dialog d_alisveris_aspendos
src.sysmessage 1 kere tiklayiniz.
[Dialog d_alisveris_aspendos]
Nomove
50,50
resizepic 10 50 3600 255 325
text 25 68 105 0 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
button 30 150 4006 4007 1 0 3
text 60 150 0492 3
button 30 175 4006 4007 1 0 4
text 60 175 0492 4
button 30 200 4006 4007 1 0 5
text 60 200 0492 5
button 30 225 4006 4007 1 0 6
text 60 225 0492 6
button 30 250 4006 4007 1 0 7
text 60 250 0492 7
button 30 275 4006 4007 1 0 8
text 60 275 0492 8
button 30 300 4006 4007 1 0 9
text 60 300 0492 9
button 30 337 4014 4015 1 0 10
text 60 337 0492 10
[dialog d_alisveris_aspendos text]
Criminal Uo Alisveris Vendoru
Mage
Tinker
Tailor
Armorer
Animal Trainer
Weapon Smith
Bowyer
Carpenter
Provisioner
Iptal
[dialog d_alisveris_aspendos button]
Onbutton=0
src.sysmessage Bisey almadiniz.
On=1
src.dialog d_amage
endif
On=2
src.dialog d_atinker
endif
On=3
src.dialog d_aatailor_hmt
endif
On=4
src.dialog d_aarmorer
On=5
src.dialog d_aanimal
endif
On=6
src.dialog d_aweapon
endif
On=7
src.dialog d_abowyer
endif
On=8
src.dialog d_acarpenter
endif
On=9
src.dialog d_aprovis
endif
On=10
src.sysmessage Bisey almadiniz
endif
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
////////////////
////d_amage/////
////////////////
[dialog d_amage]
Nomove
50,50
resizepic 10 50 3600 255 210
text 25 68 105 0 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
button 30 150 4006 4007 1 0 3
text 60 150 0492 3
button 30 175 4006 4007 1 0 4
text 60 175 0492 4
button 30 200 4006 4007 1 0 5
text 60 200 0492 5
[dialog d_amage text]
Criminal Uo Mage Alisveris
Mark Tasi
90 lik reg
blank scroll
full spellbook
Geri
[dialog d_amage button]
Onbutton=0
src.sysmessage Bisey almadiniz.
On=1
SRC.NEWITEM i_rune_marker
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=2
SRC.NEWITEM i_magic_reg90
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=3
SRC.NEWITEM i_scroll_blank
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=4
SRC.NEWITEM i_full_spellbook
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=5
src.dialog d_alisveris_aspendos
return 1
endif
----------------------------------------------------------------------------------
----------------------------------------------------------------------------------
----------------------------------------------------------------------------------
----------------------------------------------------------------------------------
/////////////////////
//////d_atinker//////
/////////////////////
[dialog d_atinker]
Nomove
50,50
resizepic 10 50 3600 255 210
text 25 68 105 0 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
button 30 150 4006 4007 1 0 3
text 60 150 0492 3
button 30 175 4006 4007 1 0 4
text 60 175 0492 4
button 30 200 4006 4007 1 0 5
text 60 200 0492 5
[dialog d_atinker text]
Criminal Uo Tinker Alisveris
Pickaxe
Tinker Tools
Smith Hammer
Saw
Geri
[dialog d_atinker button]
Onbutton=0
src.sysmessage Bisey almadiniz.
On=1
SRC.NEWITEM i_pickaxe
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=2
SRC.NEWITEM i_tinker_tools
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=3
src.newitem i_hammer
src.act.bounce
attr attr_newbie
return 1
endif
On=4
SRC.NEWITEM i_saw
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=5
src.dialog d_alisveris_aspendos
return 1
endif
----------------------------------------------------------------------------
----------------------------------------------------------------------------
----------------------------------------------------------------------------
----------------------------------------------------------------------------
///////////////////
/////d_aatailor/////
///////////////////
[dialog d_aatailor_hmt]
Nomove
50,50
resizepic 10 50 3600 255 210
text 25 68 105 0 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
button 30 150 4006 4007 1 0 3
text 60 150 0492 3
button 30 175 4006 4007 1 0 4
text 60 175 0492 4
[dialog d_aatailor_hmt text]
Criminal Uo Tailor Alisveris
Sewing Kit
100 Kumas
Makas
Geri
[dialog d_aatailor_hmt button]
Onbutton=0
src.sysmessage Bisey almadiniz.
On=1
SRC.NEWITEM i_sewing_kit
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=2
SRC.NEWITEM i_cloth,(100)
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=3
SRC.NEWITEM i_scissors
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=4
src.dialog d_alisveris_aspendos
return 1
endif
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
///////////////////
/////d_aarmorer/////
///////////////////
[dialog d_aarmorer]
Nomove
50,50
resizepic 10 50 3600 275 185
text 25 68 105 0 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
button 30 150 4006 4007 1 0 3
text 60 150 0492 3
button 30 175 4006 4007 1 0 4
text 60 175 0492 4
[dialog d_aarmorer TEXT]
Criminal Uo Armorer Alisveris
Criminal Pletemail Set
Criminal Chainmail Set
Criminal Deri Set
Geri
[dialog d_aarmorer button]
Onbutton=0
src.sysmessage Bisey almadiniz.
On=1
SRC.NEWITEM i_platemail_chest
src.act.color=0494
src.act.name=@2341 Criminal Uo Chest
SRC.ACT.BOUNCE
attr 00004
SRC.NEWITEM i_platemail_gloves
src.act.color=0494
src.act.name=1234 Criminal Uo Gloves
SRC.ACT.BOUNCE
attr 00004
SRC.NEWITEM i_platemail_gorget
src.act.name=@3471 Criminal Uo Gorget
src.act.color=0494
src.act.bounce
attr 00004
SRC.NEWITEM i_platemail_helm
src.act.name=@5124 Criminal Uo Helm
src.act.color=0494
SRC.ACT.BOUNCE
attr 00004
SRC.NEWITEM i_platemail_arms
src.act.color=0494
src.act.name=@5138 Criminal Uo Arms
SRC.ACT.BOUNCE
attr 00004
SRC.NEWITEM i_platemail_leggings
src.act.name=@4121 Criminal Uo Leggings
src.act.color=0494
SRC.ACT.BOUNCE
attr 00004
SRC.NEWITEM i_shield_heater
SRC.act.color=0494
src.act.name=@2511 Criminal Uo Heater
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=2
SRC.NEWITEM i_chainmail_leggings
SRC.ACT.BOUNCE
attr 00004
src.act.color=0480
src.act.name=Criminal Uo Leggings
SRC.NEWITEM i_chainmail_tunic
SRC.ACT.BOUNCE
attr 00004
src.act.name=Criminal Uo Tunic
src.act.color=0480
SRC.NEWITEM i_chainmail_coif
SRC.ACT.BOUNCE
attr 00004
src.act.name=Criminal Uo Coif
src.act.color=0480
endif
On=3
SRC.NEWITEM i_leather_cap
src.act.color 0488
src.act.name Criminal Uo Cap
SRC.ACT.BOUNCE
attr 00004
SRC.NEWITEM i_leather_tunic
src.act.color 0488
src.act.name Criminal Uo Tunic
SRC.ACT.BOUNCE
attr 00004
SRC.NEWITEM i_leather_gloves
src.act.color 0488
src.act.name Criminal Uo Gloves
SRC.ACT.BOUNCE
attr 00004
SRC.NEWITEM i_leather_leggings
src.act.color 0488
src.act.name Criminal Uo Leggings
SRC.ACT.BOUNCE
attr 00004
SRC.NEWITEM i_leather_gorget
src.act.color 0488
src.act.name Criminal Uo Gorget
SRC.ACT.BOUNCE
attr 00004
SRC.NEWITEM i_leather_sleeves
src.act.color 0488
src.act.name Criminal Uo Sleeves
SRC.ACT.BOUNCE
attr 00004
endif
On=4
src.dialog d_alisveris_aspendos
return 1
endif
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
///////////////////
/////d_aanimal/////
///////////////////
[dialog d_aanimal]
Nomove
50,50
resizepic 10 50 3600 275 185
text 25 68 105 0 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
button 30 150 4006 4007 1 0 3
text 60 150 0492 3
button 30 175 4006 4007 1 0 4
text 60 175 0492 4
[dialog d_aanimal text]
Criminal Uo Animal Trainer Alisveris
Kucultucu
Taming Sopasi
Saman
Geri
[dialog d_aanimal button]
Onbutton=0
src.sysmessage Bisey almadiniz.
On=1
SRC.NEWITEM i_shrink_deed
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=2
SRC.NEWITEM i_staff_taming
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=3
SRC.NEWITEM i_hay_sheaf
SRC.ACT.BOUNCE
attr 00004
return 1
endif
on=4
src.dialog d_alisveris_aspendos
return 1
endif
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
///////////////////
/////d_aweapon/////
///////////////////
[dialog d_aweapon]
Nomove
50,50
resizepic 10 50 3600 300 210
text 25 68 105 0 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
button 30 150 4006 4007 1 0 3
text 60 150 0492 3
button 30 175 4006 4007 1 0 4
text 60 175 0492 4
button 30 200 4006 4007 1 0 5
text 60 200 0492 5
[dialog d_aweapon text]
Criminal Uo Weapon Smith Alisveris
+9 katana
+9 Cutlass
+9 Criminal Staff
+9 Criminal Uo Kalkani
Geri
[dialog d_aweapon button]
Onbutton=0
src.sysmessage Bisey almadiniz.
On=1
SRC.NEWITEM i_katana_force
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=2
SRC.NEWITEM i_cutlass_force
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=3
SRC.NEWITEM i_staff_gnarled
src.act.color color_o_bloodrock
src.act.name @1412 +9 Criminal Uo Staff
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=4
SRC.NEWITEM i_shield_heater
src.act.color color_o_bloodrock
src.act.name +15 Criminal Uo Kalkan
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=5
src.dialog d_alisveris_aspendos
return 1
endif
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
///////////////////
/////d_abowyer/////
///////////////////
[dialog d_abowyer]
Nomove
50,50
resizepic 10 50 3600 255 160
text 25 68 105 0 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
button 30 150 4006 4007 1 0 3
text 60 150 0492 3
[dialog d_abowyer text]
Criminal Uo Bowyer Alisveris
100 arrow
Bow
Geri
[dialog d_abowyer button]
Onbutton=0
src.sysmessage Bisey almadiniz.
On=1
SRC.NEWITEM i_arrow,(100)
src.act.color=color_o_oldcopper
src.act.name Criminal Uo Arrow
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=2
SRC.NEWITEM i_bow
src.act.color=color_o_mytheril
src.act.name=@1235 Criminal Uo Bow
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=3
src.dialog d_alisveris_aspendos
return 1
endif
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
//////////////////////
/////d_acarpenter/////
//////////////////////
[dialog d_acarpenter]
Nomove
50,50
resizepic 10 50 3600 255 185
text 25 68 105 0 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
button 30 150 4006 4007 1 0 3
text 60 150 0492 3
button 30 175 4006 4007 1 0 4
text 60 175 0492 4
[dialog d_acarpenter text]
Criminal Uo Mage Alisveris
100 log
hammer
100 boards
Geri
[dialog d_acarpenter button]
Onbutton=0
src.sysmessage Bisey almadiniz.
On=1
SRC.NEWITEM i_log,(100)
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=2
SRC.NEWITEM i_hammer
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=3
SRC.NEWITEM i_board,(100)
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=4
src.dialog d_alisveris_aspendos
return 1
endif
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
-------------------------------------------------------------------------------
///////////////////
/////d_aprovis/////
///////////////////
[dialog d_aprovis]
Nomove
50,50
resizepic 10 50 3600 255 210
text 25 68 105 0 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
button 30 150 4006 4007 1 0 3
text 60 150 0492 3
button 30 175 4006 4007 1 0 4
text 60 175 0492 4
button 30 200 4006 4007 1 0 5
text 60 200 0492 5
[dialog d_aprovis text]
Criminal Uo Mage Alisveris
Newbie Bag
Kasa
100 Crosbow Arrow
Book
Geri
[dialog d_aprovis button]
Onbutton=0
src.sysmessage Bisey almadiniz.
On=1
SRC.NEWITEM i_bag
src.act.color=color_o_blackrock
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=2
SRC.NEWITEM i_box_wood
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=3
SRC.NEWITEM i_xbolt
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=4
SRC.NEWITEM i_book_sm
SRC.ACT.BOUNCE
attr 00004
return 1
endif
On=5
src.dialog d_alisveris_aspendos
return 1
endif
[eof]
Arkadaşlar sitede bolca bir araştırma yaptım ve item olarak en çok stoneler gerektiği gözüme çarptı bende kendi yazdığım scp yi yollayım size bu da itemleri:
***************************************************************************************
***************************************************************************************
***************************************************************************************
////////////////////
////////Rare////////
////////////////////
[ITEMDEF i_rare]
ID=i_dye_tub
NAME=Rare Dye
TYPE=T_DYE_VAT
WEIGHT=10
CATEGORY=Items by Professions
SUBSECTION=Tailor
DESCRIPTION=Rare Dying Tub
RESOURCES=5 i_log
SKILLMAKE=CARPENTRY 50.0, t_carpentry
RESOURCES2=10 i_board
On=@Create
type t_dye_vat
on=@click
src.sysmessage Rare Dye
On=@DClick
target Hangi esyayi boyayacaksiniz?
return 1
on=@targon_item
src.targ.color <color>
endif
return 1
On=@TargOn_Char
src.sysmessage Canli varliklari boyayamazsiniz.
return 1
[eof]
//////////////////////
////Rare Yapma Kit////
//////////////////////
[itemdef i_rare_kit]
Defname=i_rare_kit
id=i_sewing_kit
name=@190 Rare Kit
On=@Create
color=00
On=@click
src.sysmessage Lutfen 2 kere tiklayiniz...
On=@dclick
src.dialog d_rare_kit
[Dialog d_rare_kit]
NOMOVE
0,0
resizepic 10 50 3000 300 175
text 25 68 105 0 0
button 30 100 2014 2015 1 0 1
text 60 100 0492 1
button 30 125 2014 2015 1 0 2
text 60 125 0492 2
text 60 135 0494 3
text 60 150 0494 4
text 60 165 0494 5
[dialog d_rare_kit text]
Rare yapmak istiyormusunuz...
Evet...
Hayir...
Onemli Notlar:
1-)Rare yapma islemi skill kazandirmaz...
2-)Hayir'a basarsaniz kit yokolur...
[dialog d_rare_kit button]
On=0
src.sysmessage Rare Yapmadiniz...
return 1
endif
On=1
if (<src.restest 50 i_log>)
SRC.NEWITEM i_rare
SRC.ACT.BOUNCE
attr 00004
return 1
src.consume 50 i_log
src.sysmessage @612 50 logunuz cantadan alinmistir...
return 1
else
src.sysmessage @080a Yaninizda 50 log yok.
return 1
src.fix
endif
On=2
src.sysmessage Malzeme yokedildi...
src.remove
*****************************************************************************************
*****************************************************************************************
[ITEMDEF i_magic_reg30]
ID=i_crystal_green_big
Value=100
WEIGHT=1
NAME=Reg Crystal 30
ON=@Create
attr=04
color=0
ON=@Click
message=@07d1,,1 <name>
message=@0712,,1 [30]
return 1
ON=@DClick
if !(<topobj.uid> == <src.uid>)
src.sysmessage Bunu ancak cantanizda iken kullanabilirsiniz.
return 1
endif
src.emote use lesser reagent crystal
src.newitem bag_reg30
src.act.bounce
remove
return 1
[ITEMDEF i_magic_reg60]
ID=i_crystal_green_big
Value=250
WEIGHT=2
NAME=Reg Crystal 60
ON=@Create
attr=04
color=0
ON=@Click
message=@0722,,1 <name>
message=@0712,,1 [60]
return 1
ON=@DClick
if !(<topobj.uid> == <src.uid>)
src.sysmessage Bunu ancak cantanizda iken kullanabilirsiniz.
return 1
endif
src.emote use reagent crystal
src.newitem bag_reg60
src.act.bounce
remove
return 1
[ITEMDEF i_magic_reg90]
ID=i_crystal_green_big
Value=400
WEIGHT=3
NAME=Reg Crystal 90
ON=@Create
attr=04
color=0
ON=@Click
message=@0846,,1 <name>
message=@0712,,1 [90]
return 1
ON=@DClick
if !(<topobj.uid> == <src.uid>)
src.sysmessage Bunu ancak cantanizda iken kullanabilirsiniz.
return 1
endif
src.emote use greater reagent crystal
src.newitem bag_reg90
src.act.bounce
remove
return 1
[TEMPLATE bag_reg30]
DEFNAME=bag_reg30
CONTAINER=i_bag
ITEM=i_reag_black_pearl,30
ITEM=i_reag_blood_moss,30
ITEM=i_reag_garlic,30
ITEM=i_reag_ginseng,30
ITEM=i_reag_mandrake_root,30
ITEM=i_reag_nightshade,30
ITEM=i_reag_sulfur_ash,30
ITEM=i_reag_spider_silk,30
[TEMPLATE bag_reg60]
DEFNAME=bag_reg60
CONTAINER=i_bag
ITEM=i_reag_black_pearl,60
ITEM=i_reag_blood_moss,60
ITEM=i_reag_garlic,60
ITEM=i_reag_ginseng,60
ITEM=i_reag_mandrake_root,60
ITEM=i_reag_nightshade,60
ITEM=i_reag_sulfur_ash,60
ITEM=i_reag_spider_silk,60
[TEMPLATE bag_reg90]
DEFNAME=bag_reg90
CONTAINER=i_bag
ITEM=i_reag_black_pearl,90
ITEM=i_reag_blood_moss,90
ITEM=i_reag_garlic,90
ITEM=i_reag_ginseng,90
ITEM=i_reag_mandrake_root,90
ITEM=i_reag_nightshade,90
ITEM=i_reag_sulfur_ash,90
ITEM=i_reag_spider_silk,90
//////////////////////////////
//////////////////////////////
///////////Spellbook//////////
//////////////////////////////
[ITEMDEF i_full_spellbook]
ID=i_spellbook
TYPE=t_spellbook
VALUE=3000
WEIGHT=0.1
NAME=Spellbook
RESOURCES=64 i_scroll_blank , 1 i_magic_reg90 , 40 i_scroll_recall
SKILLMAKE=INSCRIPTION 100.0, MAGERY 100.0
ON=@CREATE
ATTR=attr_magic|attr_newbie //magical and newbie
MORE=04ffffffff //1-4 circles
MORE2=04ffffffff // 5-8 circles
color 0
ON=@Click
var.spell_sayisi
var.snum 0
if (<more1> & 01)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 02)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 04)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 08)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 010)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 020)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 040)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 080)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 0100)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 0200)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 0400)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 0800)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 01000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 02000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 04000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 08000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 010000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 020000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 040000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 080000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 0100000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 0200000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 0400000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 0800000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 01000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 02000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 04000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 08000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 010000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 020000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 040000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more1> & 080000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 01)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 02)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 04)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 08)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 010)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 020)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 040)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 080)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 0100)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 0200)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 0400)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 0800)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 01000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 02000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 04000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 08000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 010000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 020000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 040000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 080000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 0100000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 0200000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 0400000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 0800000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 01000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 02000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 04000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 08000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 010000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 020000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 040000000)
var.snum (<eval <var.snum>> + 1)
endif
if (<more2> & 080000000)
var.snum (<eval <var.snum>> + 1)
endif
if <var.snum>=64
message Spellbook [Dolu]
return 1
endif
message Spell Book [<eval <var.snum>>]
return 1
***************************************************************************************
***************************************************************************************
***************************************************************************************
***************************************************************************************
***************************************************************************************
[itemdef i_shrink_deed]
id=i_deed
weight=20
Name=Kucultme Kagidi
sellvalue=150
on=@create
type=115
color=0481
attr=attr_newbie
on=@dclick
TARGET Kucultucek hayvani seciniz.
ON=@TARGON_CHAR
IF (<SRC.TARG.BODY>==c_man) || (<SRC.TARG.BODY>==c_woman) ||
(<SRC.TARG.NPC>==0)
SRC.SYSMESSAGE Bu nesneyi kucultemezsiniz !
RETURN 1
ELSEIF <src.targ.flags>&statf_conjured
src.sysmessage Bu nesneyi kucultemezsiniz !
SRC.TARG.REMOVE
RETURN 1
ELSEIF <SRC.TARG.ISMYPET>
if <src.targ.hits>!=<src.targ.str>
src.sysmessage <SRC.TARG.NAME> Yeterince Saglikli Degil!
return 1
ELSEIF <SRC.TARG.ISMYPET>
IF <SRC.TARG.NPC>
SRC.NEWITEM=i_deeded
IF <SRC.TARG.ID> = C_LLAMA
SRC.ACT.NAME=llama
ENDIF
IF <SRC.TARG.ID> = C_HORSE_TAN
SRC.ACT.NAME=horse
ENDIF
IF <SRC.TARG.ID> = C_HORSE_GRAY
SRC.ACT.NAME=horse
ENDIF
IF <SRC.TARG.ID> = C_HORSE_BROWN_DK
SRC.ACT.NAME=horse
ENDIF
IF <SRC.TARG.ID> = C_HORSE_BROWN_LT
SRC.ACT.NAME=horse
ENDIF
IF <SRC.TARG.ID> = C_A_MUSTANG_BLACK
SRC.ACT.NAME=mustang
ENDIF
IF <SRC.TARG.ID> = C_A_MUSTANG_CHOCOLATE
SRC.ACT.NAME=mustang
ENDIF
IF <SRC.TARG.ID> = C_A_MUSTANG_CRIMSON
SRC.ACT.NAME=mustang
ENDIF
IF <SRC.TARG.ID> = C_A_MUSTANG_GREY
SRC.ACT.NAME=mustang
ENDIF
IF <SRC.TARG.ID> = C_A_MUSTANG_PAMAMINO
SRC.ACT.NAME=mustang
ENDIF
IF <SRC.TARG.ID> = C_A_MUSTANG_REDROAN
SRC.ACT.NAME=mustang
ENDIF
IF <SRC.TARG.ID> = C_A_MUSTANG_ROAN
SRC.ACT.NAME=mustang
ENDIF
IF <SRC.TARG.ID> = C_A_MUSTANG_SKY
SRC.ACT.NAME=mustang
ENDIF
IF <SRC.TARG.ID> = C_A_MUSTANG_SKYGRAY
SRC.ACT.NAME=mustang
ENDIF
IF <SRC.TARG.ID> = C_M_NIGHTMARE
SRC.ACT.NAME=nightmare
ENDIF
IF <SRC.TARG.ID> = SHIRE1
SRC.ACT.NAME=shire
ENDIF
IF <SRC.TARG.ID> = SHIRE1
SRC.ACT.NAME=shire
ENDIF
IF <SRC.TARG.ID> = c_ostard_silver
SRC.ACT.NAME=Silver Ostard
ENDIF
IF <SRC.TARG.ID> = C_BULL_BROWN_LT
SRC.ACT.NAME=bull
ENDIF
IF <SRC.TARG.ID> = C_BULL_BROWN_DK
SRC.ACT.NAME=bull
ENDIF
IF <SRC.TARG.ID> =C_COW_BROWN
SRC.ACT.NAME=cow
ENDIF
IF <SRC.TARG.ID> = C_COW_BW
SRC.ACT.NAME=cow
ENDIF
IF <SRC.TARG.ID> = C_A_BLACK_BEAR
SRC.ACT.NAME=black bear
ENDIF
IF <SRC.TARG.ID> = C_BEAR_BROWN
SRC.ACT.NAME=brown bear
ENDIF
IF <SRC.TARG.ID> = C_A_COUGAR
SRC.ACT.NAME=cougar
ENDIF
IF <SRC.TARG.ID> = C_GORILLA
SRC.ACT.NAME=gorilla
ENDIF
IF <SRC.TARG.ID> = C_A_WOLF_GRAY
SRC.ACT.NAME=wolf
ENDIF
IF <SRC.TARG.ID> = C_BEAR_GRIZZLY
SRC.ACT.NAME=grizzly bear
ENDIF
IF <SRC.TARG.ID> = C_STAG
SRC.ACT.NAME=hart
ENDIF
IF <SRC.TARG.ID> = C_DOE
SRC.ACT.NAME=hind
ENDIF
IF <SRC.TARG.ID> = C_PANTHER
SRC.ACT.NAME=panther
ENDIF
IF <SRC.TARG.ID> = SHIRE2
SRC.ACT.NAME=shire
ENDIF
IF <SRC.TARG.ID> = C_BEAR_POLAR
SRC.ACT.NAME=polar bear
ENDIF
IF <SRC.TARG.ID> = C_A_SNOW_LEOPARD
SRC.ACT.NAME=snow leopard
ENDIF
IF <SRC.TARG.ID> = C_WALRUS
SRC.ACT.NAME=walrus
ENDIF
IF <SRC.TARG.ID> = C_A_WOLF_WHITE
SRC.ACT.NAME=wolf
ENDIF
IF <SRC.TARG.ID> = C_DOLPHIN
SRC.ACT.NAME=dolphin
ENDIF
IF <SRC.TARG.ID> = C_OSTARD_DESERT
SRC.ACT.NAME=desert ostard
ENDIF
IF <SRC.TARG.ID> = C_OSTARD_FOREST
SRC.ACT.NAME=forest ostard
ENDIF
IF <SRC.TARG.ID> = C_OSTARD_ZOSTRICH
SRC.ACT.NAME=frenzied ostard
ENDIF
IF <SRC.TARG.ID> = C_CLASS
SRC.ACT.NAME=Worldclassmare
ENDIF
IF <SRC.TARG.ID> = C_AMAT
SRC.ACT.NAME=Amatormare
ENDIF
IF <SRC.TARG.ID> = C_PRO
SRC.ACT.NAME=professionalmare
ENDIF
IF <SRC.TARG.ID> = C_SEMI
SRC.ACT.NAME=semipromare
ENDIF
IF <SRC.TARG.ID> = C_KAMYON
SRC.ACT.NAME=Tamelenen Dragon
ENDIF
IF <SRC.TARG.ID> = I_ROT
SRC.ACT.NAME=Rotting Corpse
ENDIF
IF <SRC.ACT.ID> = I_SNOW_L
SRC.ACT.NAME=Snow Llama
ENDIF
IF <SRC.TARG.ID> = C_CAMEL
SRC.ACT.NAME=Camel
ENDIF
IF <SRC.TARG.ID> = C_ICE_L
SRC.ACT.NAME=Ice Llama
ENDIF
IF <SRC.TARG.ID> = i_fire_ost
SRC.ACT.NAME=Fire Ostard
ENDIF
IF <SRC.TARG.ID> = I_HORSE_F
SRC.ACT.NAME=Fire Horse
ENDIF
IF <SRC.TARG.ID> = C_BLACK_L
SRC.ACT.NAME=Black Llama
ENDIF
IF <SRC.TARG.ID> = C_FIRE_L
SRC.ACT.NAME=Fire Llama
ENDIF
IF <SRC.TARG.ID> = C_BUZITORN
SRC.ACT.NAME=Buzitorn
ENDIF
IF <SRC.TARG.ID> = i_shire
SRC.ACT.NAME=Shire
ENDIF
IF <SRC.TARG.ID> = c_mid
SRC.ACT.NAME=Mid Ostard
ENDIF
SRC.ACT.COLOR=<src.targ.color>
SRC.ACT.MORE1=<src.targ.id>
SRC.ACT.BOUNCE
SRC.TARG.REMOVE
REMOVE
RETURN 1
ENDIF
ENDIF
REMOVE
RETURN 1
ELSE
SRC.SYSMESSAGE <SRC.TARG.NAME> sana ait degil !
RETURN 0
ENDIF
ELSE
TARGET
RETURN 0
ENDIF
[itemdef i_deeded]
id=i_deed
weight=20
name=kucultulmus hayvan
on=@create
type=t_figurine
*******************************
[itemdef i_rare_deed]
id=i_hammer
defname=i_rare_deed
name=@Rare Yapma Hammer's
On=@Create
color=color_o_bloodrock
On=@click
src.dialog d_rare_deed
[dialog d_rare_deed]
nomove
0,0
resizepic 10 50 3600 175 135
text 25 68 0480 0
button 30 100 4006 4007 1 0 1
text 60 100 0492 1
button 30 125 4006 4007 1 0 2
text 60 125 0492 2
[dialog d_rare_deed text]
Rare yapmak istiyormusunuz...
evet
hayir
[dialog d_rare_deed button]
on=0
return 1
endif
On=1
src.newitem i_rare
endif
On=2
remove
********************************
[ITEMDEF i_sopa]
ID=i_staff_gnarled
NAME=Tameleme Sopası
TYPE=t_weapon_mace_staff
VALUE=10
TWOHANDS=Y
LAYER=2
WEIGHT=10
DAM=5,10
On=@Create
color 02
more2 0
timer -1
hitpoints 5
On=@DClick
if (<topobj.uid> != <src.uid>)
src.sysmessage Bunu kullanabilmeniz icin uzerinizde olmali.
elseif (<src.flags>&statf_hidden) || (<src.flags>&statf_invisible)
src.sysmessage Gizlenmis durumdayken bunu kullanamazsiniz.
elseif (<src.targ.region.defname> == a_townZoo)
src.sysmessage Bu bolgede taming yasaktir.
elseif (<timer> == -1)
target Hangi hayvani ehlilestirmek istiyorsunuz?
endif
return 1
On=@UnEquip
more2 0
timer -1
link -1
On=@Timer
if (<cont.flags>&statf_hidden) || (<cont.flags>&statf_invis)
cont.sysmessage Gizlenmis durumda olmaz
if (<cont.distance <link>> > 3)
cont.sysmessage Hayvana yeterince yakin degilsiniz.
link -1
more2 0
return 1
elseif !(<cont.canseelos <link>>)
cont.sysmessage @0481,6,6,0 Hayvani goremiyorsunuz
link -1
more2 0
return 1
elseif (<cont.distance <link.memoryfindtype.memory_ispawned.link.uid>> > 3)
cont.sysmessage Bu hayvan yuvasindan uzaklasmis.
link -1
more2 0
return 1
elseif (<more2> < 6)
dorand 10
cont.say Gel <link.name>, gel..
cont.say Sana zarar vermeyecegim <link.name>..
cont.say Sakin ol, <link.name>.
cont.say Her zaman senin gibi bir <link.name> sahibi olmak istemistim..
cont.say Cok tatlisin, <link.name>.
cont.say Gel bir tanem, gel canim..
cont.say Seni incitmeyecegim, <link.name>.
cont.say Arkadasin olmak istiyorum.
cont.say Gel <cont.sex babana/annene>, <link.name>.
cont.say Gel <link.name>, gel <cont.sex babana/annene>.
cont.say Gel <link.name>, gel <link.name>, gel altima.
enddo
dorand 2
cont.anim 17
cont.anim 19
enddo
timer 2
more2 (<more2> + 1)
return 1
endif
more2 0
if !(<link.npc> == 1)
cont.sysmessage Bunu ehlilestiremezsiniz.
return 1
endif
if (rand(100) < 75)
if (<link.memoryfindtype.memory_ispawned>)
link.memoryfindtype.memory_ispawned.remove
endif
link.karma -50
link.memorydel <cont.uid>
link.newitem i_memory
link.act.attr 04
link.act.more1 04
link.act.more2 <serv.time>
link.act.morep <link.p>
link.act.color memory_ipet
link.act.timer -1
link.act.link <cont.uid>
link.act.cont <link.uid>
link.flags <link.flags>&statf_pet
cont.sysmessage <link.name> sizi sahibi olarak kabul etti.
if ((<cont.skilllock[35]> == 0) && (<cont.skilltotal> < 700.0))
if (<cont.taming> < 30.0)
if (rand(3) == 1)
cont.taming (<cont.taming> + 1)
endif
elseif (<cont.taming> < 50.0)
if (rand(6) == 1)
cont.taming (<cont.taming> + 1)
endif
elseif (<cont.taming> < 75.0)
if (rand(12) == 1)
cont.taming (<cont.taming> + 1)
endif
elseif (<cont.taming> < 100.0)
if (rand(24) == 1)
cont.taming (<cont.taming> + 1)
endif
endif
endif
if ((<cont.skilllock[2]> == 0) && (<cont.skilltotal> < 700.0))
if (<cont.animallore> < 30.0)
if (rand(2) == 1)
cont.animallore (<cont.animallore> + 1)
endif
elseif (<cont.animallore> < 50.0)
if (rand(4) == 1)
cont.animallore (<cont.animallore> + 1)
endif
elseif (<cont.animallore> < 75.0)
if (rand(8) == 1)
cont.animallore (<cont.animallore> + 1)
endif
elseif (<cont.animallore> < 100.0)
if (rand(16) == 1)
cont.animallore (<cont.animallore> + 1)
endif
endif
endif
link.tag.tamer <cont.uid>
link -1
else
cont.sysmessage Hayvani ehlillestirmeyi basaramadiniz.
link -1
endif
return 1
On=@TargOn_Char
if !(<src.targ.region.defname> == a_townZoo)
if ((<src.targ.npc> == 1)
if !(<src.targ.canseelos>)
src.sysmessage Hayvana ulasamiyorsunuz.
elseif (<src.targ.distance> > 3)
src.sysmessage Hayvana yeterince yakin degilsiniz.
elseif (<src.targ.memoryfindtype.memory_ipet>)
if (<src.targ.memoryfindtype.(memory_ipet|memory_guard).link> == <src.uid>)
src.sysmessage <src.targ.name> zaten size ait.
src.targ.flags <src.targ.flags>&statf_pet
else
src.sysmessage <src.targ.name> bir baskasina ait.
endif
elseif (<src.targ.memoryfindtype.memory_fight>)
src.sysmessage Hayvan su an musait degil.
elseif (<src.targ.memoryfindtype.memory_war_targ.link> == <src.uid>)
src.sysmessage Hayvan su an size cok kizgin.
elseif (<src.targ.findid.i_rune_summon_creature>)
src.sysmessage Buyu ile yaratilmis hayvanlari ehlilestiremezsiniz.
elseif (0<src.targ.tag.tamer> == 0<src.uid>) // tamerlar elele bug-free dunyaya
src.sysmessage Hayvan artik sizi umursamiyor.
elseif (<src.taming> < <src.targ.taming>)
src.anim 19
src.sysmessage <src.targ.name> icin taming skilliniz yeterli degil. (gerekli skill: <src.targ.taming>)
elseif (<src.animallore> < <src.targ.animallore>)
src.anim 19
src.sysmessage <src.targ.name> icin animal lore skilliniz yeterli degil. (gerekli skill: <src.targ.animallore>)
else // tame etmeye ba$la...
link <src.targ.uid>
src.anim 19
timer 2
endif
else
src.sysmessage Bunu ehlillestiremezsiniz.
endif
else
src.sysmessage Bu bolgede taming yasaktir.
endif
return 1
Bu konu xwerswoodx tarafından düzenlendi(2007-04-28 01:11, 18 yıl önce)