HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуЗамена символов случайными значениями ← Ctrl12Ctrl →
Этот топик читают: Гость
Ответов: 6
Рейтинг: 0
#1: 2014-04-05 02:23:38 ЛС | профиль | цитата
Имеется макрос для мыши х7, и там много строк с указанием пауз в миллисекундах. Паузы идут парами малая/большая.
Необходимо сгенерировать пару чисел в заданном промежутке, заменить одну пару значений, затем перейдя на другую пару строк повторить - опять генерируем, заменяем, и так 27 раз, а после сохранить в файл.
Как сгенерировать одно число я разобрался, но как замену делать я не понимаю, и уж тем более как сохранить получнный файл тоже неясно... Какие блоки хотя бы нужны?

Вот кусок макроса, для примера 2 нажатия ЛКМ. То что с "ms" и нужно заменить сгенерированными цифрами...

code_33351.txt

Помогите, пожалуйста, чем можете!
карма: 0

0
файлы: 1code_33351.txt [207B] [222]
Ответов: 2467
Рейтинг: 698
#2: 2014-04-05 02:51:15 ЛС | профиль | цитата
sashauzer писал(а):
в заданном промежутке
TimerMMTimer
sashauzer писал(а):
сгенерировать пару чисел
Random
sashauzer писал(а):
и так 27 раз
For
sashauzer писал(а):
затем перейдя на другую пару строк
ArrayRWArrayEnum
sashauzer писал(а):
а после сохранить в файл
StrList(doSave)
sashauzer писал(а):
но как замену делать я не понимаю
ReplaceMultiReplace
карма: 11

0
Ответов: 1343
Рейтинг: 31
#3: 2014-04-05 14:25:39 ЛС | профиль | цитата
элементарно

Add(MainForm,2953706,77,168)
{
 Width=722
 Height=573
}
Add(Memo,3795116,175,154)
{
 Left=5
 Top=5
 Width=335
 Height=520
 Strings=#0:|4:#cpp|8:varE = 1|10:Delay 5 ms|11:IfKey 7 0 2|20:if varE != 1 Goto 11|8:varE = 2|10:LeftDown 1|11:Delay 38 ms|8:LeftUp 1|12:Delay 112 ms|11:IfKey 7 0 2|20:if varE != 2 Goto 18|8:varE = 3|10:LeftDown 1|11:Delay 59 ms|8:LeftUp 1|12:Delay 101 ms|6:Goto 2|
}
Add(Memo,4515587,623,217)
{
 Left=370
 Top=5
 Width=330
 Height=520
 FileName="macros.txt"
}
Add(Button,8517067,77,210)
{
 Left=345
 Top=10
 Width=20
 Height=515
 Caption=">>"
 link(onClick,10360032:doEvent1,[])
}
Add(Random,5767958,364,210)
{
 Min=1
 link(onRandom,6187392:doString,[])
}
Add(BlockFind,10331775,553,210)
{
 Delete=0
 UserReplace=0
 StartBlock="Delay"
 EndBlock="ms"
 Point(doReplaceStr)
 link(onEndSearch,12141094:doWork2,[])
 link(Text,10572020:Value,[(559,200)(326,200)(326,268)(293,268)])
 link(Replace,373575:Value,[])
}
Add(ArrayEnum,822352,189,210)
{
 link(onItem,11629454:doCompare,[])
 link(onEndEnum,4515587:doSave,[(232,223)(232,258)])
 link(Array,3795116:Array,[])
}
Add(Memory,10572020,287,217)
{
 link(onData,3269924:doEvent1,[])
}
Add(Memory,373575,560,161)
{
 Default=Integer(1)
}
Add(DoData,12314436,462,210)
{
 link(onEventData,11478573:doEvent1,[])
 link(Data,6187392:FString,[(468,185)(454,185)(454,253)(419,253)])
}
Add(Hub,10360032,140,210)
{
 link(onEvent1,4515587:doClear,[(163,216)(163,273)(594,273)(594,230)])
 link(onEvent2,822352:doEnum,[(172,223)(172,216)])
}
Add(StrMask,11629454,238,210)
{
 Mask="Delay*ms"
 link(onFalse,12141094:doWork1,[(281,216)(281,149)(606,149)])
 link(onTrue,10572020:doValue,[])
}
Add(HubEx,12141094,602,217)
{
 link(onEvent,4515587:doAdd,[])
}
Add(Hub,3269924,336,217)
{
 link(onEvent1,5767958:doRandomize,[])
 link(onEvent2,5767958:doRandom,[(357,230)(357,216)])
}
Add(Hub,11478573,511,210)
{
 link(onEvent1,10331775:doReplaceStr,[(539,216)(539,223)])
 link(onEvent2,10331775:doSearch,[(539,223)(539,216)])
}
Add(FormatStr,6187392,413,210)
{
 DataCount=1
 Mask="Delay %1 ms"
 Point(FString)
 link(onFString,12314436:doData,[])
}
карма: 2

0
файлы: 1code_33353.txt [1.9KB] [271]
Ответов: 8974
Рейтинг: 824
#4: 2014-04-05 14:34:54 ЛС | профиль | цитата
Rysik, многовато лишнего code_33354.txt
карма: 19

0
файлы: 1code_33354.txt [1.2KB] [260]
Ответов: 1343
Рейтинг: 31
#5: 2014-04-05 14:36:32 ЛС | профиль | цитата
Леонид писал(а):
многовато лишнего


ну уж куда мне до вас
ты уж поди года 3 тут минимум, а я тут меньше года,даже меньше пол года
карма: 2

0
Разработчик
Ответов: 26322
Рейтинг: 2147
#6: 2014-04-05 14:47:18 ЛС | профиль | цитата
Rysik писал(а):
ты уж поди года 3 тут минимум

Хе -- Зарегистрирован: 09 Aug 2004 20:42. Скоро десять лет будет как...
карма: 22

0
Ответов: 2467
Рейтинг: 698
#7: 2014-04-05 14:49:48 ЛС | профиль | цитата
Rysik, Леонид, вас вот это:
Паузы идут парами малая/большая. Необходимо сгенерировать пару чисел
в описании ТС не смущает?
Rysik, [flood]
Rysik писал(а):
ты уж поди года 3 тут минимум
Ага 3 года
Личные данные: писал(а):
Логин:Леонид
Статус:Опытный
Зарегистрирован:09 Aug 2004 20:42

[/flood]
карма: 11

0
Ответов: 8974
Рейтинг: 824
#8: 2014-04-05 15:02:24 ЛС | профиль | цитата
sla8a, я чуть скорректировал схему коллеги Rysik-а, на примере показав, что данные могут читаться не только "сверху", но и в потоке "слева"
Что касается пар чисел, то у ТС в примере их не то пять отдельных чисел, не то две с половиной пары, приедет барин, барин и рассудит
карма: 19

0
Ответов: 1343
Рейтинг: 31
#9: 2014-04-05 15:14:24 ЛС | профиль | цитата
sla8a писал(а):
Зарегистрирован:09 Aug 2004 20:42
карма: 2

0
Гость
Ответов: 17029
Рейтинг: 0
#10: 2014-04-05 15:36:20 правка | ЛС | профиль | цитата


Редактировалось 4 раз(а), последний 2025-01-15 03:53:39
карма: 0

0
Ответов: 1343
Рейтинг: 31
#11: 2014-04-05 16:11:23 ЛС | профиль | цитата
г. ость писал(а):
непонятно Ваше ощеривание...


что?...
карма: 2

-1
Голосовали:foksov
Ответов: 6
Рейтинг: 0
#12: 2014-04-06 01:46:40 ЛС | профиль | цитата
Ничего себе уже сколько наклепали И спасибо что откликнулись!
Насчет неопределенности пар - я имел в виду пары ~50ms / ~100ms. Первая пауза в 5ms не в счет, она нужна только для зацикливания, когда клавиша 7 не нажата (так извернулся, ограничения в макросах Х7...)
Просто хотел программку, генерирующую новый макрос со случайными значениями в один клик, а то с онлайн-рандомизаторов сдуреешь каждый раз копировать по одному числу, то есть 54 раза надо скопировать и вставить...
вот полная версия если что:
<Root>
<DefaultMacro>
<Major></Major>
<Description></Description>
<Comment>antirecoil
</Comment>
<GUIOption>
<RepeatType>0</RepeatType>
</GUIOption>
<KeyUp>
<Syntax></Syntax>
</KeyUp>
<KeyDown>
<Syntax>varE = 1
Delay 5 ms
IfKey 7 0 2
if varE != 1 Goto 11
varE = 2
LeftDown 1
Delay 38 ms
LeftUp 1
Delay 112 ms
IfKey 7 0 2
if varE != 2 Goto 18
varE = 3
LeftDown 1
Delay 59 ms
LeftUp 1
Delay 101 ms
IfKey 7 0 2
if varE != 3 Goto 25
varE = 4
LeftDown 1
Delay 64 ms
LeftUp 1
Delay 104 ms
IfKey 7 0 2
if varE != 4 Goto 32
varE = 5
LeftDown 1
Delay 55 ms
LeftUp 1
Delay 93 ms
IfKey 7 0 2
if varE != 5 Goto 39
varE = 6
LeftDown 1
Delay 70 ms
LeftUp 1
Delay 92 ms
IfKey 7 0 2
if varE != 6 Goto 46
varE = 7
LeftDown 1
Delay 45 ms
LeftUp 1
Delay 110 ms
IfKey 7 0 2
if varE != 7 Goto 53
varE = 8
LeftDown 1
Delay 52 ms
LeftUp 1
Delay 90 ms
IfKey 7 0 2
if varE != 8 Goto 60
varE = 9
LeftDown 1
Delay 46 ms
LeftUp 1
Delay 105 ms
IfKey 7 0 2
if varE != 9 Goto 67
varE = 10
LeftDown 1
Delay 68 ms
LeftUp 1
Delay 120 ms
IfKey 7 0 2
if varE != 10 Goto 74
varE = 11
LeftDown 1
Delay 66 ms
LeftUp 1
Delay 86 ms
IfKey 7 0 2
if varE != 11 Goto 81
varE = 12
LeftDown 1
Delay 58 ms
LeftUp 1
Delay 100 ms
IfKey 7 0 2
if varE != 12 Goto 88
varE = 13
LeftDown 1
Delay 44 ms
LeftUp 1
Delay 91 ms
IfKey 7 0 2
if varE != 13 Goto 95
varE = 14
LeftDown 1
Delay 65 ms
LeftUp 1
Delay 103 ms
IfKey 7 0 2
if varE != 14 Goto 102
varE = 15
LeftDown 1
Delay 35 ms
LeftUp 1
Delay 97 ms
IfKey 7 0 2
if varE != 15 Goto 109
varE = 16
LeftDown 1
Delay 51 ms
LeftUp 1
Delay 118 ms
IfKey 7 0 2
if varE != 16 Goto 116
varE = 17
LeftDown 1
Delay 50 ms
LeftUp 1
Delay 94 ms
IfKey 7 0 2
if varE != 17 Goto 123
varE = 18
LeftDown 1
Delay 69 ms
LeftUp 1
Delay 98 ms
IfKey 7 0 2
if varE != 18 Goto 130
varE = 19
LeftDown 1
Delay 42 ms
LeftUp 1
Delay 117 ms
IfKey 7 0 2
if varE != 19 Goto 137
varE = 20
LeftDown 1
Delay 37 ms
LeftUp 1
Delay 114 ms
IfKey 7 0 2
if varE != 20 Goto 144
varE = 21
LeftDown 1
Delay 54 ms
LeftUp 1
Delay 96 ms
IfKey 7 0 2
if varE != 21 Goto 151
varE = 22
LeftDown 1
Delay 56 ms
LeftUp 1
Delay 99 ms
IfKey 7 0 2
if varE != 22 Goto 158
varE = 23
LeftDown 1
Delay 43 ms
LeftUp 1
Delay 109 ms
IfKey 7 0 2
if varE != 23 Goto 165
varE = 24
LeftDown 1
Delay 39 ms
LeftUp 1
Delay 106 ms
IfKey 7 0 2
if varE != 24 Goto 172
varE = 25
LeftDown 1
Delay 62 ms
LeftUp 1
Delay 85 ms
IfKey 7 0 2
if varE != 25 Goto 179
varE = 26
LeftDown 1
Delay 49 ms
LeftUp 1
Delay 111 ms
IfKey 7 0 2
if varE != 26 Goto 186
varE = 27
LeftDown 1
Delay 57 ms
LeftUp 1
Delay 107 ms
IfKey 7 0 2
if varE != 27 Goto 2
varE = 1
LeftDown 1
Delay 36 ms
LeftUp 1
Delay 116 ms
Goto 2</Syntax>
</KeyDown>
<Software>game
</Software></DefaultMacro>
</Root>



Леонид, посмотрел ваш вариант - практически то что надо! Но генератор один, а мне видимо нужно 2, т.к. первое число должно быть (35;70) а второе (85;120), то биш 2 области распределения.
Первая пауза - удержание ЛКМ,
вторая - пауза до следующего клика после отпускания ЛКМ.
Попробовал вот так, но фокус не удался, заменяет только первые, вторые ни в какую:
Make(delphi)
ver(4.04 build 184)
Add(MainForm,15614549,14,308)
{
 Width=722
 Height=573
 link(onCreate,5767958:doRandomize,[(179,328)(179,300)])
}
Add(Memo,3795116,77,203)
{
 Left=5
 Top=5
 Width=335
 Height=520
 Strings=#8:varE = 1|10:Delay 5 ms|11:IfKey 7 0 2|20:if varE != 1 Goto 11|8:varE = 2|10:LeftDown 1|16:Delay <short> ms|8:LeftUp 1|15:Delay <long> ms|11:IfKey 7 0 2|20:if varE != 2 Goto 18|8:varE = 3|10:LeftDown 1|16:Delay <short> ms|8:LeftUp 1|15:Delay <long> ms|6:Goto 2|
}
Add(Memo,4515587,371,287)
{
 Left=370
 Top=5
 Width=330
 Height=220
 link(onChange,3613996:doEvent1,[(413,293)(413,356)])
}
Add(Button,8517067,14,266)
{
 Left=345
 Top=10
 Width=20
 Height=515
 Caption=">>"
 link(onClick,10360032:doEvent1,[])
}
Add(Random,5767958,196,287)
{
 Min=35
 Max=70
 link(onRandom,6187392:doString,[])
}
Add(ArrayEnum,822352,91,273)
{
 link(onItem,11629454:doCompare,[])
 link(Array,3795116:Array,[])
}
Add(Hub,10360032,63,266)
{
 OutCount=3
 link(onEvent1,4515587:doClear,[(298,272)(298,300)])
 link(onEvent2,822352:doEnum,[])
}
Add(StrMask,11629454,140,273)
{
 Mask="Delay <short> ms"
 link(onFalse,12141094:doWork1,[(291,279)])
 link(onTrue,5767958:doRandom,[(184,286)(184,293)])
}
Add(HubEx,12141094,287,287)
{
 link(onEvent,4515587:doAdd,[])
}
Add(FormatStr,6187392,245,287)
{
 DataCount=1
 Mask="Delay %1 ms"
 Point(FString)
 link(onFString,12141094:doWork2,[])
}
Add(ArrayEnum,3495001,455,350)
{
 link(onItem,14209091:doCompare,[])
 link(Array,4515587:Array,[(461,339)(391,339)])
}
Add(StrMask,14209091,504,350)
{
 Mask="Delay <long> ms"
 link(onFalse,10241042:doWork1,[(648,356)])
 link(onTrue,6753897:doRandom,[(548,363)(548,370)])
}
Add(Random,6753897,560,364)
{
 Min=85
 Max=120
 link(onRandom,3322380:doString,[])
}
Add(FormatStr,3322380,609,364)
{
 DataCount=1
 Mask="Delay %1 ms"
 Point(FString)
 link(onFString,10241042:doWork2,[])
}
Add(HubEx,10241042,644,364)
{
 link(onEvent,8950956:doAdd,[(657,370)(657,405)])
}
Add(Memo,8950956,672,399)
{
 Left=370
 Top=235
 Width=330
 Height=295
}
Add(Hub,3613996,424,350)
{
 link(onEvent1,3495001:doEnum,[(446,356)(446,356)])
 link(onEvent2,8950956:doClear,[(445,363)(445,412)(500,412)])
}
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#13: 2014-04-06 09:01:36 ЛС | профиль | цитата
code_33359.txt
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_33359.txt [1.2KB] [221]
Ответов: 6
Рейтинг: 0
#14: 2014-04-06 13:35:56 ЛС | профиль | цитата
Tad писал(а):

Работает, но дело в том что в вашей схеме по одному генератору на число, а у меня их 54... И может даже увеличу это число позже. Для интереса я соорудил гигантский паровоз с 54 генераторами по вашему варианту, но рациональным этот вариант назвать язык не поворачивается У Леонида вариант гораздо изящнее получился, правда, не совсем рабочий
карма: 0

0
Ответов: 2467
Рейтинг: 698
#15: 2014-04-06 13:46:52 ЛС | профиль | цитата
Так наверное: code_33360.txt
карма: 11

0
файлы: 1code_33360.txt [792B] [275]
ФорумыПомощь по пакетуЗамена символов случайными значениями ← Ctrl12Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2025
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика