KirikRus299
Участник
- 45
- 20
Вопросы по CLEO-скриптингу
- Автор темы MogAika
- Дата начала
это gxt тебе не оно нужно
юзай ево
0ACF: show_formatted_styled_text "This is %.4X opcode" time 2000 style 1 0x0ACF
юзай ево
0ACF: show_formatted_styled_text "This is %.4X opcode" time 2000 style 1 0x0ACF
- 411
- 267
клее девелопир же ну
'' - short string @s
"" - long string @v
Вы находитесь в разделе "Разработка" (само название уже должно выдавать смысл сего раздела).
Пожалуйста, не сорите здесь просьбами о написании какой-то программы (т.е. требуете уже готовый продукт).
Royan_Millans
Известный
- 145
- 182
KirikRus299
Участник
- 45
- 20
l Piko l
Известный
- 57
- 15
1@ == 1 проверяет является ли в этой переменной число 1 1@ = 1 изменяет число на 1
LinkelnAweil
Участник
- 122
- 7
Как сделать скачивание файла, нужно для автообновления? Пытался сделать 0C65: 1@ = download_url "ссылка" to_file "test.txt", но файл не скачивается.
Royan_Millans
Известный
- 145
- 182
CLEO:
{$CLEO}
0000:
const // Константы для определения названий файлов и версии скрипта
SCRIPT_VERSION = 1
UPDATEINFO_FILE = "cleo_name_update.txt"
CHANGELOG_FILE = "cleo_name_changelog.txt"
end
repeat
wait 400
until 0AFA: is_samp_available
0AF8: samp add_message_to_chat "Скрипт cleo_name. Версия №%d" color -1 SCRIPT_VERSION
0AB1: call_scm_func @check_updates 1 current_version SCRIPT_VERSION
while true
wait 0
end
:download_check_status // Для проверки статуса загрузки(т.к. эта часть будет использоваться более, чем 1 раз)
// call @download_check_status 1 download_n 0@
1@ = -1
while 1@ == -1 // Скачивание всё ещё в процессе
wait 0
0C66: 1@ = get_download 0@ state // Получаем статус загрузки
end
0AB2: ret 1 1@ // Возвращаем статус зарузки
:url_fileupdateinfo // Т.к. в Sanny Builder иначе никак не подружиться со слешами в строках, придется как нить так
// Здесь хранится URL на данные с обновлением
hex
"http:" "/" "/" "legend2360.googlecode.com/svn/trunk/autoupd_ex/cleo_name/update.txt" 00
end
:check_updates
// call @check_updates 1 current_version 0@
0AC6: 1@ = label @url_fileupdateinfo offset // Сделаем грешок и переопределим переменную
0C65: 1@ = download_url 1@ to_file UPDATEINFO_FILE // Начинаем скачивание файла
0AB1: call_scm_func @download_check_status 1 download_n 1@ status_to 2@
0C7D: release_download 1@ // Освобождаем, т.к. скачивание завершено
if 2@ <> 0 // Если статус НЕ равен 0(т.е. загрузка завершена неудачно), то
then
0AF8: samp add_message_to_chat "Произошла ошибка во время загрузки. Ошибка %p" color -1 2@ // Выводим сообщение об ошибке
else // иначе
0AF8: samp add_message_to_chat "Загрузка успешно завершена." color -1 // Выводим сообщение об успешном скачивании
if 0AAB: file_exists UPDATEINFO_FILE // Мало ли файл не был создан в необходимом нам месте, проверим это на всякий случай
then
0AF0: 3@ = get_int_from_ini_file UPDATEINFO_FILE section "UPDATE" key "version" // Читаем номер версии в скаченном файле обновления
if 001D: 3@ > 0@ // Если текущая версия скрипта меньше, чем указанная в файле обновления, то
then
0AF8: samp add_message_to_chat "Доступна новая версия обновления №%d для {FFFF00}cleo_name" color -1 3@ // Оповещаем
0AC8: 4@ = allocate_memory_size 260 // Выделяем память под URL загрузки файла
0C11: memset destination 4@ value 0 size 260 // Очищаем от ненужных символов(на всякий случай)
0AF4: 4@ = read_string_from_ini_file UPDATEINFO_FILE section "UPDATE" key "changelog_url" // Читаем URL загрузки списка изменений
0C65: 1@ = download_url 4@ to_file CHANGELOG_FILE // Скачиваем список изменений
0AB1: call_scm_func @download_check_status 1 download_n 1@ status_to 2@ // ждем окончание загрузки
0C7D: release_download 1@ //
if 2@ == 0
then
0AB1: call_scm_func @show_changelog 0
end
// -------
0C11: memset destination 4@ value 0 size 260 //
0AF4: 4@ = read_string_from_ini_file UPDATEINFO_FILE section "UPDATE" key "script_url" //
0C65: 1@ = download_url 4@ to_file "cleo/cleo_name.cs" // Скачиваем новую версию скрипта и заменяем текущий скрипт
0AB1: call_scm_func @download_check_status 1 download_n 1@ status_to 2@ //
0C7D: release_download 1@ //
if 2@ == 0
then
0AF8: samp add_message_to_chat "Обновление завершено." color -1
else
0AF8: samp add_message_to_chat "Произошла ошибка при обновлении." color -1
end
0AC9: free_allocated_memory 4@
end
end
end
0AB2: ret 0
:show_changelog // Отдельная функция для показа списка изменений
if 0A9A: 0@ = openfile CHANGELOG_FILE mode "rt" // Открываем файл для чтения
then
0AC8: 1@ = allocate_memory_size 96 // Выделяем память под строки из файла
0C11: memset destination 1@ value 0 size 96
0A9C: 2@ = file 0@ size // получаем размер файла
2@++ // последний символ - нулевой
0AC8: 4@ = allocate_memory_size 2@ // Выделяем память под список изменений
0C11: memset destination 4@ value 0 size 2@
repeat
0AD7: read_string_from_file 0@ to 1@ size 95
0C17: 3@ = strlen 1@
if 3@ > 0
then
0C15: strcat destination 4@ source 1@ // Прикрепляем строку из файла в буфер со списком изменений
end
until 0AD6: end_of_file 0@ reached
0B3B: samp show_dialog id 335 caption "{FFFF00}Список изменений {FFFFFF}cleo_name" text 4@ button_1 "ОК" button_2 "" style 0 // Показываем диалог
0AC9: free_allocated_memory 4@ // Далее не используется
0AC9: free_allocated_memory 1@ //
0A9B: closefile 0@ // Закрываем файл
end
0AB2: ret 0
SiTrak
Известный
- 193
- 251
- 3,635
- 4,965
Shindji
Известный
- 115
- 6
LinkelnAweil
Участник
- 122
- 7
LinkelnAweil
Участник
- 122
- 7
Royan_Millans
Известный
- 145
- 182
Если ты этого не понимаешь, начни с чего-нибудь попроще
CLEO:
0A9A: 0@ = openfile "MyFile.txt" mode "r"
Последнее редактирование модератором:
