// ----------------------------
// COMMANDS.SCP - GENEL KOMUTLAR
// ----------------------------
VERSION=0.55
[PLEVEL 1]
DISARM
FORUM
INFSVR
INGOTS
HUNGRY
OKSIL
ORES
PLAYER
REGS
STAT
SKILLDUSUR
[PLEVEL 2]
AFK
CHARLIST
FIX
WHERE
SALUTE
BANKSELF
ADMIN
ANIM
BARK
CAST
CLIENTS
FOLLOW
GATE
GETIR
XGO
GO
GOCHAR
GOCLI
GONAME
GOSOCK
GOUID
HELP
INVIS
JAIL
KAFESLE
PG
S
SUMMONTO
XSUMMONTO
STAFFADMIN
SA
SUICIDE
TELE
INVUL
[PLEVEL 3]
NOT
RESURRECT
SICIL
SINFO
FLY
KILL
LINK
LOCK
REMOVE
MACROADMIN
MA
DIALOG
STONE
XSTONE
[PLEVEL 4]
PRIVSHOW
ADD
STATIC
SUMMON
EDIT
GOTYPE
INFO
NUKE
PROPS
SAVE
SET
TAG
TAGLIST
TILE
TWEAK
QUESTARR
AMOUNT
[PLEVEL 5]
ALLCLIENTS
SAVE
REGION
SECTOR
PASSWORD
XPASSWORD
JFORGIVE
CONTROL
[PLEVEL 7]
SERV
PAGE
GMPAGE
PAGE KICK
PAGE K
PAGE BAN
PAGE B
KICK
EVENTS
SHOW
TAGLIST
// pLevel 1
[function guildsil]
guild_test
[function player]
dialog d_player
[function infsvr] // bronx'un player chari icin
information
[function forum] // bronx 05.11.2001
if !(0<args> == 0)
weblink www.nebula.gen.tr/forum/goster.php?no=<args>
sysmessage Lutfen bekleyin..
else
weblink www.nebula.gen.tr/forum/
sysmessage Lutfen bekleyin..
endif
[function oksil] // oyuncuların oku silmesi için.
arrowquest
// pLevel 1 d0ne.
[function questarr] // Quest Oku çıkartır. GM ler için.
serv.allclients arrowquest <args>
[function sa]
staffadmin
[function ma]
macroadmin
[function cnct]
return <eval ((<serv.time> - <tag.sa_timer>) / 600)>
[function sanim] // region-wide
region.allclients sanim2 <args>
[function sanim2]
if (<account.plevel> > 1)
anim <args>
endif
[function sgo] // server-wide
serv.allclients sgo2 <ARGS>
[function sgo2]
if (<account.plevel> > 1)
go <args>
endif
[function ssay]
serv.allclients ssay2 <args>
[function ssay2]
if (<account.plevel> > 1)
sayu <args>
endif
[function editchk]
region.allclients editchk2
[function editchk2]
if ((<skilltotal> > 700.0) && (0<account.plevel> < 2))
var.smsgx 0482
serv.allclients stafftrig2 *** Warning: character '<name>' skill total over 700.0 (<skilltotal>)
serv.allclients stafftrig2 *** 'Skill total' check complete.
endif
[FUNCTION stafftrig2]
if (<account.plevel> > 1)
smsgx <args>
endif
[function sysmessageua]
var.act <act>
var.p <p>
newitem i_memory
act.p 6000 2000
var.regfla <act.region.flags>
act.region.flags <region.flags>
p 6000 2000
act.sayua <eval <var.sysmessageua>> 0 0 1 <args>
p <var.p>
act.region.flags <var.regfla>
act.remove
act <var.act>
[function smsgx]
var.act <act>
var.p <p>
newitem i_memory
act.p 6000 2000
var.regfla <act.region.flags>
act.region.flags <region.flags>
p 6000 2000
act.sayua <eval <var.smsgx>> 0 0 1 <args>
p <var.p>
act.region.flags <var.regfla>
act.remove
act <var.act>
[function f_disc]
newitem i_insta_disconnecter
act.equip
[itemdef i_insta_disconnecter]
name Instant Disconnecter
id i_memory
type t_eq_script
weight 0
layer layer_special
On=@Create
attr attr_invis|attr_decay
On=@Equip
timer 3
On=@Timer
if (<cont>)
cont.disconnect
endif
remove
return 1
[function f_fizzle] // fizzle func.
effect 3,i_fx_smoke_small,3,40,1
sound 92
if (<mana> > 8)
mana (<mana> - {5 8})
else
mana 1
endif
if (<findid.i_magerylvl>)
findid.i_magerylvl.remove
endif
if (<findid.i_evallvl>)
findid.i_evallvl.remove
endif
if (<findid.i_poisonlvl>)
findid.i_poisonlvl.remove
endif
if (<findid.i_spdelay_man>)
findid.i_spdelay_man.remove
elseif (<findid.i_spdelay_woman>)
findid.i_spdelay_woman.remove
elseif (<findid.i_spdelay_unisex>)
findid.i_spdelay_unisex.remove
endif
[function f_statloss] // pk's stat loss
if (<isevent.e_spr>)
events -e_spr
sysmessage Stat'lariniz artik korunmuyor.
tag.ostr
tag.oint
tag.odex
endif
if (0<tag.loss>)
if (<kills> > <eval <tag.loss>>)
if (<str> > 26)
str (<str> - 2)
endif
if (<dex> > 26)
dex (<dex> - 2)
endif
if (<int> > 26)
int (<int> - 2)
endif
endif
endif
tag.loss <kills>
[function f_player_login] // playerlar boyle login oluyor
if (0<account.plevel> > 1)
skillclass 1
var.smsgx 0482
smsgx Nebula yetkili kadrosuna hosgeldiniz, <account.name>!
f_staff_login
return 1
else
account.plevel
endif
if !(strmatch('<clientversion>','2.0.3'))
var.smsgx 0482
smsgx *** Nebula'ya baglanmak icin lutfen Nebula baglanti programini kullanin. Baglantiniz kesiliyor...
weblink https://www.nebula.gen.tr/dl/nebula.zip
f_disc
return 1
endif
title
detail 0
if (<necromancy> > 0) && (<necromancy> < 50.1)
necromancy
endif
tag.hungry
tag.affet
tag.af
tag.aff
tag.bagn
tag.questp
tag.umcn
tag.umc
tag.msk
tag.mco
tag.bear
tag.af
tag.aff
tag.nysnowball
tag.vendorella
if !(<isevent.fix>)
events +fix
endif
// veteran awards #1
if (strmatch('<account.firstconnectdate>','2001/10/28 02:00:00')) && (strmatch('<uid.04009a3fa.tag.<account.name>_vet>',''))
if !(<flags>&statf_dead)
try uid.04009a3fa.tag.<account.name>_vet 1
try uid.04009a3fa.more2 <eval (<uid.04009a3fa.more2> + 1)>
if (strmatch('<uid.04009a3fa.tag.<account.name>_vet>','01'))
newitem i_v1_ticket
act.bounce
act.more2 <uid>
endif
endif
endif
// clearation wrong accounts from fctn system & guild retreat
if !(strmatch('<uid.040079abb.tag.<account.name>>',''))
if (strmatch('<uid.040079abb.tag.<account.name>>','<uid>')) && !(<memoryfindtype.memory_town>)
var.p <p>
p 5123 1778
try uid.040079abb.tag.<account.name>
p <var.p>
update
elseif (<memoryfindtype.memory_guild>) && (<memoryfindtype.memory_town>) && (<memoryfindtype.memory_guild.link.link.uid> != <memoryfindtype.memory_town.link.uid>)
if !(<findid.i_fctn_resigner>)
newitem i_fctn_resigner
act.equip
findid.i_fctn_resigner.timer 1
sysmessage <memoryfindtype.memory_guild.link.name>: O/C/F destek yonu degisimi.
endif
elseif (strmatch('<uid.040079abb.tag.<account.name>>','X'))
if !(<findid.i_fctn_resigner>)
newitem i_fctn_resigner
act.equip
findid.i_fctn_resigner.timer 1
sysmessage Hesabiniz faction sisteminden diskalifiye edilmis.
endif
endif
endif
[function f_player_logout] // playerlar boyle logout oluyor
if (<findid.i_rune_incognito>)
findid.i_rune_incognito.remove
endif
if (<region.guarded>) && !(<region.flags>®ion_flag_insta_logout) && (<hits> < <str>) && !(<flags>&statf_dead)
if (<memoryfindtype.memory_town>) || (<memoryfindtype.memory_guild.link.align> > 0)
hits 1
endif
endif
if (<kills>) // murder count fix
if !(0<tag.lg>)
tag.lg 1
elseif (<tag.lg> > 2)
kills (<kills> + 1)
tag.lg 0
else
tag.lg <eval (<tag.lg> + 1)>
endif
else
tag.loss
tag.lg
endif
[function f_stpublish] // staff join-part messager
if (0<account.plevel> > 1)
smsgx *** <args>
endif
[function f_staff_login] // staff boyle login oluyor
src.events +e_itemcreate
if !(0<account.plevel>)
skillclass
f_player_login
return 1
endif
if (0<allshow>)
allshow 0
endif
if !(strmatch('<account.plevel>','7'))
privshow 1
nightsight 1
fame 0
kills 0
karma 0
endif
tag.stf_timer
tag.sa_timer <serv.time>
if !(strmatch('<account.plevel>','7'))
var.smsgx 045
serv.allclients f_stpublish <account.name> baglandi.
endif
if (strmatch('<serv.name>','Locus'))
var.pg_box 04022b54a
elseif (strmatch('<serv.name>','Quann'))
var.pg_box 0400a8b60
endif
var.smsgx 0482
smsgx Hizmet sureniz: <eval (<account.totalconnecttime> / 60)> saat.
if (<uid.<var.pg_box>.rescount>)
smsgx Toplam <uid.<var.pg_box>.rescount> adet page mevcut. Liste icin: '.pg'
endif
events -fix
events gmfix
// dialog d_staff
[function f_staff_logout] // staff boyle logout oluyor
//if !(strmatch('<account.plevel>','7'))
// var.smsgx 020
// serv.allclients f_stpublish <account.name> cikti. (<cnct>m)
//endif
[eof]
bende nebuladan almıştım umarım işine yarar:D