{$CLEO}
0000:
WHILE TRUE
WAIT 0
IF 0AB0: is_key_pressed 107 {Numpad+}
THEN
0B12: 31@ = 31@ XOR 1
IF 0039: 31@ == TRUE
THEN 0AD1: show_formatted_text_highpriority "~w~Sprint Bind ~g~Enable" time 1337
ELSE
0AB1: @Set_Virtual_Key 2 KeyOffSet 0x107 state 0 {Up Arrow false}
0AB1: @Set_Virtual_Key 2 KeyOffSet 0x20 state 0 {Space false}
0AD1: show_formatted_text_highpriority "~w~Sprint Bind ~r~Disable" time 137
END
WAIT 137
END
IF 31@ == TRUE
THEN
IF 0256: player $PLAYER_CHAR defined
THEN
IF 80DF: actor $PLAYER_ACTOR no driving
THEN
0AB1: @Set_Virtual_Key 2 KeyOffSet 0x107 state 255 {Up Arrow true}
0AB1: @Set_Virtual_Key 2 KeyOffSet 0x20 state 255 {Space true}
END
END
END
END
:Set_Virtual_Key
{
255 = true
0 = false
0AB1: @Set_Virtual_Key 2 KeyOffSet 0x57 state 255
}
2@ = 0xB72CC8
0@ *= 2
005A: 2@ += 0@ // (int)
0A8C: write_memory 2@ size 1 value 1@ virtual_protect 0
0AB2: ret 0