|
|
| Yazar | Mesaj |
mesut2000
Nereden: Turkey izmir |
#275844
2008-01-28 12:56 GMT
arkadaşlar elimde böle bi kod var ama bi türlü çalıştıramadım sorun ne anlamadım bi yardımcı olun be bu arda OF_FileCommands ı açık sphere.iniden ama yok yazmıyor bi el atın şuna ya
Kod: [function f_oncommand]
if <src.account.plevel> > 1 if !(strmatch('<strsub 0 2 <args>>','pg')) || !(strmatch('<strsub 0 5 <args>>','mtele')) || !(strmatch('<strsub 0 4 <args>>','pg d')) || !(strmatch('<strsub 0 4 <args>>','pg m')) file.close IF !(<FILE.INUSE>) FILE.MODE.APPEND=1 IF (<FILE.OPEN C:\sphere\STAFFLOG.TXT>) FILE.WRITELINE <src.name> adli staff (plevel : <src.account.plevel>) <src.p> koordinatinda , <serv.rtime> tarihinde <args> adli komutu kullandi. Ayrica bu kisinin uidi : <src.uid> file.writeline " " file.close endif endif endif if (strmatch('<args>','add')) && (<src.account.plevel> >= 4) return 0 else if (strmatch('<strsub 0 6 <args>>','add i_')) || (strmatch('<strsub 0 9 <args>>','static i_')) && (<src.account.plevel> >= 4) if (strmatch('<strsub 0 3 <args>>','add')) src.addi <strsub 4 50 <args>> return 1 endif elif (strmatch('<strsub 0 6 <args>>','add c_')) && (<src.account.plevel> >= 4) if (strmatch('<strsub 0 3 <args>>','add')) src.addc <strsub 4 50 <args>> return 1 endif endif endif [FUNCTION addi] IF !(<ARGN>) IF (<ISEMPTY <DEF.<ARGS>>>) SYSMESSAGE @38,,1 Hata: Gecersiz bir komut kullandiniz RETURN 0 ENDIF ENDIF IF !(<ISEMPTY <ARGS>>) IF !(<SERV.ITEMDEF.<ARGS>>) SYSMESSAGE @38,,1 Hata: Gecersiz bir komut kullandiniz RETURN 0 ENDIF TARGETFG addi_ <ARGS> SYSMESSAGE @0 Where would you like to place the <SERV.ITEMDEF.<ARGS>.NAME>? RETURN 1 ENDIF SYSMESSAGE @38,,1 Hata: Gecersiz bir komut kullandiniz RETURN 0 [FUNCTION addi_] SERV.NEWITEM=<ARGS> file.close IF !(<FILE.INUSE>) FILE.MODE.APPEND=1 IF (<FILE.OPEN C:\sphere\STAFFADD.TXT>) FILE.WRITELINE <src.name> adli staff (plevel : <src.account.plevel>) <src.p> koordinatinda , <serv.rtime> tarihinde <serv.itemdef.<args>.name> adli item yaratti. Ayrica bu itemin uidi : <new.uid> file.writeline " " file.close endif endif NEW.TIMER = -1 NEW.P = <SRC.TARGP> NEW.TAG0.GMCREATE 1 NEW.TAG0.CIKARAN <eval <src.uid>> new.tag0.tarihi <serv.rtime> ACT=<NEW.UID> obj=<new.uid> [FUNCTION addc] IF !(<ARGN>) IF (<ISEMPTY <DEF.<ARGS>>>) SYSMESSAGE @38,,1 Hata: Gecersiz bir komut kullandiniz RETURN 0 ENDIF ENDIF IF !(<ISEMPTY <ARGS>>) IF !(<SERV.CHARDEF.<ARGS>>) SYSMESSAGE @38,,1 Hata: Gecersiz bir komut kullandiniz RETURN 0 ENDIF TARGETFG addc_ <ARGS> SYSMESSAGE @0 Where would you like to place the <SERV.CHARDEF.<ARGS>.NAME>? RETURN 1 ENDIF SYSMESSAGE @38,,1 Hata: Gecersiz bir komut kullandiniz RETURN 0 [FUNCTION addc_] SERV.NEWNPC=<ARGS> NEW.TIMER = -1 NEW.P = <SRC.TARGP> NEW.TAG0.GMCREATE 1 NEW.TAG0.CIKARAN <eval <src.uid>> new.tag0.tarihi <serv.rtime> ACT=<NEW.UID> file.close IF !(<FILE.INUSE>) FILE.MODE.APPEND=1 IF (<FILE.OPEN C:\sphere\STAFFNPCADD.TXT>) FILE.WRITELINE <src.name> adli staff (plevel : <src.account.plevel>) <src.p> koordinatinda , <serv.rtime> tarihinde <serv.chardef.<new.id>.name> adli npcyi yaratti. Ayrica bu itemin uidi : <new.uid> file.writeline " " file.close endif endif
|
Akillis
Nereden: United States Kentucky - Seattle |
#275943
2008-01-28 19:24 GMT
Verdigin kod, Erador'un bizzat tarafimdan yapilmistir tabii sonradan Xantier bir kac sey ekleme yapti ... Nese konuna gelince madem elinde bu kod var yapabilmen lazim... Gerekli bir kac dosya eksik ondan calismiyor ... Mesela bunlardan biri WRITELINE functioni.
MSN/ICQ/AIM gibi programlar aracılığı ile destek olmuyorum. UO için gelmeyiniz. SphereWiki - Acemilerin scriptera dönüştüğü site. |
mesut2000
Nereden: Turkey izmir |
#276043
2008-01-29 01:53 GMT
elimde erador pack var ordan aldım zaten bu scp yi ama dedigin dedigin writeline functioni hangi scpde biliyomusun yada yollaya bilirmisin zahmet olassa sphere.ini den commands ı açtım ama genede olmadı
|
Xantier
Nereden: Turkey İzmir |
#276056
2008-01-29 03:04 GMT
Bu kdar scripti eline geçirebilmişin , devamınıda bul bi zahmet biraz emek !
Ultima Online'da Role Play'ı canlandırmak adına... yakında geliyorum. Eski Erador'da unutulmaz Capture the flag sahnesi. http://img122.imageshack.us/img122/5013/er1sp4.jpg |
Kronos
Nereden: Turkey Istanbul |
#276057
2008-01-29 03:37 GMT
Ehehe.
Zamanında Andoria Pack yayınlanırken burda, bunlardan bahsedince, kimse kaale almıyordu, hatta bizzat dökümanlara eklenmişti. Şimdi aynı şey başa geline nasıl çıldırıyor insan. güzel. Consoleda herhangi bir hata varmı?
|
Slothere
Nereden: Turkey Izmir |
#276059
2008-01-29 03:41 GMT
Yayınlayanlar utansın ne diyelim...
|
mesut2000
Nereden: Turkey izmir |
#276064
2008-01-29 03:48 GMT
valla nette çok yerde var erador scp pak benle alakalı bişey deil hatta bi cok server pack da var erador diye scp packların içinde neyse consol bi hata vermiyor arkadaş eksigi biliyo ama sölemiyo nedense anlamadım illa tüm scp lerin çinde ara diyo neyse saolsun genede
|
Xantier
Nereden: Turkey İzmir |
#276065
2008-01-29 03:50 GMT
C:\sphere\ dizininde STAFFLOG.txt diye bi dosya yaratmayı denedin mi hiç ?
Ultima Online'da Role Play'ı canlandırmak adına... yakında geliyorum. Eski Erador'da unutulmaz Capture the flag sahnesi. http://img122.imageshack.us/img122/5013/er1sp4.jpg |
mesut2000
Nereden: Turkey izmir |
STAFFLOG.txt ve STAFFADD.txt oluşturdum zaten okadarını anladım sphere.ini dende OptionFlags=080 açtım ama çalışmadı işte
|












