CLEO Help dialog

CLEO related
Status
Not open for further replies.
jasonbigcock03

jasonbigcock03

Active member
Joined
Jul 8, 2017
Messages
37
Reaction score
0
Code: 
{$CLEO .cs}
0000:NOP
 
REPEAT
wait 100
UNTIL 0AFA:

0B34: "tpp" @TPPD

WHILE TRUE
wait 0
END

WHILE TRUE
wait 0
IF 0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
THEN
IF 2@ == 1
THEN
CALL @TPP
END


END

:TPPD
0AC6: 1@ = label @DIALOG offset
0B3B: samp show_dialog id 1000 caption "TP" text 1@ button_1 "OK" button_2 "CANCEL" style 2
SAMP.CmdRet()

:DIALOG
HEX
"{FF7C00}1) {FFFFFF}PIZZA STACKS" A
"{FF7C00}2) {FFFFFF}LSPD" 0
END

:TPP
wait 0
IF
Not Actor.Driving($PLAYER_ACTOR)
THEN
SAMP.Spawn
wait 50
0972: $PLAYER_ACTOR -1872.6539 -1686.1276 22.1866
END
help me to fix this. when i click ok it dont call @tpp.
 
Sort by date Sort by votes
0

0B36

Expert
Joined
Jan 6, 2014
Messages
1,324
Reaction score
8
Code: 
{$CLEO}

THREAD "BLABLA"

REPEAT
WAIT 0
UNTIL 0AFA:

0B34: "tpp" @TPPD

WHILE TRUE
WAIT 0
        IF 
            0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
        THEN
            IF 
                2@ == 1
            THEN
                CALL @TPP 0
            END
        END
END

:TPPD
0AC6: 1@ = label @DIALOG offset
0B3B: samp show_dialog id 1000 caption "TP" text 1@ button_1 "OK" button_2 "CANCEL" style 2
SAMP.CmdRet()

:DIALOG
HEX
"{FF7C00}1) {FFFFFF}PIZZA STACKS" A
"{FF7C00}2) {FFFFFF}LSPD" 0
END

:TPP
WAIT 0
IF
    NOT Actor.Driving($PLAYER_ACTOR)
THEN
    SAMP.Spawn
    WAIT 50
    0972: $PLAYER_ACTOR -1872.6539 -1686.1276 22.1866
END
RET 0
 
Upvote 0 Downvote
jasonbigcock03

jasonbigcock03

Active member
Joined
Jul 8, 2017
Messages
37
Reaction score
0
0B36 said:
Code: 
{$CLEO}

THREAD "BLABLA"

REPEAT
WAIT 0
UNTIL 0AFA:

0B34: "tpp" @TPPD

WHILE TRUE
WAIT 0
        IF 
            0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
        THEN
            IF 
                2@ == 1
            THEN
                CALL @TPP 0
            END
        END
END

:TPPD
0AC6: 1@ = label @DIALOG offset
0B3B: samp show_dialog id 1000 caption "TP" text 1@ button_1 "OK" button_2 "CANCEL" style 2
SAMP.CmdRet()

:DIALOG
HEX
"{FF7C00}1) {FFFFFF}PIZZA STACKS" A
"{FF7C00}2) {FFFFFF}LSPD" 0
END

:TPP
WAIT 0
IF
    NOT Actor.Driving($PLAYER_ACTOR)
THEN
    SAMP.Spawn
    WAIT 50
    0972: $PLAYER_ACTOR -1872.6539 -1686.1276 22.1866
END
RET 0
Click to expand...
works perfectly ty but how can i make a shit ex if i click on pizza stacks call @pizza if i click lspd call @lspd
 
Upvote 0 Downvote
jasonbigcock03

jasonbigcock03

Active member
Joined
Jul 8, 2017
Messages
37
Reaction score
0
0B36 said:
Make a check for list item which you got in 3@
Click to expand...

i tried it before but sadly it crashes my game.   
Code: 
{$CLEO}

THREAD "TPP31"

REPEAT
WAIT 0
UNTIL 0AFA:

0B34: "tpp" @TPPD

WHILE TRUE
WAIT 0
        IF 
            0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
        THEN
             IF AND
                2@ == 1
                3@ == 1
            THEN
                CALL @PIZZA 0
                END
                
             IF
             0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
             THEN
              IF AND
              2@ == 1
              3@ == 2
              THEN
              CALL @LSPD 0
            END
        END
    END


:TPPD
0AC6: 1@ = label @DIALOG offset
0B3B: samp show_dialog id 1000 caption "TP" text 1@ button_1 "OK" button_2 "CANCEL" style 2
SAMP.CmdRet()

:DIALOG
HEX
"{FF7C00}1) {FFFFFF}PIZZA STACKS" A
"{FF7C00}2) {FFFFFF}LSPD" 0
END

:PIZZA
WAIT 0
IF
    NOT Actor.Driving($PLAYER_ACTOR)
THEN
    SAMP.Spawn
    WAIT 300
    0972: $PLAYER_ACTOR -1872.6539 -1686.1276 22.1866
END
RET 0

:LSPD
WAIT 0
IF
    NOT Actor.Driving($PLAYER_ACTOR)
THEN
    SAMP.Spawn
    WAIT 300
    0972: $PLAYER_ACTOR 135.733 -749.216 258.152 
END
RET 0
 
Upvote 0 Downvote
B

bladero

Active member
Joined
Jan 3, 2017
Messages
73
Reaction score
0
It crashes your game because you need to put :
Code: 
WHILE TRUE
WAIT 0
END

After 0B34:
So it will look like this: 
Code: 
{$CLEO}

0000:NOP

REPEAT
WAIT 0
UNTIL 0AFA:

0B34: "tpp" @TPPD

WHILE TRUE
WAIT 0
END
 
Upvote 0 Downvote
Parazitas

Parazitas

God
Joined
Jan 2, 2017
Messages
3,116
Solutions
5
Reaction score
882
Location
Lithuania
jasonbigcock03 said:
0B36 said:
Make a check for list item which you got in 3@
Click to expand...

i tried it before but sadly it crashes my game.   
Code: 
{$CLEO}

THREAD "TPP31"

REPEAT
WAIT 0
UNTIL 0AFA:

0B34: "tpp" @TPPD

WHILE TRUE
WAIT 0
        IF 
            0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
        THEN
             IF AND
                2@ == 1
                3@ == 1
            THEN
                CALL @PIZZA 0
                END
                
             IF
             0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
             THEN
              IF AND
              2@ == 1
              3@ == 2
              THEN
              CALL @LSPD 0
            END
        END
    END


:TPPD
0AC6: 1@ = label @DIALOG offset
0B3B: samp show_dialog id 1000 caption "TP" text 1@ button_1 "OK" button_2 "CANCEL" style 2
SAMP.CmdRet()

:DIALOG
HEX
"{FF7C00}1) {FFFFFF}PIZZA STACKS" A
"{FF7C00}2) {FFFFFF}LSPD" 0
END

:PIZZA
WAIT 0
IF
    NOT Actor.Driving($PLAYER_ACTOR)
THEN
    SAMP.Spawn
    WAIT 300
    0972: $PLAYER_ACTOR -1872.6539 -1686.1276 22.1866
END
RET 0

:LSPD
WAIT 0
IF
    NOT Actor.Driving($PLAYER_ACTOR)
THEN
    SAMP.Spawn
    WAIT 300
    0972: $PLAYER_ACTOR 135.733 -749.216 258.152 
END
RET 0
Click to expand...

Hi, it's very simple...

PHP: 
{$CLEO .cs}

0000: NOP
 
 
REPEAT
    WAIT 0
UNTIL 0AFA:  SAMP_IS_READY 

WHILE TRUE
WAIT 0

IF
0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
THEN

    IF AND
    2@ == 1
    3@ == 1
    THEN
        CALL @PIZZA 0
    END
               
    IF AND
    2@ == 1
    3@ == 2
    THEN
        CALL @LSPD 0
    END

END /// END 0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
    
END /// END WHILE TRUE


:TPPD
0AC6: 1@ = label @DIALOG offset
0B3B: samp show_dialog id 1000 caption "TP" text 1@ button_1 "OK" button_2 "CANCEL" style 2
SAMP.CmdRet()

:DIALOG
HEX
"{FF7C00}1) {FFFFFF}PIZZA STACKS" A
"{FF7C00}2) {FFFFFF}LSPD" 0
END

:PIZZA
WAIT 0
IF
NOT Actor.Driving($PLAYER_ACTOR)
THEN
   SAMP.Spawn
   WAIT 300
   0972: $PLAYER_ACTOR -1872.6539 -1686.1276 22.1866
END
RET 0

:LSPD
WAIT 0
IF
NOT Actor.Driving($PLAYER_ACTOR)
THEN
   SAMP.Spawn
   WAIT 300
   0972: $PLAYER_ACTOR 135.733 -749.216 258.152
END
RET 0
 
Upvote 0 Downvote
jasonbigcock03

jasonbigcock03

Active member
Joined
Jul 8, 2017
Messages
37
Reaction score
0
Parazitas said:
jasonbigcock03 said:
0B36 said:
Make a check for list item which you got in 3@
Click to expand...

i tried it before but sadly it crashes my game.   
Code: 
{$CLEO}

THREAD "TPP31"

REPEAT
WAIT 0
UNTIL 0AFA:

0B34: "tpp" @TPPD

WHILE TRUE
WAIT 0
        IF 
            0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
        THEN
             IF AND
                2@ == 1
                3@ == 1
            THEN
                CALL @PIZZA 0
                END
                
             IF
             0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
             THEN
              IF AND
              2@ == 1
              3@ == 2
              THEN
              CALL @LSPD 0
            END
        END
    END


:TPPD
0AC6: 1@ = label @DIALOG offset
0B3B: samp show_dialog id 1000 caption "TP" text 1@ button_1 "OK" button_2 "CANCEL" style 2
SAMP.CmdRet()

:DIALOG
HEX
"{FF7C00}1) {FFFFFF}PIZZA STACKS" A
"{FF7C00}2) {FFFFFF}LSPD" 0
END

:PIZZA
WAIT 0
IF
    NOT Actor.Driving($PLAYER_ACTOR)
THEN
    SAMP.Spawn
    WAIT 300
    0972: $PLAYER_ACTOR -1872.6539 -1686.1276 22.1866
END
RET 0

:LSPD
WAIT 0
IF
    NOT Actor.Driving($PLAYER_ACTOR)
THEN
    SAMP.Spawn
    WAIT 300
    0972: $PLAYER_ACTOR 135.733 -749.216 258.152 
END
RET 0
Click to expand...

Hi, it's very simple...

PHP: 
{$CLEO .cs}

0000: NOP
 
 
REPEAT
    WAIT 0
UNTIL 0AFA:  SAMP_IS_READY 

WHILE TRUE
WAIT 0

IF
0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
THEN

    IF AND
    2@ == 1
    3@ == 1
    THEN
        CALL @PIZZA 0
    END
               
    IF AND
    2@ == 1
    3@ == 2
    THEN
        CALL @LSPD 0
    END

END /// END 0B3C: samp is_dialog_responded id 1000 button 2@ list_item 3@ input_text 0
    
END /// END WHILE TRUE


:TPPD
0AC6: 1@ = label @DIALOG offset
0B3B: samp show_dialog id 1000 caption "TP" text 1@ button_1 "OK" button_2 "CANCEL" style 2
SAMP.CmdRet()

:DIALOG
HEX
"{FF7C00}1) {FFFFFF}PIZZA STACKS" A
"{FF7C00}2) {FFFFFF}LSPD" 0
END

:PIZZA
WAIT 0
IF
NOT Actor.Driving($PLAYER_ACTOR)
THEN
   SAMP.Spawn
   WAIT 300
   0972: $PLAYER_ACTOR -1872.6539 -1686.1276 22.1866
END
RET 0

:LSPD
WAIT 0
IF
NOT Actor.Driving($PLAYER_ACTOR)
THEN
   SAMP.Spawn
   WAIT 300
   0972: $PLAYER_ACTOR 135.733 -749.216 258.152
END
RET 0
Click to expand...

nvm
 
Upvote 0 Downvote
Status
Not open for further replies.
Top