[Rusalim]

Код выставления на продажу трёх типов сосок, скрипт _START_TRADE.scp:

// Начало _START_TRADE
// Продажа сосок
// Выставляет на продажу все 3 типа сосок по очереди
// и выводит рекламу товара
Include>C:\MACRO\_INFO.scp
//Let>PRINT_RECLAM=TRUE
SetFocus>Lineage II
CapsOff
Wait>3.00
// Кнопка "Торговля" ****************
Label>start_prod1
Include>C:\MACRO\_PROBE_REBOOT.scp
Wait>0.50
SetFocus>Lineage II
MouseMove>588,868
Wait>0.50
LDown
Wait>1.50
LUp
Wait>1.00
// Ожидание появления диалога на продажу ****
SetFocus>Lineage II
//Let>FIP_SCANPIXELS=200
Let>WSI_TIMEOUT=15
WaitScreenImage>C:\MACRO\img\dialog_prod.bmp,50
If>WSI_TIMEDOUT=TRUE
// Нажать кнопку ВСТАТЬ
Wait>0.50
SetFocus>Lineage II
MouseMove>778,964
Wait>0.50
LDown
Wait>1.50
LUp
Wait>1.00
Goto>start_prod1
ENDIF
Label>start_loop
//
//
Label>find_ssc
//Let>FIP_SCANPIXELS=400
FindImagePos>C:\MACRO\img\ssc_prod.bmp,SCREEN,35,1,X,Y,NumFound
If>NumFound>0
Let>price=%ssc%
Gosub>input_price
Goto>start_loop
ENDIF
//
//
//
Label>find_ssa
//Let>FIP_SCANPIXELS=400
FindImagePos>C:\MACRO\img\ssa_prod.bmp,SCREEN,35,1,X,Y,NumFound
If>NumFound>0
Let>price=%ssa%
Gosub>input_price
Goto>start_loop
ENDIF
//
//
//
Label>find_sss
//Let>FIP_SCANPIXELS=400
FindImagePos>C:\MACRO\img\sss_prod.bmp,SCREEN,35,1,X,Y,NumFound
If>NumFound>0
Let>price=%sss%
Gosub>input_price
Goto>start_loop
ENDIF
//


If>PRINT_RECLAM=TRUE
// Вывод рекламного сообщения
//FindImagePos>C:\MACRO\img\reclama_btn.bmp,SCREEN,20,1,X,Y,NumFound
MouseMove>125,679
Wait>0.50
LDown
Wait>0.70
LUp
Wait>0.70
MouseMove>572,515
Wait>0.50
LDown
Wait>0.70
LUp
Wait>0.70
Let>SK_DELAY=10
PutClipBoard>%reclam%
Wait>0.50
GetClipBoard>reclam
Send Character/Text>reclam
//Send>%reclam%
MouseMove>602,550
Wait>0.50
LDown
Wait>0.70
LUp
Wait>0.70
ENDIF
//  Кнопка "Начать" ********************
//Label>startend
Wait>0.50
SetFocus>Lineage II
MouseMove>200,685
LDown
Wait>0.50
LUp
Wait>0.50
//********************* Конец программы ***************************
// Конец _START_TRADE

// Подпрограмма ввода цены товара
SRT>input_price
Label>start_price
MouseMove>X_0,Y_0
Wait>0.50
//////////// Начало ПЕРЕМЕЩЕНИЯ //////////////////////////////
LDown
Wait>0.8
MouseMove>36,380
Wait>0.5
MouseMove>130,583
Wait>0.50
LUp
////////////////// Конец ПЕРЕМЕЩЕНИЯ /////////////////////////////
Wait>1.00
//Проверка открытия диалога ввода цены товара
Label>start_price2
//Let>FIP_SCANPIXELS=200
Let>WSI_TIMEOUT=20
WaitScreenImage>C:\MACRO\img\dialog_nabora_price.bmp,45
If>WSI_TIMEDOUT=TRUE
Include>C:\MACRO\_PROBE_REBOOT.scp
Goto>start_price
ENDIF
// End ******************************
Wait>0.50
// Ввод ЦЕНЫ
PutClipBoard>price
Wait>0.50
GetClipBoard>price
Let>SK_DELAY=10
Send Character/Text>price
Wait>0.50
// Кнопка "Ok" ***********************
Wait>0.50
SetFocus>Lineage II
MouseMove>536,552
LDown
Wait>0.50
LUp
Wait>0.50
// Кнопка "All" **************************
Wait>0.50
SetFocus>Lineage II
MouseMove>792,550
LDown
Wait>0.50
LUp
Wait>0.50
// ************** Кнопка "Подтвердить" **************************
Wait>0.50
SetFocus>Lineage II
MouseMove>536,556
LDown
Wait>0.50
LUp
Wait>0.50
End>input_price

Скрипт _INFO.scp:

// Начало файла _INFO
Let>ssd=12
Let>bssd=64
Let>ssc=18
Let>bssc=124
Let>ssa=90
Let>sss=110
Let>reclam=SSC - SSA - SSS
// Количество циклов изготовления сосок
Let>ssd_loop=1
Let>bssd_loop=1
Let>ssc_loop=1
Let>ssa_loop=1
Let>sss_loop=1
Let>bssc_loop=1
// Выводить или нет рекламу
Let>PRINT_RECLAM=TRUE
// Конец файла _INFO

На панель должны быть вынесены кнопки изготовления сосок, координаты кнопок надо подкорректировать под себя. Короче, если немножко умеешь писать скрипты то разберёшся сам .
Заметил в проге один косяк: когда установлена русская раскладка при выводе рекламы печатаются крякозябры. Поэтому перед запуском скриптов переключаюсь на английский.