hex
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
end
{$cleo .cs}
{$I SF}

    0000:
      
if not 32@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end

wait 4000
0AF8: samp add_message_to_chat "{1E90FF}P1cador: {FFFFFF} HZ.BY WallHack. {1E90FF}Activation: {FFFFFF}P"  color 0xFFFF00
//wait 0

:1     
if and
wait 0
0ab0: 80//Pp
jf @1   

   alloc 14@ 48
   0C11: memset destination 14@ value 0 size 48    
0B6D: render 25@ = create_font "Tahoma" height 9 flags 0x4

while true
      wait 0
      0A8D: 29@ = read_memory 0xB74490 size 4 virtual_protect 0
      000A: 29@ += 0x4
      0A8D: 29@ = read_memory 29@ size 4 virtual_protect 0
      for 30@ = 0 to 35584 step 0x100
          0A8D: 31@ = read_memory 29@ size 1 virtual_protect 0
          000A: 29@ += 0x1
          if and
              0029: 31@ >= 0x00   
              001B: 0x80 > 31@
          then   
              005A: 31@ += 30@
              if and
                  056D: actor 31@ defined
                  803C: $PLAYER_ACTOR <> 31@
              then   
                    
                   0B2B: samp 28@ = get_player_id_by_actor_handle 31@
                   0B36: samp 27@ = get_player_nickname 28@
                   21@ = SAMP.GetPlayerHealthByActorHandle(28@)
                     
                     
                   Actor.StorePos(31@, 1@, 2@, 3@)
                   if 00C2: sphere_onscreen 1@ 2@ 3@ radius 0.0
                   then
                   0B55: convert_3D_coords 1@ 2@ 3@ to_screen 4@ 5@    
                   //22@ = Samp.GetPlayerArmorByActorHandle(28@)
                      
                    if not SAMP.IsPlayerPaused(28@)                    
                    then
                    format 14@ "%s [%d] - {ff0000}%d HP" 27@ 28@ 21@    
                    else                     
                    format 14@ "%s [%d] - {ffffff}AFK" 27@ 28@                  
                    end
                      
                   0B6F: render font 25@ draw_text 14@ pos 4@ 5@ color 0xFF1E90FF
                   end     
                   if 0ab0: 80//Pp
                   then
                   free 14@
                   jump @1
                   end
                   /*
                   0B2B: samp 28@ = get_player_id_by_actor_handle 31@
                   0B36: samp 27@ = get_player_nickname 28@
                   Actor.StorePos(31@, 1@, 2@, 3@)
                   0B55: convert_3D_coords 1@ 2@ 3@ to_screen 4@ 5@   
                   0B6F: render font 25@ draw_text 27@ pos 4@ 5@ color 0xFF1E90FF
                   */        
                     
                      
                   //0AF8: samp add_message_to_chat "P1cador: %s [%d]" color 0xFFF0FF 27@ 28@                    
               end
          end
      end
end          
wait 100
jump @1