Главная Форум Файлы

Вернуться   Mafia-Game Forum > Mafia: The City Of Lost Heaven > Скриптинг
Расширенный поиск

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
Старый 04.10.2020, 20:24   #11
Firefox3860 вне форума Firefox3860
Аватар для Firefox3860
Mafia Modding Crew
Сообщений: 687
Репутация: 771
Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold
Priest
Информация о репутации (Firefox3860)
×
За активное участие в жизни форума и помощь пользователям вы можете получить очки репутации. За определённое количество очков репутации вам будет присвоенно соответствующее звание. Полученное звание всегда будет отображаться в нижней части области Вашего профиля, слева от сообщения.
Detective
0
Gangster
55
Thug
100
Judge
159
Enforcer
260
Firefox3860 / 771
Priest
396
Snitch
780
Hitman
800
Councilor
1200
Deputy
2501
Overseer
4896
Press
6020
Don
20000
Kaiser, пробелы убрал
цитата
Поблагодарил:
Kaiser (04.10.2020)
Старый 04.10.2020, 20:28   #12
Kaiser вне форума Kaiser
Аватар для Kaiser
Mafia Modding Crew
Сообщений: 229
Репутация: 242
Kaiser has a spectacular aura about Kaiser has a spectacular aura about Kaiser has a spectacular aura about
Judge
Информация о репутации (Kaiser)
×
За активное участие в жизни форума и помощь пользователям вы можете получить очки репутации. За определённое количество очков репутации вам будет присвоенно соответствующее звание. Полученное звание всегда будет отображаться в нижней части области Вашего профиля, слева от сообщения.
Detective
0
Gangster
55
Thug
100
Kaiser / 242
Judge
159
Enforcer
260
Priest
396
Snitch
780
Hitman
800
Councilor
1200
Deputy
2501
Overseer
4896
Press
6020
Don
20000
2 KlassenAS

На самом деле очень круто получилось, все прекрасно работает. Проверил неоднократно. Спасибо тебе большое, с твоего разрешения, использую этот скрипт в своем дополнении к Angel Pine Mod.

п.с.Плохо только то, что скрипт постоянно сначала начинается, при каждой очередной посадке в автомобиль. Так наверное никогда радио до конца не дослушать))).
__________________
Моя моддинговая страничка: https://vk.com/kaiser_edition
цитата
Старый 04.10.2020, 20:29   #13
KlassenAS вне форума KlassenAS
Аватар для KlassenAS
Senior Member
Сообщений: 341
Репутация: 287
KlassenAS is a jewel in the rough KlassenAS is a jewel in the rough KlassenAS is a jewel in the rough
Enforcer
Информация о репутации (KlassenAS)
×
За активное участие в жизни форума и помощь пользователям вы можете получить очки репутации. За определённое количество очков репутации вам будет присвоенно соответствующее звание. Полученное звание всегда будет отображаться в нижней части области Вашего профиля, слева от сообщения.
Detective
0
Gangster
55
Thug
100
Judge
159
KlassenAS / 287
Enforcer
260
Priest
396
Snitch
780
Hitman
800
Councilor
1200
Deputy
2501
Overseer
4896
Press
6020
Don
20000
Цитата:
Сообщение от Firefox3860 Посмотреть сообщение
Kaiser, пробелы убрал
Это у меня со второй вышки привычка осталась, когда Delphi изучал. С пробелами и заглавными буквами читаемость кода улучшается, переменные и операторы не сливаются в единый поток. Delphi к пробелам лоялен, а вот движок Мафии закапризничал )

Цитата:
Сообщение от Kaiser Посмотреть сообщение
п.с.Плохо только то, что скрипт постоянно сначала начинается, при каждой очередной посадке в автомобиль. Так наверное никогда радио до конца не дослушать))).
По идее, есть ещё команда Stream_Pause
Так что, можно заморочиться и при выходе из машины паузить скрипт. Ввести дополнительные переменные для отслеживания проигрываемого стрима на паузе, чтобы не создавать заново и не дестроить его лишний раз. Отслеживать окончание воспроизведения и перезапускать.
Но тогда возникает вопрос: не появится ли баг с ненужным воспроизведением при нажатии ESC, о котором упомянул GOLOD55?

Последний раз редактировалось KlassenAS; 04.10.2020 в 20:39.
цитата
Поблагодарили: 2
Firefox3860 (04.10.2020), Kaiser (04.10.2020)
Старый 04.10.2020, 20:36   #14
Firefox3860 вне форума Firefox3860
Аватар для Firefox3860
Mafia Modding Crew
Сообщений: 687
Репутация: 771
Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold Firefox3860 is a splendid one to behold
Priest
Информация о репутации (Firefox3860)
×
За активное участие в жизни форума и помощь пользователям вы можете получить очки репутации. За определённое количество очков репутации вам будет присвоенно соответствующее звание. Полученное звание всегда будет отображаться в нижней части области Вашего профиля, слева от сообщения.
Detective
0
Gangster
55
Thug
100
Judge
159
Enforcer
260
Firefox3860 / 771
Priest
396
Snitch
780
Hitman
800
Councilor
1200
Deputy
2501
Overseer
4896
Press
6020
Don
20000
Цитата:
Сообщение от KlassenAS Посмотреть сообщение
С пробелами и заглавными буквами читаемость кода улучшается, переменные и операторы не сливаются в единый поток. Delphi к пробелам лоялен, а вот движок Мафии закапризничал )
Ага, а я привык без пробелов лепить Мне кажется, в выражениях Flt[х] не прокатил пробел.

Цитата:
Сообщение от Kaiser Посмотреть сообщение
Плохо только то, что скрипт постоянно сначала начинается, при каждой очередной посадке в автомобиль. Так наверное никогда радио до конца не дослушать))).
А может кто-нибудь знает, можно ли такой стрим на паузу ставить или вообще отключать звук на время?
цитата
Поблагодарил:
Kaiser (04.10.2020)
Старый 04.10.2020, 20:40   #15
KlassenAS вне форума KlassenAS
Аватар для KlassenAS
Senior Member
Сообщений: 341
Репутация: 287
KlassenAS is a jewel in the rough KlassenAS is a jewel in the rough KlassenAS is a jewel in the rough
Enforcer
Информация о репутации (KlassenAS)
×
За активное участие в жизни форума и помощь пользователям вы можете получить очки репутации. За определённое количество очков репутации вам будет присвоенно соответствующее звание. Полученное звание всегда будет отображаться в нижней части области Вашего профиля, слева от сообщения.
Detective
0
Gangster
55
Thug
100
Judge
159
KlassenAS / 287
Enforcer
260
Priest
396
Snitch
780
Hitman
800
Councilor
1200
Deputy
2501
Overseer
4896
Press
6020
Don
20000
Цитата:
Сообщение от Firefox3860 Посмотреть сообщение
А может кто-нибудь знает, можно ли такой стрим на паузу ставить или вообще отключать звук на время?
Только что предыдущее сообщение отредактировал, ответив на этот вопрос )

Ну-ка, попробуй такой вариант:

Развернуть для просмотра

Dim_Act 2
Dim_Flt 3
GetActivePlayer 0
FindActor 1, "fire"

Let Flt[0]=0
Let Flt[1]=0
Let Flt[2]=0 //Для паузы

Label CHECK
Wait 100
CompareOwnerWithEx 0,1,-,CAR_OUT

If Flt[0]=0,-,CHECK
CityMusic_Off
If Flt[2]=0,-1,ALREADYCREATED //Проверяем, создан ли уже поток, вдруг он на паузе
Stream_Create 1, "sounds\music\fireradio.ogg"
Label ALREADYCREATED //Поток уже создан
Stream_Play 1
Let Flt[0]=1
Let Flt[2]=0
Wait 2000
GoTo CHECK

Label CAR_OUT
If Flt[0]=1,-,CHECK
Stream_Pause 1
Let Flt[2]=1 //Запоминаем, что на паузе
CityMusic_On
Let Flt[0]=0
Wait 2000
GoTo CHECK
[свернуть]


Теперь он должен ставить на паузу и возобновлять воспроизведение.
Проверь, нет ли бага с клавишей ESC, когда аудиопоток на паузе.
Пока простой вариант, без проверки окончания воспроизведения.

Последний раз редактировалось KlassenAS; 04.10.2020 в 20:57.
цитата
Поблагодарил:
Kaiser (04.10.2020)
Старый 04.10.2020, 21:08   #16
Kaiser вне форума Kaiser
Аватар для Kaiser
Mafia Modding Crew
Сообщений: 229
Репутация: 242
Kaiser has a spectacular aura about Kaiser has a spectacular aura about Kaiser has a spectacular aura about
Judge
Информация о репутации (Kaiser)
×
За активное участие в жизни форума и помощь пользователям вы можете получить очки репутации. За определённое количество очков репутации вам будет присвоенно соответствующее звание. Полученное звание всегда будет отображаться в нижней части области Вашего профиля, слева от сообщения.
Detective
0
Gangster
55
Thug
100
Kaiser / 242
Judge
159
Enforcer
260
Priest
396
Snitch
780
Hitman
800
Councilor
1200
Deputy
2501
Overseer
4896
Press
6020
Don
20000
2 KlassenAS

Я проверил. Все работает!!! Спасибо тебе огромное, теперь у меня в дополнение будет прям идеальное радио. Все отлично! Выходишь из машины, радио выключается, садишься в машину, продолжается с того момента, когда ты вышел из автомобиля. Я как раз не успел радио запихнуть в ЭП. Теперь выпущу в виде дополнения, в РидМи укажу, что скрипт твой.
__________________
Моя моддинговая страничка: https://vk.com/kaiser_edition
цитата
Поблагодарили: 2
EmptyBowl (07.10.2020), KlassenAS (04.10.2020)
Старый 04.10.2020, 21:11   #17
KlassenAS вне форума KlassenAS
Аватар для KlassenAS
Senior Member
Сообщений: 341
Репутация: 287
KlassenAS is a jewel in the rough KlassenAS is a jewel in the rough KlassenAS is a jewel in the rough
Enforcer
Информация о репутации (KlassenAS)
×
За активное участие в жизни форума и помощь пользователям вы можете получить очки репутации. За определённое количество очков репутации вам будет присвоенно соответствующее звание. Полученное звание всегда будет отображаться в нижней части области Вашего профиля, слева от сообщения.
Detective
0
Gangster
55
Thug
100
Judge
159
KlassenAS / 287
Enforcer
260
Priest
396
Snitch
780
Hitman
800
Councilor
1200
Deputy
2501
Overseer
4896
Press
6020
Don
20000
Цитата:
Сообщение от Kaiser Посмотреть сообщение
2 KlassenAS

Я проверил. Все работает!!!
1 А проверил, нет ли бага с ESC?
2 Если работает без багов, то его ещё доделать надо ) Чтобы по окончании мелодии начинал воспроизведение заново. Он, по логике, не должен сам понимать, что песня закончилась. Доиграл, - и всё )
3 И вообще, тебе что, хватает одной мелодии? Давай, заморочимся, чтобы несколько было, с рандомным воспроизведением )

Последний раз редактировалось KlassenAS; 04.10.2020 в 21:13.
цитата
Старый 04.10.2020, 21:17   #18
Kaiser вне форума Kaiser
Аватар для Kaiser
Mafia Modding Crew
Сообщений: 229
Репутация: 242
Kaiser has a spectacular aura about Kaiser has a spectacular aura about Kaiser has a spectacular aura about
Judge
Информация о репутации (Kaiser)
×
За активное участие в жизни форума и помощь пользователям вы можете получить очки репутации. За определённое количество очков репутации вам будет присвоенно соответствующее звание. Полученное звание всегда будет отображаться в нижней части области Вашего профиля, слева от сообщения.
Detective
0
Gangster
55
Thug
100
Kaiser / 242
Judge
159
Enforcer
260
Priest
396
Snitch
780
Hitman
800
Councilor
1200
Deputy
2501
Overseer
4896
Press
6020
Don
20000
1. Нет. Сейчас проверю. (Все работает нормально).
2. А ты можешь зациклить воспроизведение?
3. Там не одна песня. Там на час музыки и болтовни. Как выйдет дополнение, зацени)))
__________________
Моя моддинговая страничка: https://vk.com/kaiser_edition

Последний раз редактировалось Kaiser; 04.10.2020 в 21:19.
цитата
Старый 04.10.2020, 21:23   #19
KlassenAS вне форума KlassenAS
Аватар для KlassenAS
Senior Member
Сообщений: 341
Репутация: 287
KlassenAS is a jewel in the rough KlassenAS is a jewel in the rough KlassenAS is a jewel in the rough
Enforcer
Информация о репутации (KlassenAS)
×
За активное участие в жизни форума и помощь пользователям вы можете получить очки репутации. За определённое количество очков репутации вам будет присвоенно соответствующее звание. Полученное звание всегда будет отображаться в нижней части области Вашего профиля, слева от сообщения.
Detective
0
Gangster
55
Thug
100
Judge
159
KlassenAS / 287
Enforcer
260
Priest
396
Snitch
780
Hitman
800
Councilor
1200
Deputy
2501
Overseer
4896
Press
6020
Don
20000
Цитата:
Сообщение от Kaiser Посмотреть сообщение
2. А ты можешь зациклить воспроизведение?
Для этого тоже команда есть ) Stream_SetLoop x,y

Цитата:
Сообщение от Kaiser Посмотреть сообщение
3. Там не одна песня. Там на час музыки и болтовни. Как выйдет дополнение, зацени)))
А, ну если там целый радиоэфир, то это ж совсем другой калинкор )

Вот тебе с зацикливанием, всего одну команду дописал:

Развернуть для просмотра

Dim_Act 2
Dim_Flt 3
GetActivePlayer 0
FindActor 1, "fire"

Let Flt[0]=0
Let Flt[1]=0
Let Flt[2]=0 //Для паузы

Label CHECK
Wait 100
CompareOwnerWithEx 0,1,-,CAR_OUT

If Flt[0]=0,-,CHECK
CityMusic_Off
If Flt[2]=0,-1,ALREADYCREATED //Проверяем, создан ли уже поток, вдруг он на паузе
Stream_Create 1, "sounds\music\fireradio.ogg"
Stream_SetLoop 1,1 //Зацикливаем
Label ALREADYCREATED //Поток уже создан
Stream_Play 1
Let Flt[0]=1
Let Flt[2]=0
Wait 2000
GoTo CHECK

Label CAR_OUT
If Flt[0]=1,-,CHECK
Stream_Pause 1
Let Flt[2]=1 //Запоминаем, что на паузе
CityMusic_On
Let Flt[0]=0
Wait 2000
GoTo CHECK
[свернуть]

Последний раз редактировалось KlassenAS; 04.10.2020 в 21:24.
цитата
Поблагодарили: 3
EmptyBowl (07.10.2020), Firefox3860 (04.10.2020), Kaiser (04.10.2020)
Старый 04.10.2020, 21:26   #20
Kaiser вне форума Kaiser
Аватар для Kaiser
Mafia Modding Crew
Сообщений: 229
Репутация: 242
Kaiser has a spectacular aura about Kaiser has a spectacular aura about Kaiser has a spectacular aura about
Judge
Информация о репутации (Kaiser)
×
За активное участие в жизни форума и помощь пользователям вы можете получить очки репутации. За определённое количество очков репутации вам будет присвоенно соответствующее звание. Полученное звание всегда будет отображаться в нижней части области Вашего профиля, слева от сообщения.
Detective
0
Gangster
55
Thug
100
Kaiser / 242
Judge
159
Enforcer
260
Priest
396
Snitch
780
Hitman
800
Councilor
1200
Deputy
2501
Overseer
4896
Press
6020
Don
20000
Блин, ну теперь надо час играть, чтобы посмотреть, работает ли воспроизведение)) Сегодня точно тебе не дам ответ)
__________________
Моя моддинговая страничка: https://vk.com/kaiser_edition
цитата
Поблагодарил:
KlassenAS (04.10.2020)
Ответ

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Регистрация
×
Чтобы оставлять на форуме Mafia-Game Forum сообщения, необходимо сначала зарегистрироваться.
Пожалуйста, укажите ваше имя пользователя, адрес электронной почты и прочую обязательную информацию о себе в форме ниже.
Имя:
Пароль / Адрес электронной почты
Пароль:
Подтвердите пароль:
Адрес электронной почты:
Подтвердите адрес:
Реферер
Если вы пришли на этот форум по совету одного из участников, то, пожалуйста, введите его имя пользователя.
Реферер:
Время на форуме может быть выставлено в соответствии с тем, где вы находитесь. Выберите свой часовой пояс из списка ниже.
Учитывать переход на летнее или зимнее время (DST).
Получать электронные письма
Время от времени администрация может посылать вам сообщения по электронной почте.

Если вы не хотите получать эти сообщения, отключите эту опцию.
Разрешить другим участникам писать вам по электронной почте.
Правила форума

Текущее время: 16:11. Часовой пояс GMT +3.

Powered by vBulletin® Version 3.8.11 Release Candidate 2
Copyright ©2000 - 2024, vBulletin Solutions Inc. Перевод: zCarot (VK2425)