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

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
{$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()