QSP - Как сделать?

ejikplains #2161 18.05.2019 04:58 (6 years ago)

Еще один вопрос:
Хочу сделать прыжки по коду с актами. Есть ли команда, которая останавливает дальнейшее выполнение кода?
Что-то типа такого:

текст текст текст
act 'что-то сделать':
	*clr
	текст 
	текст
	jump '123'
end 
стоп код
:123
act 'что-то тут сделать':
	*clr
	текст
	текст
	jump '321'
end
стоп код
:321
act 'еще что-то': 
	*clr
	текст
	текст
end

иначе получается, что все действия (act) прописываются сразу при входе в локацию

Dominus #1062 18.05.2019 04:58 (6 years ago)

ejikplains,
Пишешь

wait 3000

И три секунды код в принципе не выполняется, как и возможность игрока что-то делать.
Прямой пример:

Spoiler

'текст текст текст'
act 'что-то сделать': 
    *clr 
    'текст' 
    'текст'
    wait 3000
end

act 'что-то тут сделать': 
    *clr 
    'текст' 
    'текст' 
    wait 5000 
end 

act 'еще что-то': 
    *clr 
    'текст' 
    'текст'
    wait 2000
end

А можно и так)

Spoiler

'- Мы ведь ведём с вами разумный разговор?'
act '- Это что ещё за оборот речи такой?': dialog45 = 2 & gt curloc
if dialog45=2:
*clr
cla
'- От детворы услышал. Показалось вразумительным объяснением происходящего.'
act '- Нет, ну вы гений!': dialog45=4 & gt curloc
act '- Да простит меня Иисус, но Вы, крайне неодобрительный персонаж.': dialog45=3 & gt curloc
end
if dialog45=3:
*clr
cla
'Затянулась драка, никто не смог предугадать победителя.'
wait 7000
'Победитель ...!'
end
if dialog45=4:
*clr
cla
'- На том и порешили.'
end

ejikplains #2161 18.05.2019 04:58 (6 years ago)

Dominus #1062 18.05.2019 04:58 (6 years ago)

ejikplains #2161 18.05.2019 04:58 (6 years ago)

получилось крч! Мучался, да тему накопал, где, как и думал, act служит в виде контейнера для кода, но это можно обойти.
jump работает вроде в обе стороны, но заместо него умельцы придумали другое решение. Ниже код, благодаря которому можно переходы делать.

IF $args[0]<>'': JUMP $args[0]
:ccc
'ты тут'
act 'иди дальше':
	cla
	*clr
	'пришел'
	gs $CURLOC,'ppp'
end 
exit
:ppp
act 'иди назад':
	cla
	*clr
	gs $CURLOC,'ccc'
end 
exit

команда exit принудительно останавливает код и его дальнейшее исполнение, а заместо jump исполняется gs $CURLOC,’ccc’, с присвоением IF $args[0]<>’’: JUMP $args[0]
Теперь поясню для чего это нужно:
1)Игрок путешествует в пределах одной локации, которой присвоил имя “глава первая”. Это и удобно и работоспособно. К тому же работа с инвентарем по прежнему активна через взаимодействие с актами(act), а реализацию пропусков(нашел предмет - прошел куда-либо. не нашел - не прошел) легко делается для всей главы в начале при помощи присвоений и изменений 1 или 0.
2)При работе с большим кодом, множество if могут заметно увеличить время “обдумывания” и исполнения. Когда работает if, то до конца кода все ифы проверяются на соответствие. Именно поэтому намного лучше остановить код для дальнейшего исполнения вообще. тогда будет осуществляться только поверхностный поиск меток и при исполнении сразу стоп. Если хочешь понять о чем я говорю, то для эксперимента выполни ниже у себя код:

a = RAND(1, 50)
if a=1:
 'у нас число 1'
end
...
...!вручную пропиши от 1 до 50
... 
if a=50:
 'у нас число 50'
end

3)Еще прост привык к notepad++ с его ctrl+h. наставил спецсимволов везде у текста, где нужно, все позаменил и сидишь куришь в потолок))))

ejikplains #2161 18.05.2019 04:58 (6 years ago)

Nex Moderator 18.05.2019 04:58 (6 years ago)

ejikplains,

GOSUB 'матрица'

Т

Тупой #2166 18.05.2019 04:58 (6 years ago)

Aleks Versus Moderator 18.05.2019 04:58 (6 years ago)

Чувак,
тебе поможет вопрос, который задан в соседней теме https://qsp.org/forum/comments/23051 что такое ARGs и с чем его едят.

Когда выполняем код

gosub $curloc,'ААА'

плеер заглядывает повторно на текущую локацию и встречает строку кода

IF $args[0]<>'': JUMP $args[0]

$args[0] в этот момент для него равен “ААА”, и он прыгает к указанной метке.
От метки и до конца локации плеер выполняет весь код и, поскольку мы использовали gosub, возвращается к следующей строке после gosub $curloc,’ААА’ и продолжает выполнение кода. Поэтому если строка gosub $curloc,’ААА’ была в теле действия, выполнение кода действия не прерывается, а переход на текущую локацию всё равно как бы совершён.

ejikplains #2161 18.05.2019 04:58 (6 years ago)

могу ли я удалять акты через if? будет момент, где после ввода актов будет проверка, где количество актов равно числу определенному в массиве и если это число ниже количества актов, то нужно удалить определенный акт(act) или добавить(если число значительно больше). если да, то как тогда лучше это сделать: до объявления действий вводить delact или после?
Чтобы было понятно, ниже пример того что спрашиваю:

результатмассива = 3
if результатмассива > 3:
	!тогда нужно добавить акт
	act 'новое действие':
		gt 'куда нужно'
	end
end
if результатмассива < 3:
	delact 'первое действие'
end
act 'первое действие':
	gt 'первый дом'
end
act 'второе действие':
	gt 'второй дом'
end

NickoAilus Moderator 18.05.2019 04:58 (6 years ago)

ejikplains #2161 18.05.2019 04:58 (6 years ago)

Nex Moderator 18.05.2019 04:58 (6 years ago)