Show Posts - Dionysius
Please login or register.

Login with username, password and session length
Advanced search  

News:

Forum rules - please read before posting, it can save you a lot of time.

Show Posts

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.

Topics - Dionysius

Pages: 1 [2] 3 4 5
16
Предлагаю в этой теме �?обирать �?�?ылки на диздоки изве�?тных адвенч�?р. Также можно добавлять �?�?ылки на материалы по напи�?анию хоро�?их �?ценариев для адвенч�?р и том�? подобное.

Не�?колько адвенч�?рных диздоков (Ларри, Стран�?твования Торина, Фредди Фарка�?; на англ. языке)
Grim Fandango puzzle document (на англ. языке)

Диздоки (и их фрагменты) от Ли Шелдона (на англ. языке)

Док�?менты проекта "По �?ледам динозавров"

�? также для общих �?л�?чаев:
Примеры концепта, диздока, плана разработки от 1С
Док�?менты от �?келлы
�?аблон-док�?мент игровой концепции
�?аблон-док�?мент предложения разработки
требования к демо-вер�?ии

17
Общий форум / Threepenny Game
« on: March 15, 2009, 07:13:54 PM »

18
Общий форум / Shire quest
« on: March 15, 2009, 07:11:07 PM »

19
Технический форум / Движение объектов
« on: March 11, 2009, 06:15:10 AM »
Code: [Select]
while (x1!=x2)
{
x1=x1-19;
if (x1<x2)
{
x1=x2;
}
if (y1>y2)
{
y1=y1-10;
}
if (y1<y2)
{
y1=y1+10;
}

tmp.X=x1;
tmp.Y=y1;
Sleep(1);
}

Ответ от пользователя Pipec:

20
Технический форум / Пятна?ки
« on: March 11, 2009, 06:12:46 AM »
Скрипт игры 15 от анонимного пользователя:
Quote
scene_init.script

#include "scripts\base.inc"

actor.SkipTo(685, 220);

actor.Active = false;


// here comes the stuff which initializes the scene
global aa = Scene.LoadEntity("entities\aa.entity");
aa.dest_stat=1;
aa.dest_win=13;
aa.SkipTo(505, 130);

global ab = Scene.LoadEntity("entities\ab.entity");
ab.dest_stat=2;
ab.dest_win=3;
ab.SkipTo(595, 130);

global ac = Scene.LoadEntity("entities\ac.entity");
ac.dest_stat=3;
ac.dest_win=15;
ac.SkipTo(685, 130);

global ad = Scene.LoadEntity("entities\ad.entity");
ad.dest_stat=4;
ad.dest_win=7;
ad.SkipTo(775, 130);

global ba = Scene.LoadEntity("entities\ba.entity");
ba.dest_stat=5;
ba.dest_win=11;
ba.SkipTo(505, 220);

global bb = Scene.LoadEntity("entities\bb.entity");
bb.dest_stat=6;
bb.dest_win=12;
bb.SkipTo(595, 220);

global bc = Scene.LoadEntity("entities\bc.entity");
bc.dest_stat=7;
bc.dest_win=14;
bc.SkipTo(685, 220);

global bd = Scene.LoadEntity("entities\bd.entity");
bd.dest_stat=8;
bd.dest_win=4;
bd.SkipTo(775, 220);

global ca = Scene.LoadEntity("entities\ca.entity");
ca.dest_stat=9;
ca.dest_win=1;
ca.SkipTo(505, 310);

global cb = Scene.LoadEntity("entities\cb.entity");
cb.dest_stat=10;
cb.dest_win=10;
cb.SkipTo(595, 310);

global cc = Scene.LoadEntity("entities\cc.entity");
cc.dest_stat=11;
cc.dest_win=9;
cc.SkipTo(685, 310);

global cd = Scene.LoadEntity("entities\cd.entity");
cd.dest_stat=12;
cd.dest_win=8;
cd.SkipTo(775, 310);

global da = Scene.LoadEntity("entities\da.entity");
da.dest_stat=13;
da.dest_win=5;
da.SkipTo(505, 400);

global db = Scene.LoadEntity("entities\db.entity");
db.dest_stat=14;
db.dest_win=2;
db.SkipTo(595, 400);

global dc = Scene.LoadEntity("entities\dc.entity");
dc.dest_stat=15;
dc.dest_win=6;
dc.SkipTo(685, 400);

global dd = Scene.LoadEntity("entities\dd.entity");
dd.dest_stat=16;
dd.dest_win=16;
dd.SkipTo(775, 400);

global taken;
taken[0]=aa;
taken[1]=ab;
taken[2]=ac;
taken[3]=ad;
taken[4]=ba;
taken[5]=bb;
taken[6]=bc;
taken[7]=bd;
taken[8]=ca;
taken[9]=cb;
taken[10]=cc;
taken[11]=cd;
taken[12]=da;
taken[13]=db;
taken[14]=dc;
taken[15]=dd;
////////////////////////////////////////////////////////////////////////////////
// scene state
global StateRoom;


// default values
if(StateRoom==null)
{
StateRoom.Visited = false;
// add scene states here
}


taken.script

#include "scripts\base.inc"


////////////////////////////////////////////////////////////////////////////////
on "LeftClick"
{
global dd;

if (dd.X == this.X)
{
switch (dd.Y - this.Y)
{
case 90:
this.SkipTo(this.X, this.Y+90);
Game.Msg(this.dest_stat);
this.dest_stat = this.dest_stat + 4;
Game.Msg(this.dest_stat);
dd.SkipTo(dd.X, dd.Y-90);
dd.dest_stat = dd.dest_stat - 4;
this.PlaySound("sounds\click.ogg");
break;

case (-90):
this.SkipTo(this.X, this.Y-90);
this.dest_stat = this.dest_stat - 4;
dd.SkipTo(dd.X, dd.Y+90);
dd.dest_stat = dd.dest_stat + 4;
this.PlaySound("sounds\click.ogg");
break;
};
};

if (dd.Y == this.Y)
{
switch (dd.X - this.X)
{
case 90:
this.SkipTo(this.X+90, this.Y);
this.dest_stat = this.dest_stat + 1;
dd.SkipTo(dd.X-90, dd.Y);
dd.dest_stat = dd.dest_stat - 1;
this.PlaySound("sounds\click.ogg");
break;

case (-90):
this.SkipTo(this.X-90, this.Y);
this.dest_stat = this.dest_stat -1;
dd.SkipTo(dd.X+90, dd.Y);
dd.dest_stat = dd.dest_stat + 1;
this.PlaySound("sounds\click.ogg");
break;
};
};
Game.Msg(this.rotate);
//check win;

global taken;
var cost = 0;
for(var i=0; i<16; i=i+1)
{
var tmp = taken;
if (tmp.dest_stat == tmp.dest_win)
{
cost=cost+1;
};
};
if (cost == 16)
{
Game.Msg("wine" + cost);
}
else
{
Game.Msg(cost);
};
};



aa.entity

ENTITY
{
NAME="aa"
CAPTION="taken_aa"
X=80
Y=80
SCALABLE=TRUE
INTERACTIVE=TRUE
COLORABLE=TRUE
SOUND_PANNING=TRUE
SPRITE="entities\aa.sprite"
TALK="entities\aa.sprite"
SCRIPT="entities\taken.script"
FONT = "fonts\outline_white.font"
}


aa.sprite

; generated by SpriteEdit

; $EDITOR_PROJECT_ROOT_DIR$ ..\..\

SPRITE {
NAME="aa"
LOOPING=TRUE
CONTINUOUS=FALSE
PRECISE=TRUE
FRAME {
DELAY = 0
KEYFRAME=FALSE
IMAGE = "scenes\Room\taken\aa.png"
EDITOR_SELECTED=TRUE
}

}
Коррективы от пользователя gambit:http://ifolder.ru/9648056

21
Ответ от пользователя Pipec:

22
Технический форум / Паззлы
« on: March 11, 2009, 06:05:49 AM »
Скрипт от пользователя victor89
Code: [Select]
#include "scripts\base.inc"
global needpazle=30;//количе?тво паззлов.

actor.Active = false;

global IsLeftDown = false;

global pazlayer=Scene.AddLayer("paz");//?лой для паззлов.

for (var i=1;i<=30;i=i+1)
{
pazlayer.AddEntity("pp"+i);
var tmp=pazlayer.GetNode("pp"+i);
tmp.AttachScript("scenes\puzzle\scr\puzzle_core.script");
tmp.SetSprite("scenes\puzzle\p"+i+".png");
var r=Random(1,4);

switch (r)
{
case 1:
tmp.X=200;
tmp.Y=Random(10,580);
break;

case 2:
tmp.X=Random(200,810);
tmp.Y=10;
break;

case 3:
tmp.X=Random(200,810);
tmp.Y=645;
break;

case 4:
tmp.X=810;
tmp.Y=Random(10,580);
break;
}

}

puzzle_core.script:
Code: [Select]
global IsLeftDown;
global pazlayer;
global needpazle;

on "LeftClick"
{
IsLeftDown = true;
var x0=Game.MouseX-this.X;
var y0=Game.MouseY-this.Y;
while(IsLeftDown==true)
{
this.X = Game.MouseX-x0;
this.Y = Game.MouseY-y0;
Sleep(20);
}
}

on "LeftRelease"
{
IsLeftDown = false;
this.X=this.X;
this.Y=this.Y;
set_puzzle(this.X,this.Y,this.Name);
}

function set_puzzle(x,y,name)
{
var tx1,ty1,tname,px1,px2,py1,py2,pname;
tname=name;
pname="Null";
tx1=x;
ty1=y;
for (var i=1;i<=30;i=i+1)
{
var tmp=Scene.GetNode("p"+i);
px1=tmp.X-20;
px2=tmp.X+70;
py1=tmp.Y-20;
py2=tmp.Y+75;
var str=new String(tname);
var ttname=str.Substr(1);
if ((tx1>px1)&&(tx1<px2)&&(ty1>py1)&&(ty1<py2)&&(ttname==tmp.Name))
{
pname=tmp.Name;
}
}

if (pname!="Null")
{
tmp=Scene.GetNode(pname);
tmp.Active=true;
pname="Null";
needpazle=needpazle-1;
Game.Msg(needpazle);
if (needpazle==0)
{
this.Active=false;
var LevelMenu = Game.LoadWindow("interface\level_complete.window");
LevelMenu.Center();
LevelMenu.GoExclusive();
Game.UnloadObject(LevelMenu);
}
pazlayer.DeleteNode(this);
}

}

23
Технический форум / Ма??ивы
« on: March 11, 2009, 06:01:15 AM »
Code: [Select]
global MyArr = new Array(5);
Code: [Select]
MyArr[3] = "Hello";Ответ:
Code: [Select]
global MyArr;
Code: [Select]
MyArr = new Array();

24
Технический форум / Скрипт таймера
« on: March 11, 2009, 05:59:13 AM »
Code: [Select]
var Interval = 300000; // Задаём время таймера 5 мин?т (5 * 60 * 1000)
 var StartTime = Game.CurrentTime; // Запоминаем время зап??ка таймера
 
 while(true) { // Зде?ь цикл работы таймера
     if(Game.CurrentTime - StartTime > Interval) { // Е?ли заданный промеж?ток времени и?тёк
       // Зде?ь н?жно выполнить какой-ниб?дь код
       // Например, можно выдать ?ообщение, что время вы?ло
       Game.Msg("Время и?текло!");
       break; // Выходим из цикла
     }
   Sleep(100); // Ждём 100 м?
 }

26
Отличный �?айт, где много в�?яких вк�?�?но�?тей в �?вободном до�?т�?пе: http://www.turbosquid.com
Для �?качивания н�?жно зареги�?трировать�?я.

Ещё �?�?ылки:
http://modelsbank.3dm3.com
http://www.amazing3d.com/modfree.html

Хоро�?ие �?чебники по low-poly моделированию пер�?онажей (на англ. языке) �? иллю�?трациями:
http://www.3dtotal.com/team/Tutorials/benmathis/benmathis_1.asp
http://www.poopinmymouth.com/tutorial/tutorial.htm

Модели для �?вободного �?качивания
http://artblock.ru
http://sw-in.narod.ru/ (хай-поли)
http://models-3d.narod.ru/

http://artist-3d.com/index.htm

Зде�?ь помимо 3D е�?ть и 2D
http://reinerstileset.4players.de

Р�?�?�?кий тран�?порт:
http://www.3dmodels.su/index.php?categoryID=60

27
Доступен перевод документации WME 1.7.3 на русский язык (справка по функциям переведена частично).Скачать архив можно отсюда.

28
Technical forum / Roadmap
« on: December 19, 2008, 03:34:42 PM »
What is the roadmap for future releases?

29
Not a bug / File.Length = 0 for binary files
« on: August 22, 2008, 11:44:34 AM »
 :'(
I need to get length of a binary file, but "Length" property returns 0.
I write data to this file by WriteInt() method. The real length is not 0.

30
Technical forum / StaticControl.Text height
« on: August 16, 2008, 08:48:44 PM »
Is there any solution to calculate height of StaticControl.Text or to fit height of StaticControl to its Text?

Pages: 1 [2] 3 4 5

Page created in 0.18 seconds with 15 queries.