CLEO Help autoscroll (togglable on/off)

CLEO related
Status
Not open for further replies.

Mr.Rider

Active member
Joined
Dec 13, 2014
Messages
129
Reaction score
0
how to make the autoscroll togglable on/off ?  :imoverit:

i tried to add this
Code:
wait 0 
if and
   Player.Defined($PLAYER_CHAR)
0ADC:   test_cheat "scroll"

to the beggining and the end of the thread

so when i type "scroll" as a cheat the cleo switches on , but nothing happens ? and the cleo has been already on and i cant toggle it off,


help ? :somuchwin:



i was dming in owserver , and booom banned reason auto scroll ?? probably he saw me auto scrolling he minigun  :angry:
 

Spix

Well-known member
Joined
Sep 23, 2013
Messages
353
Reaction score
1
Mr.Rider link said:
how to make the autoscroll togglable on/off ?  :imoverit:

i tried to add this
Code:
wait 0 
if and
   Player.Defined($PLAYER_CHAR)
0ADC:   test_cheat "scroll"

to the beggining and the end of the thread

so when i type "scroll" as a cheat the cleo switches on , but nothing happens ? and the cleo has been already on and i cant toggle it off,


help ? :somuchwin:






:Thread
wait 0
if and
Player.Defined($PLAYER_CHAR)
0ADC:  test_cheat "scroll"
Else_Jump @Thread

?
 

Mr.Rider

Active member
Joined
Dec 13, 2014
Messages
129
Reaction score
0
SpexxTr0n link said:
:Thread
wait 0
if and
Player.Defined($PLAYER_CHAR)
0ADC:  test_cheat "scroll"
Else_Jump @Thread

?
i added them in the beggining and the end of the script , when i type scroll nothing happens , the cleo is already  on whithout even typing scroll  :angry:
 
Joined
Feb 18, 2005
Messages
2,963
Reaction score
267
You sure you added that okay?
It won't work only if you paste something at the begining and at the end.

Post your code here.
 

Mr.Rider

Active member
Joined
Dec 13, 2014
Messages
129
Reaction score
0
The original autoscroll :
Code:
{$CLEO}
 
wait 0
 
repeat
    wait 0
until Player.Defined(0)
 
while true
    wait 0
    if and
        not Actor.Driving($PLAYER_ACTOR)
        8818: not actor $PLAYER_ACTOR in_air
        0AB0: 2 // RBM
    then
        if 0AB0: 2
        then
            while 0AB0: 2
                wait 0
            end
 
            1@ = 0
 
            /* 1@ = -1
            for 0@ = 22 to 32 step 1 // List guns
                if or
                    1@ == 25
                    1@ == 26
                    1@ == 27
                then continue
                end
         
                if 02D8: actor $PLAYER_ACTOR current_weapon == 0@
                then
                    1@ = 0
                    break
                end
            end */
 
            if 1@ <> -1
            then
                0470: 0@ = actor $PLAYER_ACTOR current_weapon
                while true
                    wait 0
                    01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0
                    0470: 1@ = actor $PLAYER_ACTOR current_weapon
                    if or
                        1@ == 0
                        1@ == 1
                    then break
                    end 
                end
         
                01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0@
            end
        end
    end
end

after adding on/off key

Code:
{$CLEO}
 
wait 0
 
repeat
    wait 0
until Player.Defined(0)
 
wait 0 
if and
   Player.Defined($PLAYER_CHAR)
0ADC:   test_cheat "scroll"
while true
    wait 0
    if and
        not Actor.Driving($PLAYER_ACTOR)
        8818: not actor $PLAYER_ACTOR in_air
        0AB0: 2 // RBM
    then
        if 0AB0: 2
        then
            while 0AB0: 2
                wait 0
            end
 
            1@ = 0
 
            /* 1@ = -1
            for 0@ = 22 to 32 step 1 // List guns
                if or
                    1@ == 25
                    1@ == 26
                    1@ == 27
                then continue
                end
         
                if 02D8: actor $PLAYER_ACTOR current_weapon == 0@
                then
                    1@ = 0
                    break
                end
            end */
 
            if 1@ <> -1
            then
                0470: 0@ = actor $PLAYER_ACTOR current_weapon
                while true
                    wait 0
                    01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0
                    0470: 1@ = actor $PLAYER_ACTOR current_weapon
                    if or
                        1@ == 0
                        1@ == 1
                    then break
                    end 
                end
         
                01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0@
wait 0 
if and
   Player.Defined($PLAYER_CHAR)
0ADC:   test_cheat "scroll"           
end
        end
    end
end
 
Joined
Feb 18, 2005
Messages
2,963
Reaction score
267
You didn't add an on/off key, you just copied some text somewhere random.

Code:
{$CLEO}
 
wait 0
 
repeat
    wait 0
until Player.Defined(0)
 
while true
    wait 0
    IF 0ADC: "scroll"
    THEN 
        0B12: 31@ = 31@ XOR 1
        IF 31@ == 1
        THEN 0AD1: "scroll on" 1000
        ELSE 0AD1: "scroll off" 1000
        END
    END
    
    if and
        not Actor.Driving($PLAYER_ACTOR)
        8818: not actor $PLAYER_ACTOR in_air
        0AB0: 2 // RBM
        31@ == 1
    then
        if 0AB0: 2
        then
            while 0AB0: 2
                wait 0
            end 
            1@ = 0 
            if 1@ <> -1
            then
                0470: 0@ = actor $PLAYER_ACTOR current_weapon
                while true
                    wait 0
                    01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0
                    0470: 1@ = actor $PLAYER_ACTOR current_weapon
                    if or
                        1@ == 0
                        1@ == 1
                    then break
                    end 
                end        
                01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0@
            end
        end
    end    
end
 

Mr.Rider

Active member
Joined
Dec 13, 2014
Messages
129
Reaction score
0
springfield link said:
You didn't add an on/off key, you just copied some text somewhere random.

Code:
{$CLEO}
 
wait 0
 
repeat
    wait 0
until Player.Defined(0)
 
while true
    wait 0
    IF 0ADC: "scroll"
    THEN 
        0B12: 31@ = 31@ XOR 1
        IF 31@ == 1
        THEN 0AD1: "scroll on" 1000
        ELSE 0AD1: "scroll off" 1000
        END
    END
    
    if and
        not Actor.Driving($PLAYER_ACTOR)
        8818: not actor $PLAYER_ACTOR in_air
        0AB0: 2 // RBM
        31@ == 1
    then
        if 0AB0: 2
        then
            while 0AB0: 2
                wait 0
            end 
            1@ = 0 
            if 1@ <> -1
            then
                0470: 0@ = actor $PLAYER_ACTOR current_weapon
                while true
                    wait 0
                    01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0
                    0470: 1@ = actor $PLAYER_ACTOR current_weapon
                    if or
                        1@ == 0
                        1@ == 1
                    then break
                    end 
                end        
                01B9: set_actor $PLAYER_ACTOR armed_weapon_to 0@
            end
        end
    end    
end
you know how i did exactly ?
i searched for a hack that can be toggled on/off by a written cheat, i found no reload ,
but i didnt know where should i put it  :somuchwin:
 
Status
Not open for further replies.
Top