Автор |
Сообщение |
Conan Fedr
Разведчик
Пришел: 02.12.2004
Сообщения: 110
Откуда: Из тех ворот откуда весь народ :)
|
Добавлено: 04 сентября 2005, 20:08 |
![[?]](templates/subSilver/images/lang_russian/icon_profile.gif "Посмотреть профиль")
![[PM]](templates/subSilver/images/lang_russian/icon_pm.gif "Отправить личное сообщение")
![[M]](templates/subSilver/images/lang_russian/icon_email.gif "Отправить e-mail")
![[m]](templates/subSilver/images/lang_russian/icon_msnm.gif "MSN Messenger")
![[i]](templates/subSilver/images/lang_russian/icon_icq_add.gif "Номер ICQ")
![[«»]](templates/subSilver/images/lang_russian/icon_quote.gif "Ответить с цитатой")
|
|
Вот скрипт моего квста :
*************************************************************
GlobalVars (
NULL : object,
VSS#i#val : object,
i : object
)
DeclareScript VCheck#3#2 ( this : object )
DeclareScript VTriger#3#3 ( this : object )
DeclareScript VTriger#3#4 ( this : object )
DeclareScript VTriger#3#5 ( this : object )
Script VCheck#3#2
(
if
(
IsEqual( GetLeverState( "GetObject(5636)" ) , 1 )
)
then
(
KillScript( )
VTriger#3#3( this )
)
)
Script VTriger#3#3
(
if
(
)
then
(
KillScript( )
ConsoleString( "Ворота открыты - забрать ключ" )
EraseQuestItem( 0, 29 )
)
)
Script VCheck#3#4
(
if
(
IsEqual( GetLeverState( "GetObject(right_crystal1)" ) , 1 )
IsEqual( GetLeverState( "GetObject(right_crystal2)" ) , 1 )
IsEqual( GetLeverState( "GetObject(right_crystal3)" ) , 1 )
IsEqual( GetLeverState( "GetObject(right_crystal4)" ) , 1 )
)
else
(
ConsoleString( "Все кристалы собраны образец готов" )
GiveQuestItem(0,"leftcrystal")
)
)
Script VTriger#3#5
(
if
(
)
then
(
KillScript( )
QStart( "z12q6" )
QObjGetItem(29)
QObjUse( "GetObject(5636)", 1 )
QObjGetItem(21)
QFinish( )
)
)
WorldScript
(
Sleep( 2 )
VTriger#3#1( NULL )
VCheck#3#2( NULL )
VTriger#3#4( NULL )
VTriger#3#5( NULL )
)
************************************************************* |
|
 |
Снайпер
Зеленый гипатский зануда
Пришел: 18.01.2004
Сообщения: 3420
Откуда: Кызыл
|
|
Добавлено: 04 сентября 2005, 20:11 |
![[w]](templates/subSilver/images/lang_russian/icon_www.gif "Посетить сайт автора")
|
|
Молодец... Лучше, чем Артём, однако можно было бы состряпать нечто более убедительное и с МРТ 
_________________
Я желаю всем счастья! |
|
|
Conan Fedr
Разведчик
Пришел: 02.12.2004
Сообщения: 110
Откуда: Из тех ворот откуда весь народ :)
|
|
Добавлено: 04 сентября 2005, 20:11 |
|
|
сорри тут одна ошибка я забыл удалить  вызов функции AddMob
*********************
WorldScript
(
Sleep( 2 )
Вот это удалено VTriger#3#1( NULL )
VCheck#3#2( NULL )
VTriger#3#4( NULL )
VTriger#3#5( NULL )
)
************************ |
|
|
Снайпер
Зеленый гипатский зануда
Пришел: 18.01.2004
Сообщения: 3420
Откуда: Кызыл
|
|
Добавлено: 04 сентября 2005, 20:17 |
|
|
Это все равно работать не будет - ПЗ не поддерживает else.
_________________
Я желаю всем счастья! |
|
|
Conan Fedr
Разведчик
Пришел: 02.12.2004
Сообщения: 110
Откуда: Из тех ворот откуда весь народ :)
|
|
Добавлено: 04 сентября 2005, 20:21 |
|
|
GlobalVars (
NULL : object,
VSS#i#val : object,
i : object
)
DeclareScript VCheck#3#2 ( this : object )
DeclareScript VTriger#3#3 ( this : object )
DeclareScript VTriger#3#4 ( this : object )
DeclareScript VTriger#3#5 ( this : object )
Script VCheck#3#2
(
if
(
IsEqual( GetLeverState( GetObject(5636) ) , 1 )
)
then
(
KillScript( )
VTriger#3#3( this )
)
)
Script VTriger#3#3
(
if
(
)
then
(
KillScript( )
ConsoleString( "Ворота открыты - забрать ключ" )
EraseQuestItem( 0, 29 )
)
)
Script VTriger#3#4
(
if
(
IsEqual( GetLeverState( GetObject(right_crystal1) ) , 1 )
IsEqual( GetLeverState( GetObject(right_crystal2) ) , 1 )
IsEqual( GetLeverState( GetObject(right_crystal3) ) , 1 )
IsEqual( GetLeverState( GetObject(right_crystal4) ) , 1 )
)
then
(
ConsoleString( "Все кристалы собраны образец готов" )
GiveQuestItem(0,"leftcrystal")
)
)
Script VTriger#3#5
(
if
(
)
then
(
KillScript( )
QStart( "z12q6" )
QObjGetItem(29)
QObjUse( "GetObject(5636)", 1 )
QObjGetItem(21)
QFinish( )
)
)
WorldScript
(
Sleep( 2 )
VCheck#3#2( NULL )
VTriger#3#4( NULL )
VTriger#3#5( NULL )
) |
|
|
Conan Fedr
Разведчик
Пришел: 02.12.2004
Сообщения: 110
Откуда: Из тех ворот откуда весь народ :)
|
|
Добавлено: 05 сентября 2005, 07:56 |
|
|
Я вот хочу узнать правильно ли я думаю как ПЗ скрипт пашет :
ЗАГРУЗКА МОБА
1. Выполняется Блок GlobalVars( обьявление переменных ) .
2. Выполняется Блок WorldScript( Присваивания , вызов функций ) . помоему блок WorldScript( ) идентичен void main{ while(true){ код } } вот такому коде на С++ , тоесть это бесконечный цикл .
3. Выполняются вызываимые функции после конаца кода функции если из нее не происходило вызова другой функции , вызывается функция которая следует за это в WorldScript( ) а не которая стоит ниже этой физически .
Правильно я думаю ? Подскажите не побрезгайте пожалуйста . |
|
|
Conan Fedr
Разведчик
Пришел: 02.12.2004
Сообщения: 110
Откуда: Из тех ворот откуда весь народ :)
|
|
Добавлено: 05 сентября 2005, 08:03 |
|
|
А вот теперь я хотел бы узнать если я надеюсь я правильно думаю как работает скрипт ПЗ почему неработает блок скрипта у меня ? Сейчас все обьясню . Только пожалуйста неговорите " сначала сам попробуй разок другой а затем у нас спрашивай " так как я просмотрел скрипты практически всех мобов .
Вот приведу кусок кода который меня интерисует :
НАЧАЛО КОДА
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Script VTriger#3#1
(
if
(
)
then
(
KillScript( )
AddMob( "z12q6_c1.mob" )
AddMob( "z12q6_c2.mob" )
AddMob( "z12q6_c3.mob" )
AddMob( "z12q6_c4.mob" )
)
)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
КОД
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
WorldScript
(
Sleep( 2 )
VTriger#3#1( NULL )
VCheck#3#2( NULL )
VTriger#3#4( NULL )
VTriger#3#5( NULL )
)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
КОНЕЦ
Почему мобы неподгружаются ? Через консоль подгружаются а следовательно мобы рабочие , а через скрипт неподгружаются . Подскажите пожалуйста что нетак . |
|
|
Sagrer
Убийца троллей
Пришел: 24.12.2001
Сообщения: 3548
Откуда: Курск
|
|
Добавлено: 05 сентября 2005, 12:56 |
|
|
| а ты уверен что скрипт вообще работает? |
|
|
Conan Fedr
Разведчик
Пришел: 02.12.2004
Сообщения: 110
Откуда: Из тех ворот откуда весь народ :)
|
|
Добавлено: 05 сентября 2005, 14:13 |
|
|
| Как я могу быть уверен в том что он работает если он неработает ? |
|
|
Conan Fedr
Разведчик
Пришел: 02.12.2004
Сообщения: 110
Откуда: Из тех ворот откуда весь народ :)
|
|
Добавлено: 05 сентября 2005, 14:50 |
|
|
Вот полный скрипт :
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
GlobalVars (
NULL : object,
VSS#i#val : object,
i : object
)
DeclareScript VTriger#3#1 ( this : pbject )
DeclareScript VCheck#3#2 ( this : object )
DeclareScript VTriger#3#3 ( this : object )
DeclareScript VTriger#3#4 ( this : object )
DeclareScript VTriger#3#5 ( this : object )
Script VTriger#3#1
(
if
(
)
then
(
KillScript( )
AddMob( "z12q6_c1.mob" )
AddMob( "z12q6_c2.mob" )
AddMob( "z12q6_c3.mob" )
AddMob( "z12q6_c4.mob" )
)
)
Script VCheck#3#2
(
if
(
IsEqual( GetLeverState( GetObject(5636) ) , 1 )
)
then
(
KillScript( )
VTriger#3#3( this )
)
)
Script VTriger#3#3
(
if
(
)
then
(
KillScript( )
ConsoleString( "Ворота открыты - забрать ключ" )
EraseQuestItem( 0, 29 )
)
)
Script VTriger#3#4
(
if
(
IsEqual( GetLeverState( GetObject(1890) ) , 1 )
IsEqual( GetLeverState( GetObject(1891) ) , 1 )
IsEqual( GetLeverState( GetObject(1892) ) , 1 )
IsEqual( GetLeverState( GetObject(1893) ) , 1 )
)
then
(
ConsoleString( "Все кристалы собраны образец готов" )
GiveQuestItem(0,"rightcrystal")
)
)
Script VTriger#3#5
(
if
(
)
then
(
KillScript( )
QStart( "z12q6" )
QObjGetItem(29)
QObjUse( "GetObject(5636)", 1 )
QObjGetItem(21)
QFinish( )
)
)
WorldScript
(
Sleep( 2 )
VTriger#3#1( NULL )
VCheck#3#2( NULL )
VTriger#3#4( NULL )
VTriger#3#5( NULL )
)
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ |
|
|
Sagrer
Убийца троллей
Пришел: 24.12.2001
Сообщения: 3548
Откуда: Курск
|
|
Добавлено: 05 сентября 2005, 19:17 |
|
|
| кириллицу нельзя выводить в консоль. Тоесть в теории можно, иногда выводится, а иногда скрипт перестает выполняться... |
|
|
Снайпер
Зеленый гипатский зануда
Пришел: 18.01.2004
Сообщения: 3420
Откуда: Кызыл
|
|
Добавлено: 05 сентября 2005, 20:06 |
|
|
Потому, что русские символы не считаются типом string
_________________
Я желаю всем счастья! |
|
|
Sagrer
Убийца троллей
Пришел: 24.12.2001
Сообщения: 3548
Откуда: Курск
|
|
Добавлено: 05 сентября 2005, 21:37 |
|
|
| Цитата: |
Потому, что русские символы не считаются типом string
|
ну это хз.... иногда текст выводится, и текст в кавычках воспринимается правильно..... |
|
|
Снайпер
Зеленый гипатский зануда
Пришел: 18.01.2004
Сообщения: 3420
Откуда: Кызыл
|
|
Добавлено: 05 сентября 2005, 21:59 |
|
|
Я в консоли проверял эту команду - оно говорило:
string value expected!
На основании чего я и сделал этот вывод 
_________________
Я желаю всем счастья! |
|
|
Conan Fedr
Разведчик
Пришел: 02.12.2004
Сообщения: 110
Откуда: Из тех ворот откуда весь народ :)
|
|
Добавлено: 06 сентября 2005, 14:41 |
|
|
| Все скрипт пашет Етить . Плиз примите меня в ГГ я хочу клевые квесты делать ! Этот квест пашет тока он еще неотшлифован . Примите меня в ГГ плизззз |
|
|
Android Alpha
Убийца троллей
Пришел: 04.09.2002
Сообщения: 3219
Откуда: Москва
|
|
Добавлено: 06 сентября 2005, 20:24 |
|
|
Квесты типа "Голимо, чувак" никому не нужны.
Стремление произвести качественный продукт - ценится. А ацтой - он и есть ацтой, хоть ты над текстом не парился, а сделал только скрипт (и то, с многочисленными подсказками).
Реализуй нормальный квест, я тебе уже сказал. И реализуй сам, благо, основам тебя научили уже.
Какой квест?.. Можно провести голосование. Или просто попросить модератора форума ткнуть на вменяемый квест (уж это вообще не сложно).
_________________
Человек - существо без перьев, двуногое, с плоскими ногтями. (с) Платон |
|
|
MX
Опытный воин
Пришел: 04.10.2004
Сообщения: 635
Откуда: Брянск
|
|
Добавлено: 06 сентября 2005, 23:29 |
|
|
Комментирую по частям...
Спасибо всем жителям Гипата(за этой фразой должен идти низкий поклон)
Уровень образованности и культуры, видимо...
| Цитата: | | Плиз примите меня в ГГ я хочу клевые квесты делать ! |
Раз хочешь- сделай, а потом уже будет видно...
| Цитата: | | Этот квест пашет тока он еще неотшлифован |
Правильно! Не царское это дело- горшки подмывать... Пущай другие шлифуют, а ты у нас клевые квесты будешь делать...
| Цитата: | | Примите меня в ГГ плизззз |
Сколько не говори халва...
АА умные вещи говорит. Сделай хороший самостоятельно... |
|
|
Conan Fedr
Разведчик
Пришел: 02.12.2004
Сообщения: 110
Откуда: Из тех ворот откуда весь народ :)
|
|
Добавлено: 07 сентября 2005, 07:36 |
|
|
| Уважаемый MX я несказал , что несобираюсь квеста доделывать , и несказал что я собираюсь давать его комуто на отшлифовку ,но а что насчет моих фраз - мне проста нравиться так говорить и прошу это больше не коминтировать . |
|
|
MX
Опытный воин
Пришел: 04.10.2004
Сообщения: 635
Откуда: Брянск
|
|
Добавлено: 07 сентября 2005, 11:12 |
|
|
Не могу удержаться...
не сказал
не собираюсь
не сказал
кому-то
просто
а это совсем замечательно! 
Продолжать можно долго, есть еще знаки препинания и построение предложений... Хотя о чем это я... у нас же свобода слова... |
|
|
Conan Fedr
Разведчик
Пришел: 02.12.2004
Сообщения: 110
Откуда: Из тех ворот откуда весь народ :)
|
|
Добавлено: 07 сентября 2005, 12:20 |
|
|
| MX я смотрю ты вумный як вутка етить |
|
|
|
