Threaded Mode | Linear Mode

Avatar · 03-08-2014 06:24 AM

House Speech Part :

Code:

ON=I ban thee

if !<src.region.tag.koyburasi>

if !<src.ctag.i_ban_thee>

    if (<src.flags>&statf_dead)

        src.sys_error Ölü iken kullanamazsiniz.

        return 1

    endif

    if !(<DEF.scp.House_BanEngine>)

        return 0

    endif

    REF1=<UID.<SRC.REGION.UID>.MORE2>

    if (<REF1.HousePlayerAccess <SRC>> >= 2)

        TARGETF f_house_banish <REF1>

        SRC.SYSMESSAGE @,,1 Lutfen evden kovmak istediginiz kisiyi seciniz.

    endif

    src.ctag.i_ban_thee 1

    src.timerf 5, src.ctag.i_ban_thee

else

    src.sys_error 10 saniyede bir evden atabilirsiniz.

    return 1

endif

endif

My house system is from CloudBr script pack, it is like mordounts. Therefore, I said so.

Ban Function

Code:

[FUNCTION f_house_banish]

if (strmatch(*Brit_Genel_1*,<region.name>))

    src.sys_error Yeni Mahalle Bölgesinde bunu yapamazsınız.

    return 1

endif

REF1=<ARGS> //<UID.<SRC.REGION.UID>.MORE2>

IF (<ARGO.ISITEM>)

 SRC.SYSMESSAGE @,,1 Bunu atamassiniz.

 return 1

//ELIF (<REF1.TAG0.Access.Total.-1> >= <DEF.MAX_HOUSE_BANS>)

// SRC.SYSMESSAGE @,,1 The ban limit for this house has been reached!

// return 1

ELIF (<ARGO.UID>==<SRC>)

 SRC.SYSMESSAGE @,,1 Kendinizi atamassiniz!

 return 1

//ELIF (<REF1.IsBanned <ARGO.UID>>)

// SRC.SYSMESSAGE @,,1 <ARGO.NAME> is already banned from this house!

// return 1

ELIF (<ARGO.IsHouseVendor>)

 SRC.SYSMESSAGE @,,1 Ev vendorunu atamassiniz!

 return 1

ELIF (<REF1.IsOwner <ARGO.UID>>)

 SRC.SYSMESSAGE @,,1 Evin sahibini atamassiniz!

 return 1

ELIF (<REF1.IsCoOwner <ARGO.UID>>)

 SRC.SYSMESSAGE @,,1 Evin ortaklarini atamassiniz!

 return 1

ELIF (<REF1.IsFriend <ARGO.UID>>)

 SRC.SYSMESSAGE @,,1 Evin dostlarini atamassiniz!

 return 1

ELIF (<ARGO.REGION.UID> != <REF1.REGION.UID>)

 SRC.SYSMESSAGE @,,1 Evinizde olmayan bir kisiyi evinizden nasil ata bilirsiniz ?

 return 1

ENDIF

//REF1.HouseAddAccess <ARGO.UID>,-1

ARGO.GO <REF1.P>

ARGO.MOVE S

ARGO.FIX

SRC.SYSMESSAGE @,,1 <ARGO.NAME> evden atildi.

ARGO.SYSMESSAGE @,,1 Evden atildiniz.

What about the guild message problem ?

Code:

[FUNCTION Guild_SendMessage]

IF (<TYPE> != t_stone_guild) || (<isempty <ARGS>>)

 return 0

ENDIF

AllMembers -1,SYSMESSAGE @,,1 Guild Message: <ARGS>

Threaded Mode \| Linear Mode DEBUGS ( BIG PROBLEM) 56c
Author	Message