(Pawn) (Ainda não terminei) Global Goto's

#include <a_samp>

#define MAX_GOTO 1000

stock const oncallback [ MAX_GOTO ] ;

#define goto<%0> \
                global_step(#%0)

#define glabel:%1<%0> \
                globalLabel(#%1,%0)

#pragma dynamic 65335

bruno2(); public bruno2() {

        goto<volver>;
        return 1;

}

bruno(a[]); public bruno(a[]) {

        print("1");

        glabel:bruno<"volver">;

        print("2");

        print("3");

        print("4");
        print("5");
}


main()
{

    SetTimer("bruno", 1000, false);
    SetTimer("bruno2", 2000, false);
}


stock globalLabel(publica[], name[]) {

    static bah, beh, pIndex;

    pIndex = funcidx(publica);

    #emit LCTRL       1
    #emit NEG
    #emit ADD.C       32
    #emit STOR.pri  bah
    #emit LREF.alt  bah

    #emit LCTRL 1
    #emit NEG
    #emit ADD
    #emit LOAD.alt  pIndex
    #emit SHL.C.alt   3
    #emit ADD
    #emit STOR.pri  bah
    #emit LREF.pri  bah
    #emit STOR.pri  bah

    #emit LCTRL       6
    #emit STOR.PRI  beh

    setproperty(.id = 0, .name = name, .value = bah);
    setproperty(.id = 1, .name = name, .value = beh);

    return true;
}

stock global_step(label[])
{
    new bah = getproperty(0,label);
    new beh = getproperty(1,label);

    #emit LCTRL      6
    #emit PUSH.C 0
    #emit LOAD.S.pri bah
    #emit SCTRL      6

    return true;

}