CLEO Thread Chag wait 2000 chatmsg 005ea7 PointBinder 85ff00 Author Ch

{$CLEO}
Thread "Chag"
wait 2000

chatmsg "{005ea7}[PointBinder] {85ff00}Author Chag." -1
chatmsg "{005ea7}[PointBinder] {85ff00}Reload script - R + B." -1
chatmsg "{005ea7}[PointBinder] {85ff00}Special for prime-hack.ru <3." -1

0AF0: 1@ = get_int_from_ini_file "CLEO\INI\PointBinder.ini" section "slot1" key "Key1"
0AF4: 2@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot1" key "Command1"
0AF4: 3@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot1" key "Text1"
0AF0: 5@ = get_int_from_ini_file "CLEO\INI\PointBinder.ini" section "slot2" key "Key2"
0AF4: 6@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot2" key "Command2"
0AF4: 7@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot2" key "Text2"

While True
wait 0
    if and
        0AD2: 0@ = player $PLAYER_CHAR targeted_actor //IF and SET
        key_down 1@
    then
    0B2B: samp 3@ = get_player_id_by_actor_handle 0@
    alloc 2@ 64
    alloc 4@ 64
    0AF4: 2@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot1" key "Command1"
    0AF4: 4@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot1" key "Text1"
    say "/%s %d %s" 2@ 3@ 4@
    wait 1000
    free 2@
    free 4@
    end
        if and
            0AD2: 0@ = player $PLAYER_CHAR targeted_actor //IF and SET
            key_down 5@
        then
        0B2B: samp 3@ = get_player_id_by_actor_handle 0@
        alloc 6@ 64
        alloc 7@ 64
        0AF4: 6@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot2" key "Command2"
        0AF4: 7@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot2" key "Text2"
        say "/%s %d %s" 6@ 3@ 7@
        wait 1000
        free 6@
        free 7@
        end
            if and
                key_down 66
                key_down 82
            then
            0AF0: 1@ = get_int_from_ini_file "CLEO\INI\PointBinder.ini" section "slot1" key "Key1"
            0AF4: 2@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot1" key "Command1"
            0AF4: 3@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot1" key "Text1"
            0AF0: 5@ = get_int_from_ini_file "CLEO\INI\PointBinder.ini" section "slot2" key "Key2"
            0AF4: 6@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot2" key "Command2"
            0AF4: 7@ = read_string_from_ini_file "CLEO\INI\PointBinder.ini" section "slot2" key "Text2"
            wait 1500
            chatmsg "{005ea7}[PointBinder] {85ff00}Скрипт перезагружен." -1
            end
    end