<?xml version="1.0" encoding="utf-8"?>
<rss version="2.0" xmlns:atom="http://www.w3.org/2005/Atom">
	<channel>
		<title><![CDATA[Серый форум &mdash; AutoHotkey: автоматическое ASCII-кодирование]]></title>
		<link>https://forum.script-coding.com/viewtopic.php?id=1047</link>
		<atom:link href="https://forum.script-coding.com/extern.php?action=feed&amp;tid=1047&amp;type=rss" rel="self" type="application/rss+xml" />
		<description><![CDATA[Недавние сообщения в теме «AutoHotkey: автоматическое ASCII-кодирование».]]></description>
		<lastBuildDate>Wed, 16 Jan 2008 14:43:23 +0000</lastBuildDate>
		<generator>PunBB</generator>
		<item>
			<title><![CDATA[AutoHotkey: автоматическое ASCII-кодирование]]></title>
			<link>https://forum.script-coding.com/viewtopic.php?pid=7971#p7971</link>
			<description><![CDATA[<p>Чтобы раз и навсегда обойти проблему несоответсвия раскладки, иногда выгодно заранее все перекодировать в ASCII-коды, применяемые AutoHotkey.</p><p>Давно хотел с этим разобраться, и вот взялся да и написал скриптец.</p><p>Скрипт кодирует текст, находящийся в буфере обмена, и возвращает готовые данные туда же.</p><div class="codebox"><pre><code>; ASCII Encryption

n = 1 ; задать порядковый номер читаемого символа буфера обмена

F4::
StringLen, i, Clipboard ; определить длину строки в буфере обмена -&gt; %i%
Loop, %i% ; повторять процесс согласно количества символов в строке буфера обмена
{ 
StringMid, Symbol, Clipboard, %n%, 1 ; прочитать один символ из строки буфера обмена, начиная с первого -&gt; %Symbol%
Transform, ASCII, Asc, %Symbol% ; перекодировать полученный символ в код ASCII -&gt; %ASCII%
Code = {ASC %ASCII%} ; добавить фигурные скобки
Done = %Done%%Code% ; добавить полученное в конец строки переменной -&gt; %Done%
n += 1 ; увеличить число на единицу, для чтения следующего символа буфера обмена
}
Clipboard = %Done% ; вернуть итоговые данные в буфер обмена
Done = ; очистить переменную Done для последующего использования
n = 1 ; вернуть номер читаемого символа на единицу
SplashTextOn, 400, 180, ASCII Encryption, `n`n All job done`n successfully ; сообщение об успешном  завершении работы
Sleep, 500
SplashTextOff
Return

;Send, ^{SC02E} ; ^c - копировать
;Send, ^{SC02F} ; ^v - вставить</code></pre></div>]]></description>
			<author><![CDATA[null@example.com (DedMazai)]]></author>
			<pubDate>Wed, 16 Jan 2008 14:43:23 +0000</pubDate>
			<guid>https://forum.script-coding.com/viewtopic.php?pid=7971#p7971</guid>
		</item>
	</channel>
</rss>
