Advertisement
xXx2o1o

Untitled

Dec 16th, 2017
138
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pascal 2.42 KB | None | 0 0
  1. {$CLEO}
  2. 0AC6: 0@ = label @Buffer offset
  3. 0BE3: raknet setup_incoming_rpc_hook @iRPC
  4.  
  5. WHILE 0AFA: NOT SAMP_Loaded
  6.     0001: 0
  7. END
  8.  
  9. WHILE TRUE
  10.     0001: 0
  11.     IF 0AB0:   key_pressed {Shift}0x10
  12.     THEN
  13.         IF 0C89:  key_just_pressed {Z}0x5A
  14.         THEN 0AD1: show_formatted_text_highpriority "Total:~G~ %d$~S~" time 800 | {Money}8@ |
  15.         END
  16.        
  17.         IF 0C89:  key_just_pressed {X}0x58
  18.         THEN
  19.             0006: 8@ = 0
  20.             0ACD: "Money RESET!" time 800
  21.         END
  22.     END
  23. END
  24.  
  25. :iRPC
  26. 0BE5: raknet 1@ = get_hook_param {PacketID}1
  27. IF 0039:   1@ == {RPC_SCRCLIENTMESSAGE}93
  28. THEN
  29.     0BE5: raknet 1@ = get_hook_param {BitStream}0
  30.     0BF2: raknet 2@ = bit_stream 1@ get_read_offset
  31.     0BE9: raknet bit_stream 1@ reset_read_pointer
  32.    
  33.     0BE7: raknet {Color}3@ = bit_stream_read 1@ type {BS_TYPE_INT}3
  34.     0BE7: raknet {strLen}4@ = bit_stream_read 1@ type {BS_TYPE_INT}3
  35.     0BE8: raknet bit_stream 1@ read_array 0@ size 4@
  36.     0C0F: array 0@ element 4@ = {NULL}0x0
  37.    
  38.     IF 0C29: 31@ = stristr string1 0@ string2 "Вы заработали"
  39.     THEN 0AA7: call_function {sscanf}0x008220AD num_params 4 pop 4 | {Добавлено}5@v {Заработали}6@v {What2Scan}"%d вирт, из которых %d" {String2Scan}0@ | {TotalValues}7@ |
  40.         IF 0039:   7@ == {TotalValues}2
  41.         THEN
  42.             005A: 8@ += 6@
  43.             0AD1: show_formatted_text_highpriority "Total:~G~ %d$~S~" time 800 | {Money}8@ |
  44.         END
  45.     END
  46.    
  47.     0BED: raknet bit_stream 1@ set_read_offset 2@        
  48. END
  49. 0BE0: raknet hook_ret TRUE
  50.  
  51. :Buffer // 512 + 1
  52. HEX
  53.     00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
  54.     00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
  55.     00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
  56.     00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
  57.     00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
  58.     00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
  59.     00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
  60.     00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00
  61. END
  62.  
  63. // By DarkP1xel
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement