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

G

Genryzz #1590 23.02.2016 03:37 (10 years ago)

evp #1167 23.02.2016 09:22 (10 years ago)

Туда, о чем говорил Aleks Versus, конечно. В .bat файл. Лучше будет добавить перед этим start:

start qspgui mycoolgame.qsp

Aleks Versus Moderator 23.02.2016 13:45 (10 years ago)

evp,
это если QSP установлен в системе. Поэкспериментировал. Вот такая команда запустит плеер, который лежит во вложенной папке:

start "" "PLAYER/qspgui.exe" Eternity.qsp

Genryzz,
В текстовом редакторе создаёшь файл, вставляешь в него эту строку. Сохраняешь файл с расширением .bat - готово. В папке PLAYER - должен лежать плеер QSP.

evp #1167 23.02.2016 19:06 (10 years ago)

Aleks Versus Moderator 24.02.2016 08:33 (10 years ago)

evp,
нет, не погорячился. Тоже пользуюсь windows 10. Файлы .qsp ассоциированы с QGen. Команда открывала QGen, если он не был запущен, а после перезагрузки компа стала просто ругаться, что qspgui не найден. Да, кавычки можно опустить, оказывается.

start PLAYER/qspgui.exe Eternity.qsp

работает. =)

DeathSpace #1619 24.02.2016 13:37 (10 years ago)

Ребят у меня такой вопрос.Как вот это превратить в цикл?если id равно от 1 до 10,т.е выводил 10 таблиц с разными доспехами.

id=101
if idarmor[id]=0:
	if gold < 350:
		$цена1[id]='Я не могу <br>позволить себе эту вещь'
	end
	if gold => 350:
		$цена1[id]='<a href="exec:msg ''В вашем инвентаре появился новый предмет''&gold-=350&idarmor[id] = 1& GT $curloc">купить</a>'
	end
'<table border = "1" bordercolor = black>
<th rowspan ="5"><b><<$arm[id]>><br><center><<$pic[id]>></center></b></th> <td>Ваши параметры сейчас:</td>  <td>Характеристики доспеха:</td><th rowspan ="5"><<$цена1[id]>></th>
<tr><td><<$броня[1]>></td><td><<$броня[111]>></td></tr>
<tr><td><<$броня[2]>></td><td><<$броня[211]>></td></tr>
<tr><td><<$броня[3]>></td><td><<$броня[311]>></td></tr>
<tr><td><<$броня[4]>></td><td><<$броня[411]>></td></tr>'
'</tr>
</table>'
end

evp #1167 24.02.2016 17:17 (10 years ago)

id=1
:next_id 
	if idarmor[id]=0: 
		if gold < 350: 
			$цена1[id]='Я не могу <br>позволить себе эту вещь' 
		end 
		if gold => 350: 
			$цена1[id]='<a href="exec:msg ''В вашем инвентаре появился новый предмет''&gold-=350&idarmor[id] = 1& GT $curloc">купить</a>' 
		end 
		'<table border = "1" bordercolor = black>' 
			*p'<th rowspan="5"><b><<$arm[id]>><br><center><<$pic[id]>></center></b></th> <td>Ваши параметры сейчас:</td>'
			*p'<td>Характеристики доспеха:</td><th rowspan ="5"><<$цена1[id]>></th>'
			i = 1
			:next_i 
				x = $броня[i]
				y = $броня[i*100+11]
				*p '<tr><td><<x>></td><td><<y>></td></tr>'
				i += 1
			if i < 5: jump 'next_i' 
		*p'</table>' 
	end
id += 1
if id < 11: jump 'next_id'

Как-то так? На скорую руку накидал. Уверен, можно сделать короче.

DeathSpace #1619 24.02.2016 17:28 (10 years ago)

evp #1167 24.02.2016 17:39 (10 years ago)

DeathSpace #1619 24.02.2016 18:23 (10 years ago)

Cow #1206 24.02.2016 20:15 (10 years ago)

evp #1167 25.02.2016 03:52 (10 years ago)

DeathSpace, вот немного еще поменял на более понятный вариант. Никаких ошибок не возникает, как, впрочем, и в предыдущем варианте не возникало. Но у меня массивы, естественно, пусты. Вероятно, в этом направлении вам надо искать причины ошибки.

Spoiler

$table_header = {
	*p '<th rowspan="5"><b><<$arm[id]>><br><center><<$pic[id]>></center></b></th> <td>Ваши параметры сейчас:</td><td>Характеристики доспеха:</td><th rowspan ="5"><<$цена1[id]>></th>'
}
$table_row = {
	*p '<tr><td>' + $броня[row] + '</td><td>' + $броня[row*100+11] + '</td></tr>'
}
id=101
:next_id 
	if idarmor[id]=0: 
		if gold < 350: 
			$цена1[id]='Я не могу <br>позволить себе эту вещь' 
		end 
		if gold => 350: 
			$цена1[id]='<a href="exec:msg ''В вашем инвентаре появился новый предмет''&gold-=350&idarmor[id] = 1& GT $curloc">купить</a>' 
		end 
		'<table border = "1" bordercolor = black>' 
			dynamic $table_header
			row = 1
			:next_row
				dynamic $table_row 
				row += 1
			if row < 5: jump 'next_row' 
		*p'</table>' 
	end
	id += 1
if id < 111: jump 'next_id'

DeathSpace #1619 25.02.2016 05:30 (10 years ago)

evp #1167 25.02.2016 09:37 (10 years ago)

Второй вопрос - у вас ошибка.
Вместо

idarmor[id]

в переменной $цена1[id] следует писать

idarmor[<<id>>]

Ну, а первый вопрос - так и должно быть, т.к. я не знаю принципа формирования индексов. Следовательно, в каждой из таблиц третий столбец содержит

$броня[111]
$броня[211] 
$броня[311] 
$броня[411]

Как и было указано в вашем первом сообщении. Это же очевидно следует из кода:

$броня[row*100+11]

Если вы скажете, что там должно быть - я запросто изменю на нужное.

Могу предположить, что там должно быть
$броня[111]
$броня[211]
$броня[311]
$броня[411],
а потом
$броня[121]
$броня[221]
$броня[321]
$броня[421]
или
$броня[112]
$броня[212]
$броня[312]
$броня[412].
Или еще как по другому. Без вас тут не разобраться.

Aleks Versus Moderator 25.02.2016 11:21 (10 years ago)

Cow,
вопрос не глупый, но очень невнятно задан. Где именно у тебя есть десять предметов? В инвентаре, на локации? Или их ещё нет, но должен быть создан один из десяти на локации?
Если последнее, есть очень простой способ. Помещаем наименования предметов в массив:

Spoiler

$objects[0]='Отвёртка'
$objects[1]='Кость'
$objects[2]='Гаечный ключ'
$objects[3]='Человеческий череп'
$objects[4]='Перфоратор'
$objects[5]='Шкура тролля'
$objects[6]='Пачка масла'
$objects[7]='Яблоко'
$objects[8]='Ржавая монета'
$objects[9]='Упавшая звезда'
$object_rand = $objects[rand(0,9)]
act $object_rand+'. Взять':
   addobj $object_rand
   ! ... другой код ...
end