Threaded Mode | Linear Mode

Jhobean · 03-22-2020 04:41 AM

For closing, you must put 0,0,0 coord

SRC.ARROWQUEST 0, 0, 0

You can try my compass

You will need the gump

Code:

[DIALOG d_boussole]

0,0

page 0

gumppic 60 0 5012 //Boussole

dtext 160 245 165 Saisir la

dtext 105 260 165 coordonnées de la destination

dtext 130 280 165 X

dtextentry 150 280 200 20 332 0 <SRC.dtag0.boussolex>

dtext 200 280 165 Y

dtextentry 220 280 200 20 332 1 <SRC.dtag0.boussoley>

button 155 305 1149 1148 1 0 1 //OK

[DIALOG d_boussole button]

ON=0 //fernenture du dialog

SRC.ARROWQUEST 0, 0, 0 //ferme la fleche

ON=1 //actualisation de la flècehs

SRC.tag.boussolex=<ARGTXT[0]>

SRC.tag.boussoley=<ARGTXT[1]>

IF <ISNUM <ARGTXT[0]>>

    IF <ISNUM <ARGTXT[1]>>

        SRC.ARROWQUEST <SRC.dtag0.boussolex>, <SRC.dtag0.boussoley>, 1

    ELSE

    Src.sysmessage @60 Seul les nombres sont acceptes.

    ENDIF

ELSE

Src.sysmessage @60 Seul les nombres sont acceptes.

ENDIF

DIALOG d_boussole

Threaded Mode \| Linear Mode ArrowQuest it does not close
Author	Message