If, Вопрос по первой букве Опции

[dronepilot]

Всем привет. Есть вопрос по команде if. Мне необходима проверка буфера обмена.
get clipboard $a
В буфере сейчас "текст"
Мне нужна проверка
If первая буква в $a равна т
тогда переходи к следующей строке
иначе set clipboard и переходи к следующей строке

Как реализовать?

[AbsorbeR]

Что на входе?

[dronepilot]

Что на входе?

текст и сиволы

текст и сиволы

Мне нужно проверить первый символ, если он тот который мне нужно тогда ничего не делать и продолжать, если не тот, то чистить буфер и продолжать

[Fors1k]

Вуаля )

Код

:1
get clipboard $a   // получаем в буфер некое слово
set #b ord($a)
if #b = 242     // если в слове первая буква "т" отправляемся дальше по скрипту
goto 2
else               // если первая буква не "т", продолжаем ждать слово, в котором первая буква будет "т"
goto 1
end_if
:2
..........
..........              // тут выполняются нужные Вам действия, если в буфер обмена попало слово с первой буквой "т"
..........
goto 1
end_script

[dronepilot]

Код

:1
get clipboard $a   // получаем в буфер некое слово
set #b ord($a)
if #b = 242     // если в слове первая буква "т" отправляемся дальше по скрипту
goto 2
else               // если первая буква не "т", продолжаем ждать слово, в котором первая буква будет "т"
goto 1
end_if
:2
..........
..........              // тут выполняются нужные Вам действия, если в буфер обмена попало слово с первой буквой "т"
..........
end_script

Вуаля )

Огромное спасибо. Вы решили мою проблему. + в карму

[dronepilot]

Вуаля )

Код

:1
get clipboard $a   // получаем в буфер некое слово
set #b ord($a)
if #b = 242     // если в слове первая буква "т" отправляемся дальше по скрипту
goto 2
else               // если первая буква не "т", продолжаем ждать слово, в котором первая буква будет "т"
goto 1
end_if
:2
..........
..........              // тут выполняются нужные Вам действия, если в буфер обмена попало слово с первой буквой "т"
..........
end_script

Как теперь посчитать сколько раз была найдена буква т?

[Fors1k]

Код

set #count 0
:1
get clipboard $a   // получаем в буфер некое слово
set #b ord($a)
if #b = 242     // если в слове первая буква "т" отправляемся дальше по скрипту
set #count #count + 1  
log #count   // покажет в логе сколько раз скрипт нашел слово с первой буквой "т" 
goto 2
else               // если первая буква не "т", продолжаем ждать слово, в котором первая буква будет "т"
goto 1
end_if
:2
..........
..........              // тут выполняются нужные Вам действия, если в буфер обмена попало слово с первой буквой "т"
..........
goto 1
end_script

[Fors1k]

Кому понадобится, код для любой другой первой буквы

Код

:1
set #c ord(т) // тут в скобках вместо "т" можно вписать любую нужную букву / символ
get clipboard $a   // получаем в буфер некое слово
set #b ord($a)
if #b = #c     // если в слове первая буква "т" отправляемся дальше по скрипту
goto 2
else               // если первая буква не "т", продолжаем ждать слово, в котором первая буква будет "т"
goto 1
end_if
:2
..........
..........              // тут выполняются нужные Вам действия, если в буфер обмена попало слово с первой буквой "т"
..........
goto 1
end_script

[DarkMaster]

А через copy не проще?

Код

get clipboard $a
set $b copy ($a 1 1)
log $b

[cirus]

Зачем эта каша из goto.

Код

get clipboard $a
if ord($a) = 242   // если первая буква 'т'
    // нужные действия
end_if
end_script

Код

get clipboard $a
if_not ord($a) = 242   // если первая буква не 'т'
    // нужные действия
end_if
end_script

Если надо дождаться нужного текста.

Код

get clipboard $a
while ord($a) != 242    // пока первая буква не 'т'
    get clipboard $a
    wait 10
end_while
// дальнейшие действия
end_script

[Fors1k]

А через copy не проще?

Код

get clipboard $a
set $b copy ($a 1 1)
log $b

Про copy не знал, спасибо. Я совсем новичок)
Ну а так, количество строк такое же.
(IMG:style_emoticons/default/smile.gif)

[Fors1k]

Зачем эта каша из goto.

Ну, автор не дал же полное тело скрипта. Вдруг поиск слова с первой буквой "т" находится строке на 100-й
, а не в начале, и на 150-й еще и условие какое-нибудь, типа если найдет цвет, то сразу надо запустить цикл поиска слова на т, и тогда на 150-й строке можно вполне удобно указать goto 1.
А так сразу универсально вроде получилось, если я не ошибаюсь.
Но если ничего такого нет, то с while, конечно, проще.