Threaded Mode | Linear Mode

Russian · 11-27-2012 07:56 PM

What is wrong in this script?

Code:

27:(Sphere types.scp,3462)Agrus 01cb938 : Metal chest brass 04011e096

27:ERROR:(Sphere types.scp,3463)Can't resolve <TOPOBJ.ISMYPET>

27:ERROR:(Sphere types.scp,3463)Undefined symbol ''

27:(Sphere types.scp,3462)Agrus 01cb938 : Metal chest brass 04011e096

27:ERROR:(Sphere types.scp,3463)Can't resolve <TOPOBJ.ISMYPET>

27:ERROR:(Sphere types.scp,3463)Undefined symbol ''

Script:

Code:

[TYPEDEF T_VENDOR_SELL]

ON=@CLICK

SERV.LOG <SRC.NAME> <SRC.UID> : <TOPOBJ.NAME> <TOPOBJ.UID>

IF !(<TOPOBJ.ISMYPET>)

  IF (<ISNUM <TAG0.PRICE>>)

    SRC.SYSMESSAGE @,,1 Чтобы приобрести это, скажите "Купить".

  ENDIF

ENDIF

ON=@DCLICK

IF (<TYPE>==t_container)

    IF !(<ISNUM <TAG0.PRICE>>) && !(<TOPOBJ.ISMYPET>)

    SRC.SYSMESSAGE @,,1 Предмет не для продажи, потому Вы не сможете заглянуть внутрь.

    ELSE

    OPEN

    ENDIF

    RETURN 1

ENDIF

Skul · 11-28-2012 10:49 AM

ismypet can only be called off a character object, looks like topobj is an item, why not look if ischar first? that'll prevent the error.

Code:

if (<topobj.ischar>)

  if (<topobj.ismypet>)

    //code

  endif

endif

Russian · 11-28-2012 03:13 PM

If I am understand you:

Code:

[TYPEDEF T_VENDOR_SELL]

ON=@CLICK

SERV.LOG <SRC.NAME> <SRC.UID> : <TOPOBJ.NAME> <TOPOBJ.UID>

IF (<TOPOBJ.ISCHAR>)

    IF !(<TOPOBJ.ISMYPET>)

      IF (<ISNUM <TAG0.PRICE>>)

        SRC.SYSMESSAGE @,,1 Чтобы приобрести это, скажите "Купить".

      ENDIF

    ENDIF

ENDIF

ON=@DCLICK

IF (<TYPE>==T_CONTAINER)

    IF !(<ISNUM <TAG0.PRICE>>)

        IF (<TOPOBJ.ISCHAR>)

            IF !(<TOPOBJ.ISMYPET>)

            SRC.SYSMESSAGE @,,1 Предмет не для продажи, потому Вы не сможете заглянуть внутрь.

            ELSE

            OPEN

            ENDIF

        ENDIF

    RETURN 1

    ENDIF

ENDIF

Skul · 11-30-2012 05:33 PM

Yes...

Threaded Mode \| Linear Mode Little error
Author	Message