forum.boolean.name

forum.boolean.name (http://forum.boolean.name/index.php)
-   3D-программирование (http://forum.boolean.name/forumdisplay.php?f=12)
-   -   Диалоговое окно!помогите!!!!! (http://forum.boolean.name/showthread.php?t=8216)

Mark Castle 26.04.2009 15:06

Диалоговое окно!помогите!!!!!
 
Товарищи!делаю квестовую игрулю,там надо будет чтоб игрок трендел с окружающими его гражданами,все перепробовал,не знаю как сделать!
помогите,выложите код,заранее спасибо!:)

HolyDel 26.04.2009 15:17

Ответ: Диалоговое окно!помогите!!!!!
 
пиши свою GUI систему, или смотри в сторону GUIw512

Mark Castle 26.04.2009 15:21

Ответ: Диалоговое окно!помогите!!!!!
 
да нет,мне буквально на черном фоне текст вывести надо на 5 секунд(чтоб он потом пропал!)
а гуй подключать неудобно и сложно...
приведите пример плз!

h1dd3n 26.04.2009 15:52

Ответ: Диалоговое окно!помогите!!!!!
 
Я чето не понял че ты хочешь... Припаренти пивот к голове игрока только повыше, потом когда надо вывести текст, спроэцируй коорды пивота в 2д и начинай рисовать свои ректы, тексты и т.д.

ABTOMAT 26.04.2009 16:23

Ответ: Диалоговое окно!помогите!!!!!
 
Гы а я проецирую координаты физ.модели персонажа + N юнитов по Y-оси
Результат тот же пивотов меньше.

Mark Castle 26.04.2009 17:29

Ответ: Диалоговое окно!помогите!!!!!
 
б*я*ь на словах все легко...а пример?

Mark Castle 26.04.2009 17:30

Ответ: Диалоговое окно!помогите!!!!!
 
текст то выведу,а как сделать так чтоб он исчез?
Код:

Function alert(path$)
f=OpenFile(path$)
While Not Eof(f)
a = LoadFont("courier",25,1,1,0)
SetFont a
Color 0,0,0
Rect 0,600,1024,768
Color 255,0,0
Text 0,605,ReadLine$(f)
FreeFont a
time = time+1
If time>100
dialog = False
time = 0
EndIf
Wend
CloseFile(f)
End Function

-этот код не работает!исправте!

HolyDel 26.04.2009 17:46

Ответ: Диалоговое окно!помогите!!!!!
 
Mark Castle, странный ты, к чему тут требовательный тон? никто не обязан тебе помогать. если тебе нужно чтобы текст появлялся и исчезал - то ясно же что это отдельная сущность.
делай как то так:

Код:

type worldtext
field ent
field l
field txt$
end type

function CreateWorldText(ent, txt$)
wt.worldtext = new worldtext
wt\ent = createsprite()
positionentity wt\ent,entityx(ent,1),entityy(ent,1),entityz(ent,1)
wt\txt = txt
wt\l = 200
end function

function DrawWorldText()
for wt.worldtext = each worldtext
cameraproject(cam,entityx(wt\ent),entityy(wt\ent),entityz(wt\ent))
Text projectedx(),projectedy()-10,wt\txt,1

wt\l = wt\l - 1
if wt\l<0 then delete wt
next
end function

писал в браузере, могут быть очепятки.

вот, тебе, кстати:
http://rules.boolean.name/e107_plugi....php?content.4

категория 2, пункт 3.

Антихрист 26.04.2009 17:47

Ответ: Диалоговое окно!помогите!!!!!
 
Цитата:

Сообщение от Mark Castle (Сообщение 103864)
б*я*ь на словах все легко...а пример?

а тебе может сразу твою игру написать? :stop: Код элементарен,ничего сложного в нём нету. Поверь если ты сам допрёшь как решить свою проблему,пользы будет больше.

HolyDel 26.04.2009 18:26

Ответ: Диалоговое окно!помогите!!!!!
 
да, исправь

Код:

if wt\l<0 then delete wt
на:

Код:

if wt\l<0
freeentity wt\ent
delete wt
endif


Mark Castle 27.04.2009 17:21

Ответ: Диалоговое окно!помогите!!!!!
 
а как сделать просто что б текст исчез, без спрайтов и т.д.?

HolyDel 27.04.2009 17:38

Ответ: Диалоговое окно!помогите!!!!!
 
Цитата:

а как сделать просто что б текст исчез, без спрайтов и т.д.?
не рисовать его.

avel 27.04.2009 17:38

Ответ: Диалоговое окно!помогите!!!!!
 
Цитата:

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

Mark Castle 27.04.2009 17:51

Ответ: Диалоговое окно!помогите!!!!!
 
Цитата:

Сообщение от avel (Сообщение 103935)
для этого тебе нужна магия... заюзай 6 заклинание быдлокодера по созданию супер-пупер-мегоигры.

м-да...а серъезно?

NitE 27.04.2009 18:35

Ответ: Диалоговое окно!помогите!!!!!
 
не рисовать его. (с) - да и стобой серьёзно говорить влом...


Часовой пояс GMT +4, время: 18:37.

vBulletin® Version 3.6.5.
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Перевод: zCarot