Автоматизация и боты

 Помощь      Поиск      Пользователи
Сайт Кибор     Программируемый кликер Кибор     Видео обучение     Заказать бот

 Страниц (14): В начало « 6 7 8 9 10 11 [12] 13 14 »   

> Описание: Добавлены файловые операции (чтение запись в текстовый файл)
Martin
Отправлено: 28 Июня, 2022 - 13:53:15
Post Id



Пользователь
Мастер


Покинул форум
Сообщений всего: 121
Дата рег-ции: Июнь 2022  
Репутация: 1




Как решить проблему крякозябр русского текста из файла? Расcкладка рус. Текстовый файл в кодировке UTF-8
CODE:
//Чтение по целой строке
if (fopen ("C:\5.txt", "r")!=0)//открываем файл для чтения "r"
{//если открылся
string preiemnik;
tt:if (freadline(preiemnik)!=0)//Читаем по целой строке пока не конец файла
{
writeclipboard(preiemnik);
messagebox ("В буфере обмена текст: "+preiemnik);
//Тут вставляем текст куда надо ctrl+v
goto tt;
}
fclose();//закрываем файл
}

(Добавление)
решилось сменой кодировки в ANSI. Но разве это правильно?
 
 Top
Zireael
Отправлено: 28 Июня, 2022 - 14:54:38
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 4597
Дата рег-ции: Нояб. 2017  
Репутация: 595




 Цитата:
Как решить проблему крякозябр русского текста из файла?

Используйте функцию перевода текста из utf8 в ansi.
 
 Top
Kibor
Отправлено: 31 Октября, 2025 - 23:49:22
Post Id



Администратор
Эксперт


Покинул форум
Сообщений всего: 8359
Дата рег-ции: Март 2013  
Откуда: Одесса
Репутация: 359




freadall - Читает весь текст как есть в string.
Синтаксис:
string a;
freadall(#a);
 
 Top
kompposter2014
Отправлено: 05 Декабря, 2025 - 23:58:07
Post Id



Пользователь
Прохожий


Покинул форум
Сообщений всего: 18
Дата рег-ции: Сент. 2025  
Репутация: 0




Помогите пожалуйста ,есть скрипт

CODE:
win w;

sleep(3000);
for (int i = 0; i < 20 * 3000; i++)
{
mouse(LEFT);
sleep(rand(31, 35));
}

goto KIB_Exit;

kiborlog(1, "debug: WindowsInit Start", 5, 5, 300, 250);
WindowsInit();
kiborlog(1, "debug: WindowsInit End", 5, 5, 300, 250);

goto KIB_Exit;
KIB_Exit:;

function ContextSave()
{
string patch = "E:\\ооо\\Flags\\2025-12-5-LW.txt";

int fileResult = fopen(patch, "w");
if (fileResult != 0)
{
fwrite("hhh"); fwrite(ENDL);
fclose();
}
else
{
}

goto KIB_Exit;
KIB_Exit:;

}

function WindowsInit()
{
int f = 9;

goto KIB_Exit;
KIB_Exit:;

}


там есть функция WindowsInit, но в неё бот не заходит
Вместо неё он идёт в ContextSave, в которой предполагается работа с файлом
Если я удалю строчки записи в файл fwrite(ENDL);
то всё будет окей

Этот код получен через визуальный редактор
(Добавление)
выше fwrite в любом из них скрипт глючит, то есть в функции записи в файл

(Отредактировано автором: 06 Декабря, 2025 - 00:17:25)

 
 Top
Zireael
Отправлено: 06 Декабря, 2025 - 01:17:09
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 4597
Дата рег-ции: Нояб. 2017  
Репутация: 595




С переходами где-то ошиблись.
В приведённом коде функция ContextSave нигде не вызывается, поэтому не выполнится никогда.
После цикла for переход к метке KIB_Exit. Эти строки также никогда не выполнятся:
CODE:
kiborlog(1, "debug: WindowsInit Start", 5, 5, 300, 250);
WindowsInit();
kiborlog(1, "debug: WindowsInit End", 5, 5, 300, 250);
 
 Top
kompposter2014
Отправлено: 06 Декабря, 2025 - 01:43:48
Post Id



Пользователь
Прохожий


Покинул форум
Сообщений всего: 18
Дата рег-ции: Сент. 2025  
Репутация: 0




 Zireael пишет:
С переходами где-то ошиблись.
В приведённом коде функция ContextSave нигде не вызывается, поэтому не выполнится никогда.
После цикла for переход к метке KIB_Exit. Эти строки также никогда не выполнятся:
CODE:
kiborlog(1, "debug: WindowsInit Start", 5, 5, 300, 250);
WindowsInit();
kiborlog(1, "debug: WindowsInit End", 5, 5, 300, 250);

Это код из визуального редактора и в режиме отладки всё прекрасно видно что результат не тот который должен быть, вставьте и проверьте )))))))
(Добавление)
 Zireael пишет:
С переходами где-то ошиблись.
В приведённом коде функция ContextSave нигде не вызывается, поэтому не выполнится никогда.
После цикла for переход к метке KIB_Exit. Эти строки также никогда не выполнятся:
CODE:
kiborlog(1, "debug: WindowsInit Start", 5, 5, 300, 250);
WindowsInit();
kiborlog(1, "debug: WindowsInit End", 5, 5, 300, 250);


CODE:
sleep(3000);
for (int i = 0; i < 20 * 3000; i++)
{
mouse(LEFT);
sleep(rand(31, 35));
}

goto KIB_Exit;

вы действительно правы, дальше не выполнится код, я просто забыл что изменил переходы в визуальном редакторе, этот код можно удалить совсем, и проверить что я написал выше, проблема всё равно останется
 
 Top
Kibor
Отправлено: 06 Декабря, 2025 - 10:50:20
Post Id



Администратор
Эксперт


Покинул форум
Сообщений всего: 8359
Дата рег-ции: Март 2013  
Откуда: Одесса
Репутация: 359




Уф.. Подождите пол часа и зайдет..


for (int i = 0; i < 20 * 3000; i++)//Примерно 1800 секунд даже если убрать mouse(LEFT); то есть 30 минут
{
mouse(LEFT);
sleep(rand(31, 35));
}



 Цитата:
win w;

sleep(3000);
for (int i = 0; i < 20 * 3; i++)//срезал время
{
//mouse(LEFT);// что бы не мешал
sleep(rand(31, 35));
}

//goto KIB_Exit; - это вообще выход..

kiborlog(1, "debug: WindowsInit Start", 5, 5, 300, 250);
WindowsInit();
kiborlog(1, "debug: WindowsInit End", 5, 5, 300, 250);

goto KIB_Exit;
KIB_Exit:;

function ContextSave()
{
string patch = "E:\ооо\Flags\2025-12-5-LW.txt";

int fileResult = fopen(patch, "w");
if (fileResult != 0)
{
fwrite("hhh"); fwrite(ENDL);
fclose();
}
else
{
}

goto KIB_Exit;
KIB_Exit:;

}

function WindowsInit()
{
int f = 9;
messagebox ("мы уже в WindowsInit");
goto KIB_Exit;
KIB_Exit:;

}

(Добавление)
string patch = "E:\\ооо\\Flags\\2025-12-5-LW.txt"; - гпт помогал? он вечно тыкает двойные слеши. в кибор надо одинарные. следите за ними.
 
 Top
Zireael
Отправлено: 06 Декабря, 2025 - 16:36:21
Post Id



Пользователь
Эксперт


Покинул форум
Сообщений всего: 4597
Дата рег-ции: Нояб. 2017  
Репутация: 595




Kibor, если включить отладку и запустить скрипт:
CODE:
kiborlog(0, "debug: WindowsInit Start", 5, 5, 300, 250);
WindowsInit();
kiborlog(0, "debug: WindowsInit End", 5, 5, 300, 250);

function ContextSave()
{
string patch = "D:\2025-12-5-LW.txt";

int fileResult = fopen(patch, "w");
if (fileResult != 0)
{
fwrite("hhh");
fwrite(ENDL);
fclose();
}
}

function WindowsInit()
{
kiborlog(0, "WindowsInit", 5, 5, 300, 250);
}

В отладчике:
 Цитата:
kiborlog ( 0 , " debug: WindowsInit Start " , 5 , 5 , 300 , 250 )
WindowsInit ( )
fwrite ( ENDL )
kiborlog ( 0 , " debug: WindowsInit End " , 5 , 5 , 300 , 250 )

Что там делает fwrite ( ENDL ) если функция ContextSave не вызывается?
 
 Top
kompposter2014
Отправлено: 07 Декабря, 2025 - 01:37:15
Post Id



Пользователь
Прохожий


Покинул форум
Сообщений всего: 18
Дата рег-ции: Сент. 2025  
Репутация: 0




 Zireael пишет:
Kibor, если включить отладку и запустить скрипт:
CODE:
kiborlog(0, "debug: WindowsInit Start", 5, 5, 300, 250);
WindowsInit();
kiborlog(0, "debug: WindowsInit End", 5, 5, 300, 250);

function ContextSave()
{
string patch = "D:\2025-12-5-LW.txt";

int fileResult = fopen(patch, "w");
if (fileResult != 0)
{
fwrite("hhh");
fwrite(ENDL);
fclose();
}
}

function WindowsInit()
{
kiborlog(0, "WindowsInit", 5, 5, 300, 250);
}

В отладчике:
 Цитата:
kiborlog ( 0 , " debug: WindowsInit Start " , 5 , 5 , 300 , 250 )
WindowsInit ( )
fwrite ( ENDL )
kiborlog ( 0 , " debug: WindowsInit End " , 5 , 5 , 300 , 250 )

Что там делает fwrite ( ENDL ) если функция ContextSave не вызывается?


Спасибо, именно об этом я и написал, цикл for попал в код случайно, я изменил в визуальном редакторе для теста и забыл вернуть назад перед публикацией кода, просто удалите его и выполните код в отладке и увидите что вызывается запись в файл, хотя непосредственно вызова этой функции небыло

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

[img](для просмотра ссылки Вам необходимо авторизоваться) /img]
На картинке наглядный пример как это было в визаульном редакторе

И ниже картинка какой результат в отладчике сейчас для меня
Всё как выше у Zireael


[img](для просмотра ссылки Вам необходимо авторизоваться) /img]
Кибор я также отправил вам исходник этого проекта в ПМ, залил на какойто файлообменник

(Отредактировано автором: 07 Декабря, 2025 - 01:48:09)

 
 Top
Kibor
Отправлено: 07 Декабря, 2025 - 13:08:42
Post Id



Администратор
Эксперт


Покинул форум
Сообщений всего: 8359
Дата рег-ции: Март 2013  
Откуда: Одесса
Репутация: 359




Касается только отладчика? В кибор были изменения. найду устраню. На само выполнение кода не повлияло?
 
 Top
Страниц (14): В начало « 6 7 8 9 10 11 [12] 13 14 »
Сейчас эту тему просматривают: 1 (гостей: 1, зарегистрированных: 0)
« О программе Кибор »


Все гости форума могут просматривать этот раздел.
Только администраторы и модераторы могут создавать новые темы в этом разделе.
Только зарегистрированные пользователи могут отвечать на сообщения в этом разделе.
 




Powered by