[CLEO:SRC] rage mod (ted sprague like)

[ititit]

 

{$CLEO .cs}//-------------MAIN---------------thread 'RAGEMODECHEAT' :RAGEMODECHEATwait 500 0A8D: [email protected] = read_memory 0x00969110 size 4 virtual_protect 0 if and04A4:   [email protected] == 0x52414745 // rage   Player.Defined($PLAYER_CHAR)jf @RAGEMODECHEAT0A8C: write_memory 0x00969110 size 4 value 0 virtual_protect 0 jump @RAGEMODELOOP:RAGEMODECHEATretActor.Health($PLAYER_ACTOR) = 250Actor.Armour($PLAYER_ACTOR) = 0Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)04D8: set_actor $PLAYER_ACTOR drowns_in_water 1 Player.InfiniteRun($PLAYER_CHAR) = Falsejump @RAGEMODECHEAT:RAGEMODELOOPif   Player.Defined($PLAYER_CHAR)jf @RAGEMODECHEATret Actor.Health($PLAYER_ACTOR) = 2500000Actor.Armour($PLAYER_ACTOR) = 2500000Actor.SetImmunities($PLAYER_ACTOR, 1, 1, 1, 1, 1)04D8: set_actor $PLAYER_ACTOR drowns_in_water 0 Player.InfiniteRun($PLAYER_CHAR) = TrueActor.StorePos($PLAYER_ACTOR, [email protected], [email protected], [email protected])02CF: [email protected] = create_fire_at [email protected] [email protected] [email protected] propagation 0 size 10 0565: create_soundless_explosion_at [email protected] [email protected] [email protected] type 8 wait 200 02D1: remove_fire [email protected] 0A8D: [email protected] = read_memory 0x00969110 size 4 virtual_protect 0 if and  04A4:   [email protected] == 0x52414745 // ragejf @RAGEMODELOOP 0A8C: write_memory 0x00969110 size 4 value 0 virtual_protect 0 jump @RAGEMODECHEATret

 

 

any suggestion to optimize or add features?

 

ps sorry for my crap en

Edited August 19, 2008 by ititit

[james227uk]

{$VERSION 3.1.0027}{$CLEO .cs}//-------------MAIN---------------thread 'variouscheats' :variouscheats0001: wait 500 ms 0A8D: [email protected] = read_memory 0x00969110 size 4 virtual_protect 0  if and                  04A4:   [email protected] == 0x52414745 //=rage  0256:   player $PLAYER_CHAR definedthen      0223: set_actor $PLAYER_ACTOR health_to 2500000       035F: set_actor $PLAYER_ACTOR armour_to 2500000       02AB: set_actor $PLAYER_ACTOR immunities BP 1 FP 1 EP 1 DP 1 SP 1       04D8: toggle_actor $PLAYER_ACTOR drowns_in_water 0      Player.InfiniteRun($PLAYER_CHAR) = True      0A8C: write_memory 0x00969110 size 4 value 0 virtual_protect 0      gosub @ragemodeloop       0223: set_actor $PLAYER_ACTOR health_to 250       035F: set_actor $PLAYER_ACTOR armour_to 0       02AB: set_actor $PLAYER_ACTOR immunities BP 0 FP 0 EP 0 DP 0 SP 0       04D8: toggle_actor $PLAYER_ACTOR drowns_in_water 1      Player.InfiniteRun($PLAYER_CHAR) = False      endjump @variouscheats:ragemodeloop//03E5: text_box 'CHEAT1'if NOT Player.Defined($PLAYER_CHAR)thenreturnend00A0: store_actor $PLAYER_ACTOR position_to [email protected] [email protected] [email protected]: [email protected] = create_fire_at [email protected] [email protected] [email protected] propagation 0 size 10      0223: set_actor $PLAYER_ACTOR health_to 2500000       035F: set_actor $PLAYER_ACTOR armour_to 2500000       02AB: set_actor $PLAYER_ACTOR immunities BP 1 FP 1 EP 1 DP 1 SP 1       04D8: toggle_actor $PLAYER_ACTOR drowns_in_water 0      Player.InfiniteRun($PLAYER_CHAR) = True0565: create_soundless_explosion_at [email protected] [email protected] [email protected] type 8wait 10002D1: remove_fire [email protected]: [email protected] = read_memory 0x00969110 size 4 virtual_protect 0  if and                  04A4:   [email protected] == 0x52414745 //=rage  0256:   player $PLAYER_CHAR definedthen0A8C: write_memory 0x00969110 size 4 value 0 virtual_protect 0returnendjump @ragemodeloop

 

 

any suggestion to optimize or add features?

 

ps sorry for my crap en

Use

 

 

jf @LABEL

 

 

instead of 'then'

[ititit]

you mean like this??

 

removed look in the first post

 

james do you have some nice ideas to implement?

Edited August 19, 2008 by ititit

[2pacproducer2]

you mean like this??

 

{$VERSION 3.1.0027}{$CLEO .cs}//-------------MAIN---------------thread 'VARIOUSCHEATS' :VARIOUSCHEATSwait 500 0A8D: [email protected] = read_memory 0x00969110 size 4 virtual_protect 0 if and04A4:   [email protected] == 0x52414745 // rage   Player.Defined($PLAYER_CHAR)jf @VARIOUSCHEATSActor.Health($PLAYER_ACTOR) = 2500000Actor.Armour($PLAYER_ACTOR) = 2500000Actor.SetImmunities($PLAYER_ACTOR, 1, 1, 1, 1, 1)04D8: set_actor $PLAYER_ACTOR drowns_in_water 0 Player.InfiniteRun($PLAYER_CHAR) = True0A8C: write_memory 0x00969110 size 4 value 0 virtual_protect 0 gosub @RAGELOOPActor.Health($PLAYER_ACTOR) = 250Actor.Armour($PLAYER_ACTOR) = 0Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)04D8: set_actor $PLAYER_ACTOR drowns_in_water 1 Player.InfiniteRun($PLAYER_CHAR) = Falsejump @VARIOUSCHEATS:RAGELOOPif   not Player.Defined($PLAYER_CHAR)jf @RAGELOOP_2 return :RAGELOOP_2Actor.StorePos($PLAYER_ACTOR, [email protected], [email protected], [email protected])02CF: [email protected] = create_fire_at [email protected] [email protected] [email protected] propagation 0 size 10 Actor.Health($PLAYER_ACTOR) = 2500000Actor.Armour($PLAYER_ACTOR) = 2500000Actor.SetImmunities($PLAYER_ACTOR, 1, 1, 1, 1, 1)04D8: set_actor $PLAYER_ACTOR drowns_in_water 0 Player.InfiniteRun($PLAYER_CHAR) = True0565: create_soundless_explosion_at [email protected] [email protected] [email protected] type 8 wait 100 02D1: remove_fire [email protected] 0A8D: [email protected] = read_memory 0x00969110 size 4 virtual_protect 0 if and04A4:   [email protected] == 0x52414745 // rage  Player.Defined($PLAYER_CHAR)jf @RAGELOOP_3 0A8C: write_memory 0x00969110 size 4 value 0 virtual_protect 0 return :RAGELOOP_3 jump @RAGELOOP_2

 

james do you have some nice ideas to implement?

Why you r using returns ?

[ititit]

sorry i forgot i can change it after converting then into jf @xxx and end into :xxx

 

 

removed look in the first post

 

 

ok?

Edited August 19, 2008 by ititit

[james227uk]

you mean like this??

 

{$VERSION 3.1.0027}{$CLEO .cs}//-------------MAIN---------------thread 'VARIOUSCHEATS' :VARIOUSCHEATSwait 500 0A8D: [email protected] = read_memory 0x00969110 size 4 virtual_protect 0 if and04A4:   [email protected] == 0x52414745 // rage   Player.Defined($PLAYER_CHAR)jf @VARIOUSCHEATSActor.Health($PLAYER_ACTOR) = 2500000Actor.Armour($PLAYER_ACTOR) = 2500000Actor.SetImmunities($PLAYER_ACTOR, 1, 1, 1, 1, 1)04D8: set_actor $PLAYER_ACTOR drowns_in_water 0 Player.InfiniteRun($PLAYER_CHAR) = True0A8C: write_memory 0x00969110 size 4 value 0 virtual_protect 0 gosub @RAGELOOPActor.Health($PLAYER_ACTOR) = 250Actor.Armour($PLAYER_ACTOR) = 0Actor.SetImmunities($PLAYER_ACTOR, 0, 0, 0, 0, 0)04D8: set_actor $PLAYER_ACTOR drowns_in_water 1 Player.InfiniteRun($PLAYER_CHAR) = Falsejump @VARIOUSCHEATS:RAGELOOPif   not Player.Defined($PLAYER_CHAR)jf @RAGELOOP_2 return :RAGELOOP_2Actor.StorePos($PLAYER_ACTOR, [email protected], [email protected], [email protected])02CF: [email protected] = create_fire_at [email protected] [email protected] [email protected] propagation 0 size 10 Actor.Health($PLAYER_ACTOR) = 2500000Actor.Armour($PLAYER_ACTOR) = 2500000Actor.SetImmunities($PLAYER_ACTOR, 1, 1, 1, 1, 1)04D8: set_actor $PLAYER_ACTOR drowns_in_water 0 Player.InfiniteRun($PLAYER_CHAR) = True0565: create_soundless_explosion_at [email protected] [email protected] [email protected] type 8 wait 100 02D1: remove_fire [email protected] 0A8D: [email protected] = read_memory 0x00969110 size 4 virtual_protect 0 if and04A4:   [email protected] == 0x52414745 // rage  Player.Defined($PLAYER_CHAR)jf @RAGELOOP_3 0A8C: write_memory 0x00969110 size 4 value 0 virtual_protect 0 return :RAGELOOP_3 jump @RAGELOOP_2

 

james do you have some nice ideas to implement?

Yeah, like that. jf @LABEL is the keyword for 004D, I have no ideas, sorry

[ititit]

thanks to all