// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
:Label000002
wait 0
SAMP.Available
else_jump @Label000002
:Label00000F
wait 0
11@ = SAMP.GetSAMPPlayerIDByActorHandle($0[3])
11@ = SAMP.GetPlayerNickname(11@)
if
0C14: strcmp string1 11@ string2 "Devil_Skull"
else_jump @Label000E4A
if and
not SAMP.ChatInputOpened
key_down 123
else_jump @Label000060
wait 200
0B12: 31@ = 31@ XOR 1
:Label000060
if
31@ == 1
else_jump @Label000E4A
printf "Laukiamas iskvietimas" 100
alloc 0@ 260
alloc 1@ 260
alloc 2@ 260
alloc 3@ 260
alloc 4@ 260
alloc 7@ 260
alloc 8@ 260
alloc 9@ 260
alloc 10@ 260
alloc 12@ 260
alloc 13@ 260
alloc 16@ 260
alloc 18@ 260
alloc 20@ 260
alloc 26@ 260
alloc 27@ 260
alloc 28@ 260
alloc 29@ 260
alloc 30@ 260
SAMP.GetChatString(99, 3@, 4@, 5@, 6@)
if
SAMP.IsDialogActive(-1)
else_jump @Label00014A
0BD8: samp get_dialog_caption 18@
:Label00014A
if and
not SAMP.ChatInputOpened
8C29: not $0[4] = stristr string1 18@ string2 "Ar"
8C29: not $0[4] = stristr string1 18@ string2 "AFK"
else_jump @Label000E4A
if or
5@ == -13391309
5@ == -65536
5@ == -1853148
else_jump @Label000E4A
0AF4: 26@ = read_string_from_ini_file "CLEO\Iskvietimai.ini" section "IgnoreList" key "Nickas1"
0AF4: 27@ = read_string_from_ini_file "CLEO\Iskvietimai.ini" section "IgnoreList" key "Nickas2"
0AF4: 28@ = read_string_from_ini_file "CLEO\Iskvietimai.ini" section "IgnoreList" key "Nickas3"
0AF4: 29@ = read_string_from_ini_file "CLEO\Iskvietimai.ini" section "IgnoreList" key "Nickas4"
0AF4: 30@ = read_string_from_ini_file "CLEO\Iskvietimai.ini" section "IgnoreList" key "Nickas5"
if and
8C29: not $0[4] = stristr string1 3@ string2 26@
8C29: not $0[4] = stristr string1 3@ string2 27@
8C29: not $0[4] = stristr string1 3@ string2 28@
8C29: not $0[4] = stristr string1 3@ string2 29@
8C29: not $0[4] = stristr string1 3@ string2 30@
else_jump @Label000E4A
if
0C29: $0[4] = stristr string1 3@ string2 "kvieиia"
else_jump @Label000861
if
0AD4: $0[4] = scan_string 3@ format "[racija]%s %s %s kvieиia" $0[4] 1@v 2@v
else_jump @Label000861
format 0@ "%s" 2@v
0C17: 14@ = strlen 0@
14@ -= 1
0C24: strncpy destination 0@ source 0@ size 14@
0C72: set_virtual_key 87 down 0
0C72: set_virtual_key 65 down 0
0C72: set_virtual_key 83 down 0
0C72: set_virtual_key 68 down 0
0AF4: 8@ = read_string_from_ini_file "CLEO\Iskvietimai.ini" section "Rasymas" key "Variantas"
0AF4: 16@ = read_string_from_ini_file "CLEO\Iskvietimai.ini" section "Iskvietimo emimas" key "Komanda"
if
0C14: strcmp string1 8@ string2 "1"
else_jump @Label000488
0AD4: $0[4] = scan_string 0@ format "%3[^_]" 10@v
0C28: strlwr in 10@v out 10@v
format 7@ "%s %s" 16@ 10@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label000488
if
0C14: strcmp string1 8@ string2 "2"
else_jump @Label00054D
0AD4: $0[4] = scan_string 0@ format "%4[^_]" 10@v
0C28: strlwr in 10@v out 10@v
format 7@ "%s %s" 16@ 10@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label00054D
if
0C14: strcmp string1 8@ string2 "3"
else_jump @Label000612
0AD4: $0[4] = scan_string 0@ format "%5[^_]" 10@v
0C28: strlwr in 10@v out 10@v
format 7@ "%s %s" 16@ 10@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label000612
if
0C14: strcmp string1 8@ string2 "4"
else_jump @Label0006D7
0AD4: $0[4] = scan_string 0@ format "%3[^_]" 20@v
0C28: strlwr in 20@v out 20@v
format 7@ "%s %s" 16@ 20@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label0006D7
if
0C14: strcmp string1 8@ string2 "5"
else_jump @Label00079C
0AD4: $0[4] = scan_string 0@ format "%4[^_]" 20@v
0C28: strlwr in 20@v out 20@v
format 7@ "%s %s" 16@ 20@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label00079C
if
0C14: strcmp string1 8@ string2 "6"
else_jump @Label000861
0AD4: $0[4] = scan_string 0@ format "%5[^_]" 20@v
0C28: strlwr in 20@v out 20@v
format 7@ "%s %s" 16@ 20@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label000861
if or
0C29: $0[4] = stristr string1 3@ string2 "nalog"
0C29: $0[4] = stristr string1 3@ string2 "paslaug"
else_jump @Label000E4A
if
0AD4: $0[4] = scan_string 3@ format "[racija]%s %s kvieиia" $0[4] 2@v
else_jump @Label000E4A
format 0@ "%s" 2@v
0C17: 14@ = strlen 0@
14@ -= 1
0C24: strncpy destination 0@ source 0@ size 14@
0C72: set_virtual_key 87 down 0
0C72: set_virtual_key 65 down 0
0C72: set_virtual_key 83 down 0
0C72: set_virtual_key 68 down 0
018C: play_sound 1057 at 0.0 0.0 0.0
0AF4: 8@ = read_string_from_ini_file "CLEO\Iskvietimai.ini" section "Rasymas" key "Variantas"
0AF4: 16@ = read_string_from_ini_file "CLEO\Iskvietimai.ini" section "Iskvietimo emimas" key "Komanda"
if
0C14: strcmp string1 8@ string2 "1"
else_jump @Label000A44
0AD4: $0[4] = scan_string 0@ format "%3[^_]_%[^_]" 10@v 20@v
0C28: strlwr in 10@v out 10@v
format 7@ "%s %s" 16@ 10@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label000A44
if
0C14: strcmp string1 8@ string2 "2"
else_jump @Label000B12
0AD4: $0[4] = scan_string 0@ format "%4[^_]_%[^_]" 10@v 20@v
0C28: strlwr in 10@v out 10@v
format 7@ "%s %s" 16@ 10@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label000B12
if
0C14: strcmp string1 8@ string2 "3"
else_jump @Label000BE0
0AD4: $0[4] = scan_string 0@ format "%5[^_]_%[^_]" 10@v 20@v
0C28: strlwr in 10@v out 10@v
format 7@ "%s %s" 16@ 10@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label000BE0
if
0C14: strcmp string1 8@ string2 "4"
else_jump @Label000CAE
0AD4: $0[4] = scan_string 0@ format "%[^_]_%3[^_]" 10@v 20@v
0C28: strlwr in 20@v out 20@v
format 7@ "%s %s" 16@ 20@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label000CAE
if
0C14: strcmp string1 8@ string2 "5"
else_jump @Label000D7C
0AD4: $0[4] = scan_string 0@ format "%[^_]_%4[^_]" 10@v 20@v
0C28: strlwr in 20@v out 20@v
format 7@ "%s %s" 16@ 20@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label000D7C
if
0C14: strcmp string1 8@ string2 "6"
else_jump @Label000E4A
0AD4: $0[4] = scan_string 0@ format "%[^_]_%5[^_]" 10@v 20@v
0C28: strlwr in 20@v out 20@v
format 7@ "%s %s" 16@ 20@v
0AF0: 9@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Nuo"
0AF0: 12@ = get_int_from_ini_file "CLEO\Iskvietimai.ini" section "Laikas" key "Iki"
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
0209: 13@ = random_int_in_ranges 9@ 12@
wait 13@
say 7@
31@ = 0
:Label000E4A
jump @Label00000F