CLEO Help autoscrolll

CLEO related
Status
Not open for further replies.

Dtkyss

Member
Joined
Oct 22, 2016
Messages
20
Reaction score
0
Dear guys!

Someday I found an AutoScroll, but I do not know, how can I change speed of this script.
Can anyone help me please? :\

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
 

Parazitas

God
Staff member
Joined
Jan 2, 2017
Messages
3,315
Solutions
7
Reaction score
935
Location
Lithuania
Dtkyss said:
Dtkys said:
 how can I change speed of this script.

Are you idiot? It is difficult to answer my question?


Here u go...

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
                   wait 500 //// Here autoscrolll speed now is 500 mili sec   - [ 1000ms = 1second ]
                   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
 
Status
Not open for further replies.
Top