Teot engellli client

[Lokman]

Arkadaslar bana simdi diyceksiniz yukarda Legbranin acıklamasi teot scp si var diyeceksiniz belki de bu konuda topic actigim icin bana kızcaksiniz Legbranin verdigi scp yi denedim ama olmadi vendor menuleri calismadi veya On=*buy* altina yanlis koyuyorum ben revison serisini kullaniyorum bensize speakshopkeek.scp sini veriyim benim icin koyarsaniz sevinirim illa vendor menulerini mi degistirmek lazim Willow nasıl onluyor..Help me..!!

[spo1=Speakshoopkeep.scp]//****************************************************************************
//SPHERE by : Menasoft ©1997-2000
//www.sphereserver.com
// All SPHERE script files and formats are copyright Menasoft & Pareners.
// This file may be freely edited for personal use, but may not be distributed
// in whole or in pare, in any format wiyout express written permission from
// Menasoft & Pareners. All donations and contributions
// become the property of Menasoft & Pareners.
//****************************************************************************
// FILE LAST UPDATED: Friday, April 28, 2000

[SPEECH spk_shopkeep]

ON=*sell*
SELL
return 1
ON=*buy*
BUY
return 2

ON=Hi
ON=Hello
ON=Hail
ON=Greet
sayu Greetings to you.
return 1

ON=Bye
ON=Goodbye
ON=Farewell
sayu Fare thee well.
BYE
RETURN 1

On=*
return 1

[SPEECH spk_shopkeep_sandrock]
ON=*sell*
SELL
return 1

ON=*buy*
if ( >= 98.0)
BUY
else
sayu I'm sorry , but I only trade with the most experienced miners.
endif
return 1

ON=Hi
ON=Hello
ON=Hail
ON=Greet
sayu Greetings to you.
return 1

ON=Bye
ON=Goodbye
ON=Farewell
sayu Fare thee well.
BYE
RETURN 1

On=*
return 1

[EOF][/spo]

Yukardaki legbranin yazdigi teot scp sini buna eklerseniz sevinirim ben yapamadim lutfen ilginizi bekliyourm..Veya bu teota baska cozum yok mu..

[ocean]

[spo1=SAnirim bu şekilde]//****************************************************************************
//SPHERE by : Menasoft ©1997-2000
//www.sphereserver.com
// All SPHERE script files and formats are copyright Menasoft & Pareners.
// This file may be freely edited for personal use, but may not be distributed
// in whole or in pare, in any format wiyout express written permission from
// Menasoft & Pareners. All donations and contributions
// become the property of Menasoft & Pareners.
//****************************************************************************
// FILE LAST UPDATED: Friday, April 28, 2000

[SPEECH spk_shopkeep]

ON=*sell*
SELL
return 1
ON=*buy*
BUY
return 2
IF !()
SERV.NEWITEM i_fix_teot
EQUIP
ENDIF

IF ( < 0)
FINDID.i_fix_teot.TIMER=1
ENDIF

//bunlar ise fixi oluşturan internal item ve functionlar.

[ITEMDEF i_fix_teot]
NAME=TEOT FIX
ID=i_memory
TYPE=t_eq_script
LAYER=layer_special

ON=@Create
attr=attr_invis|attr_decay

ON=@Equip
TIMER=1

ON=@Timer
IF !()
TIMER -1
ELSE
CONT.FIX_TEOT
TIMER=1
ENDIF
RETURN 1

[FUNCTION FIX_TEOT]
OBJ=
FORCHARMEMORYTYPE memory_speak
IF (> < 10)
TIMER=300
ENDIF
IF !()
SERV.NEWITEM i_backpack
NEW.CONT=
ENDIF
LINK.HASTEOTITEMS
ENDFOR

[FUNCTION HASTEOTITEMS]
LOCAL.ITEMS=0
LOCAL._FOR2=0
FORCONT
IF (==0)
LOCAL._FOR2 += 1
LOCAL.ITEMS += 1
TRY VAR.TEOT>=
ENDIF
ENDFOR

IF ( > 0)
FOR
TRY UID.>>.REMOVE
TRY VAR.TEOT>=
ENDFOR
ENDIF

IF ( > 0)
SERV.LOG (), ACC: : is using TEOT
//ve buraya yaptirmak istediginiz diger islemler, ban stone vs vs
//stone 1
//f_disc
//serv.account block 1
//serv.blockip //huehe
endif


ON=Hi
ON=Hello
ON=Hail
ON=Greet
sayu Greetings to you.
return 1

ON=Bye
ON=Goodbye
ON=Farewell
sayu Fare thee well.
BYE
RETURN 1

On=*
return 1

[SPEECH spk_shopkeep_sandrock]
ON=*sell*
SELL
return 1

ON=*buy*
if ( >= 98.0)
BUY
else
sayu I'm sorry , but I only trade with the most experienced miners.
endif
return 1

ON=Hi
ON=Hello
ON=Hail
ON=Greet
sayu Greetings to you.
return 1

ON=Bye
ON=Goodbye
ON=Farewell
sayu Fare thee well.
BYE
RETURN 1

On=*
return 1

[EOF][/spo][signature][hline]

[Lokman]

Deneyim bende oyle yaptım ama olmamisti bidaha deneyim olmassa gene yazarim daha saglam veya daha iyi scp varsa onlarada bakmakta isterim

[ocean]

Ben denedigimde sorun olmamişti.[signature][hline]