CLEO Thread CallBack wait 2000 reg_cmd search search While True wait i

{$CLEO}
Thread "CallBack"
wait 2000

reg_cmd "search" @search

While True
wait 0
if and 
0@ == 1
0B4C:  samp is_dialog_active -1
    then
    chat "{4e71a1}[SEARCH] {1cc729}Èäåò ïîèñê." -1   
    wait 5000
    0209: 10@ = random_int_in_ranges 0 1
    if 10@ == 1
        then
        0209: 17@ = random_int_in_ranges 1 900
        chat "{4e71a1}[SEARCH] {1cc729}Ñòîèìîñòü äîìà {ff3b3b}¹%d {1cc729}ìåíüøå {ff3b3b}%d." -1 17@ 5@
        0006: 0@ = 0
        else
        chat "{4e71a1}[SEARCH] {1cc729}Íè÷åãî íå íàéäåíî." -1
        0006: 0@ = 0
        end
    end
end
    

:search
0B35: samp 1@ = get_last_command_params
if 0AD4: 4@ = scan_string 1@ format "%d" 5@ //IF and SET
    then
    if 5@ >= 64000
        then 
0B12: 0@ = 0@ XOR 1
    end
end
SAMP.CmdRet()