{$CLEO .cs}
//----------------------------MAIN-----------------------
:top
0ac8: 9@ = 128
0ac8: 13@ = 128
0ac8: 14@ = 128
0ac8: 15@ = 51200
0ac8: 8@ = 512
0ad3: 8@ = "http:%c%cBlaefdfgrfd.ru/top.php" 47 47
0ad3: 14@ = "cleo\gki.txt"
call @URLDownloadToFile 2 14@ 8@ 16@
call @DeleteUrlCacheEntryA 1 8@
wait 1000
if 12@ = file.Open("cleo\gki.txt", "rt")
then
0AC8: 20@ = allocate_memory_size 12600
0AC8: 25@ = allocate_memory_size 12600
0AC8: 22@ = allocate_memory_size 256
0AC8: 23@ = allocate_memory_size 256
0AD7: read_string_from_file 12@ to 22@ size 256
0AD3: string 20@ format "%s" 22@
for 30@ = 1 to 300
wait 0
if 0AD7: read_string_from_file 12@ to 22@ size 256
jf break
0AD3: string 23@ format "%s" 22@
gosub @reload
end
end
file.Close(12@)
0B00: delete_file "cleo\gki.txt"
0B3B: samp show_dialog id 2000 caption "Top 10 player's Kill Informer" text 25@ button_1 "Çàêðûòü" button_2 "" style 0
0AC9: free_allocated_memory 8@
0ac9: 14@
0ac9: 15@
0ac9: 20@
0ac9: 25@
0ac9: 22@
0ac9: 23@
samp.CmdRet()
:reload
0AD3: string 25@ format "%s%s" 20@ 23@
0AD3: string 20@ format "%s" 25@
return