[PLEVEL 1]
isim

[FUNCTION isim]
IF (<SRC.TAG.ISIM>==1)
IF (strmatch('<args>',''))
src.sysmessage @049,,1 Alternatif isim girdisi Kullanmalisiniz..
src.sysmessage @049,,1 Fonksiyonu ".isim Thomas" Seklinde Kullanmalisiniz..
return 1
ENDIF
IF (strmatch('<src.tag.isimsakla>','<args>'))
src.sysmessage @04,,1 Bu isimdaha onceden hatali gorulmustur. Lutfen yeni isim seciniz..
return 1
ENDIF
SRC.NAME=<ARGS>
SRC.TAG.ISIM=0
RETURN 1
ELSE
SRC.SYSMESSAGE Isminiz hatali degil.
RETURN 1
ENDIF

[PLEVEL 4]
hataliisim

[FUNCTION hataliisim]
NEWITEM isim_item
ACT.CONT <UID>
ACT.TARGET Select Target.

[ITEMDEF isim_item]
ID=i_memory
TYPE=t_eq_script

ON=@Create
TIMER=20

ON=@Timer
REMOVE
RETURN 1

ON=@Targon_char
src.targ.tag.isimsakla <src.name>
SRC.TARG.TAG.ISIM=1
SRC.TARG.TAG.ESKIISIM=<SRC.TARG.NAME>
SRC.TARG.NAME Isminiz hatalidir, .isim komutuyla degistirebilirsiniz.
RETURN 1
[EOF]