Val_027 |
Отправлено: 17 Августа, 2020 - 12:41:01
|
Участник
Покинул форум
Сообщений всего: 114
Дата рег-ции: Февр. 2020
Репутация: 0
|
Kibor пишет: messagebox (2+5);
да так норм работает
if(getkeystate 19){goto EXIT} // НА ВЫХ Break
function chistka()
{disablevisualwindow(0);
Textout(0,950,800,"",16000000,65280,"Arial",-24,0,0,0,0,0,0,0);}
EXIT:chistka();sleep(100); // УБИРАЕМ ТЕКСТ
все работает, пока не жму Break вот и тут все закрываеться раньше такого не было
мысль понятно теперь найду думаю(Отредактировано автором: 17 Августа, 2020 - 12:41:42) |
|
|
Kibor |
Отправлено: 17 Августа, 2020 - 12:51:36
|
Эксперт
Покинул форум
Сообщений всего: 8218
Дата рег-ции: Март 2013
Откуда: Одесса
Репутация: 357
|
Val_027 пишет: мысль понятно теперь найду думаю
Нет.
После
CODE:if(getkeystate 19){goto EXIT}
Ну запустил я этот скрипт. Закомментировав перед этим
Textout(0,950,800,"",16000000,65280,"Arial",-24,0,0,0,0,0,0,0);
так как в этом скрипте dll нужная не подключена.
Скрипт отработал и все.
Где пример рабочий? Самому писать? |
|
|
Val_027 |
Отправлено: 17 Августа, 2020 - 15:18:28
|
Участник
Покинул форум
Сообщений всего: 114
Дата рег-ции: Февр. 2020
Репутация: 0
|
Kibor пишет: Ну запустил я этот скрипт. Закомментировав перед этим
Textout(0,950,800,"",16000000,65280,"Arial",-24,0,0,0,0,0,0,0);
так как в этом скрипте dll нужная не подключена.
Скрипт отработал и все.
Где пример рабочий? Самому писать?
Спасибо что ответили, весь скрипт выкладывать это 859 строк я сам просмотрю потом отпишусь а пока так поработаю,,, |
|
|
Val_027 |
Отправлено: 18 Августа, 2020 - 08:51:54
|
Участник
Покинул форум
Сообщений всего: 114
Дата рег-ции: Февр. 2020
Репутация: 0
|
Val_027 пишет: отпишусь
вот мои изыскания ....
win wind=getwindow(1,1810,5);activate(wind);
loop()
{if(getkeystate NUMPAD1){TEKST()} // TEKST
if(getkeystate 19){goto EXIT}} // НА ВЫХ Break
function TEKST(){messagebox("text");sleep(300);}
EXIT: /// В таком виде все работает и не закрываеться !
А ТАК...
external(INT, "begin_paint","begin_paint", pathfolder()+"Draw.dll");
external(INT, "Textout", "textout",pathfolder()+"Draw.dll");
string st="Tahoma";begin_paint();textbkcolor(255,4259584);
int WORK[135][4]; loadimage(#WORK[0][0], "Z:\!!!\WORK.bmp"); // КРАСНАЯ ПОЛОСКА
int WAIT[135][4]; loadimage(#WAIT[0][0], "Z:\!!!\WAIT.bmp"); // ЗЕЛЕАЯ ПОЛОСКА
win wind=getwindow(1,1810,5);activate(wind);
Textout(0,370,980," 1_TEKST ",16000000,65280,"Arial",-24,0,0,0,0,0,0,0);
loop(){if(getkeystate NUMPAD1){TEKST()} // TEKST
if(getkeystate 19){goto EXIT} // НА ВЫХод Break
visualwindow(0,0,0,135,4,547,735,245,#WAIT[0][0]);sleep(99);}
function TEKST()
{visualwindow(0,0,0,135,4,547,735,245,#WORK[0][0]);sleep(4000);disablevisualwindow(0);}
EXIT:
работает но когда на выход жмем / Break/ вылет киборга
что то мне говорит, закавыка в begin_paint(); мб не так ставлю не там хз
тут вот прошу помочь....
раньше, сто пудово работало / взял архивный файл открыл закрыл вылет ... ну как то так(Отредактировано автором: 18 Августа, 2020 - 08:54:52) |
|
|
Dantes3000 |
Отправлено: 18 Августа, 2020 - 10:26:29
|
Эксперт
Покинул форум
Сообщений всего: 1489
Дата рег-ции: Июнь 2016
Репутация: 58
|
Val_027 ,
external(INT, "begin_paint","begin_paint", pathfolder()+"Draw.dll" );
external(INT, "Textout", "textout",pathfolder()+"Draw.dll" );
string st="Tahoma";
begin_paint();
textbkcolor(255,4259584);
int WORK[135][4]; loadimage(#WORK[0][0], "Z:\!!!\WORK.bmp" ); // КРАСНАЯ ПОЛОСКА
int WAIT[135][4]; loadimage(#WAIT[0][0], "Z:\!!!\WAIT.bmp" ); // ЗЕЛЕАЯ ПОЛОСКА
win wind=getwindow(1,1810,5);
activate(wind);
Textout(0,370,980," 1_TEKST ",16000000,65280,"Arial",-24,0,0,0,0,0,0,0);
loop()
{
if(getkeystate(NUMPAD1)){TEKST();} // TEKST
if(getkeystate (19)){goto EXIT;} // НА ВЫХод Break
visualwindow(0,0,0,135,4,547,735,245,#WAIT[0][0]);
sleep(99);
}
function TEKST()
{
visualwindow(0,0,0,135,4,547,735,245,#WORK[0][0]);
sleep(4000);
disablevisualwindow(0);
}
EXIT:; |
|
|
|