CLEO Help Can someone add key activation to this script?

CLEO related
Status
Not open for further replies.

niggaz

New member
Joined
May 21, 2013
Messages
2
Reaction score
0
Make activation/deactivation on F3. Also if you could add text or bell sound when it activates/deactivates to this I would be grateful.



// This file was decompiled using sascm.ini published by GTAG ( http://gtag.gtagaming.com/opcode-database ) on 14.6.2013

{$VERSION 3.1.1000}
{$CLEO .cs}

//-------------MAIN---------------
wait 0

:NONAME_4
wait 0
if
not Actor.Stopped($PLAYER_ACTOR)
else_jump @NONAME_4
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
wait 50
Actor.SetImmunities($PLAYER_ACTOR, 1, 0, 0, 0, 0)
wait 300
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
wait 150
jump @NONAME_4
 

Monstercat

Well-known member
Joined
Feb 26, 2013
Messages
281
Reaction score
6
Here... Code by Capslockbomber

Code:
{$CLEO .cs}

//-------------MAIN---------------
wait 3000 
0@ = 304498 

:CB3R_15
thread 'CB3R' 
wait 0 
if 
0AB0:   key_pressed 114 
else_jump @CB3R_15 
018C: play_sound 1057 at 0.0 0.0 0.0 
00BC: show_text_highpriority GXT 'CHEAT1' time 1000 flag 1  // Cheat activated

:CB3R_81
wait 0 
if 
   not Actor.Stopped($PLAYER_ACTOR)
else_jump @CB3R_81 
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
wait 50 
Actor.SetImmunities($PLAYER_ACTOR, 1, 0, 0, 0, 0)
wait 300 
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
wait 150 
jump @CB3R_81 
wait 200 

:CB3R2
thread 'CB3R2' 
wait 0 
if 
0AB0:   key_pressed 114 
else_jump @CB3R2 
018C: play_sound 1058 at 0.0 0.0 0.0 
00BC: show_text_highpriority GXT 'CHEAT8' time 1000 flag 1  // Cheat deactivated
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
wait 2500 
jump @CB3R_15
 

Opcode.eXe

Expert
Joined
Feb 18, 2013
Messages
1,492
Reaction score
236
Location
( ͡° ͜ʖ ͡°)
Here on/off by my template script XD

Code:
{$CLEO .cs}
THREAD "THREAD_BY_OPCODEXE"
0662: NOP "www.youtube.com/OpcodeXe" 
0662: NOP ""

:LOAD
wait 0
if
Player.Defined(0)
jf @LOAD


:START
wait 0
if  
0ADC:   test_cheat "lag"
jf @MAIN
if
31@ == 0 // ITS OFF
then
31@ = 1 // ENABLE IT
018C: play_sound 1083 at 0.0 0.0 0.0
0ACD: show_text_highpriority " ON" time 1337
else
31@ = 0 // TURN IT OFF
018C: play_sound 1084 at 0.0 0.0 0.0      
0ACD: show_text_highpriority " OFF" time 1337
end

:MAIN
if
31@ == 1 // on
jf @START
if 
not Actor.Stopped($PLAYER_ACTOR)
else_jump @START
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
wait 50 
Actor.SetImmunities($PLAYER_ACTOR, 1, 0, 0, 0, 0)
wait 300 
Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)
wait 150 
jump @START
 
Status
Not open for further replies.
Top