forum.boolean.name - AfterWaterRPG

forum.boolean.name (http://forum.boolean.name/index.php)

- Проекты на MidletPascal (http://forum.boolean.name/forumdisplay.php?f=88)

- - AfterWaterRPG - DEMO (http://forum.boolean.name/showthread.php?t=14657)

Ответ: AfterWaterRPG - DEMO

Цитата:

Сообщение от PassCall (Сообщение 187416)

Скину когда нибудь исходник на общее обозрение.
Но я боюсь, что мой бесмысленный и беспощадный код только собьет с толку :)

но все равно.

Ответ: AfterWaterRPG - DEMO

Ладно ща скину исходник, потому буду доделывать его. Зырьте пока на то, что есть. Хотя не =) сначала коментов добавлю! Завтра скину!

Ответ: AfterWaterRPG - DEMO

Цитата:

Сообщение от IGR (Сообщение 187556)

я вообще не в курсе.. а можно на MP поддерживать сенсорный ввод ?? и насколько это сложно ??

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

Ответ: AfterWaterRPG - DEMO

ну да !! Что бы гуи контролы могли реагировать и что бы игровые объекты/карта тоже на нажатие реагировали !!
Сенсорные жкраны сейчас очень популярны, у тебя нет желания подключить эту либу к своему проекту (если бесплатно конечно ;)) ??

Ответ: AfterWaterRPG - DEMO

Заделюсь кодом по теме:

PHP код:




unit trans;

interface
var key:integer;
procedure init;
procedure scr;
function getkey:integer;

implementation
uses sensor;
var x,y,xx,yy:integer;
butt:boolean;
ons:array[1..6] of image;
otp:boolean;

procedure init;
begin
sensor.init;
butt:=true;
ons[1]:=loadimage('/joy.png');
ons[2]:=loadimage('/joys.png');
ons[4]:=loadimage('/buu.png');
ons[5]:=loadimage('/men.png');
ons[6]:=loadimage('/slow.png');
end;

procedure scr;
begin
drawimage(ons[1],30,getheight-120);
if key=KE_KEY1 then drawimage(ons[2],35,getheight-115) else
if key=KE_KEY3 then drawimage(ons[2],60,getheight-115) else
if key=KE_KEY4 then drawimage(ons[2],30,getheight-102) else
if key=KE_KEY6 then drawimage(ons[2],66,getheight-102) else
drawimage(ons[2],48,getheight-102);
drawimage(ons[4],getwidth-62,getheight-64);
//drawimage(ons[5],5,0);
//drawimage(ons[6],getwidth-75,0);
end;

function getkey:integer;
begin
key:=0;
if pointer_state<>0 then begin
    if (not otp) and (pointer_dragged_x<>0) and (pointer_dragged_x<>xx) then begin
    x:=pointer_dragged_x;
    y:=pointer_dragged_y; end else begin
    x:=pointer_pressed_x;
    y:=pointer_pressed_y; end;
    otp:=false;
        if (x>30) and (x<=75) and (y>getheight-120) and (y<=getheight-75) then key:=KE_KEY1 else
        if (x>75) and (x<=120) and (y>getheight-120) and (y<=getheight-75) then key:=KE_KEY3 else
        if (x>75) and (x<=120) and (y>getheight-75) and (y<=getheight-30) then key:=KE_KEY6 else
        if (x>30) and (x<=75) and (y>getheight-75) and (y<=getheight-30) then key:=KE_KEY4 else
        if (x>getwidth-62) and (x<=getwidth-17) and (y>getheight-62) and (y<=getheight-17) then key:=KE_KEY5 else
        if (x<=80) and (y<=40) then key:=-6 else
        if (x>getwidth-80) and (y<=40) then key:=KE_STAR;
end else key:=getkeypressed;
if key=0 then begin xx:=x; otp:=true; end;
getkey:=key;
end;

initialization
    { add initialization code here }
end.

И так, init - загрузка графики и инициализация либы.
scr - отрисовка джоя.
getkey - аналог getkeypressed.

Результат в игре такой:

З.Ы. могут быть лишние переменные, ибо часть функций обрезал прямо перед тем как код запостить сюда.

Ответ: AfterWaterRPG - DEMO

Вылаживаю свой неимоверно беспощадный код, вместе с редакторами. Да прибудет с Вами Сила, когда вы будете читать его. Чтобы было не очень уныло читать мой код, я разбавил исходник разными интересными фактами.

Ответ: AfterWaterRPG - DEMO

нововведения есть по сравнению с предыдущей версией ?? Есть ли смысл качать ??

Ответ: AfterWaterRPG - DEMO

Цитата:

Сообщение от IGR (Сообщение 188186)

нововведения есть по сравнению с предыдущей версией ?? Есть ли смысл качать ??

Это исходник >_<

А версия - более новая. Естественно =)

Ответ: AfterWaterRPG - DEMO

Геймдизайн еще требуется?

Ответ: AfterWaterRPG - DEMO

Цитата:

Сообщение от FataMorgana (Сообщение 189791)

Геймдизайн еще требуется?

Нам требуется тот, кто сможет придумать сюжет, новые вещи (характеристики), монстров, локации и т.д.

Вот на всякий случай редакторы.

Ответ: AfterWaterRPG - DEMO

В нашей.. хм.. группе появился новый участник - FataMorgana. Он занимается сюжетом, монстрами, характеристиками, короче механикой игры. ~~Вывернув движок наизнанку~~ Разработав много новых идей, мы приступили к работе. Возможно, через пару недель Вы увидите результат нашей совместной работы. Было бы хорошо, если бы нашелся тестер, который протестирует (и увековечит свое имя в почетных титрах) будущую игру.

Ответ: AfterWaterRPG - DEMO

Готов быть тестером! А вобще это не проблема:)

Ответ: AfterWaterRPG - DEMO

Не хотелось бы давать призрачных надежд, но велика вероятность того, что игра не будет похожа ни на одну РПГ на мобильных телефонах. Причем это касается всего - начиная с монстров и заканчивая развитием персонажа и инвентарем. Что из этого винегрета получиться - неизвестно. Посмотрим...

Ответ: AfterWaterRPG - DEMO

а что делает тестер воообщще?:)

Ответ: AfterWaterRPG - DEMO

rus21d
играет и ищет баги, делает замечания или предложения