Messages

Gernot, wanted to ask.
Someone is helping you in the creation and further development of language, or are you alone ?

Saw the video with your game.
But downloading 71 mb to test, sorry.

Could you upload your "demo" just to "Win" and without music ?

If I understand correctly that command "MEM2SPRITE()" is a static.
And differs from the command "GRABSPRITE" can not handle real time. (dynamical texture)

I'm looking for a way to handle any object on the screen in real time.

Thanks for help.

With regard to the code (source).
Copied, pasted, by pressing F5 and it worked. (finally)

A question, what do you mean ?

You can make this work these days without INLINE, using Polyvector!

If I prescribe each point as an array then the computer just hangs.
In this case, such a scheme is not suitable.

scrx = 640; scry = 480;
max = (scrx * scry); dim x[max]; dim y[max];

for d = 0 max - 1;
sepixel x[d], y[d], rgb(250, 250, 250);
next;

Just help me analyze this example, please.
http://www.glbasic.com/showroom.php?site=games&game=Fluids&lang=de

Gernot assembled an excellent example, but it will not run if it is copy and paste it into your project.
Is only what he has compiled.

Anyone can help me ?

Trying to build(create) a primitive "paint".
But it is necessary to know "C++" commands.

All that I managed to gather(create) with relatives of commands can be seen below.

Code (glbasic) Select Expand


// Attention. No Global or Local
// Move your mouse and press left or right mouse button

// screen options
scrx = (320 * 2); scry = (240 * 2); SETSCREEN scrx, scry, 0;

// mouse options
SYSTEMPOINTER TRUE;


//______________________________________________________________________________________________
WHILE TRUE

// background
DRAWRECT 0, 0, scrx - 0, scry - 0, RGB(10, 20, 30);

// mouse
MOUSESTATE mx, my, mbl, mbr;

pencil();

SHOWSCREEN; WEND
//______________________________________________________________________________________________


//______________________________________________________________________________________________
FUNCTION pencil:

IF pe_dost = 0; pe_dost = 1;// dostup >

// dim
pe_max1 = 25; pe_max2 = 361;
DIM pe_x1[pe_max1][pe_max2]; DIM pe_y1[pe_max1][pe_max2]; DIM pe_r1[pe_max1][pe_max2]; DIM pe_x2[pe_max1][pe_max2]; DIM pe_y2[pe_max1][pe_max2]; DIM pe_r2[pe_max1][pe_max2]; DIM pe_col[pe_max1][pe_max2];

// options
a_max = 1; pe_im$ = "no";

FOR d1 = 0 TO pe_max1 - 1;// for >
FOR d2 = 0 TO pe_max2 - 1;// for >
// radius
pe_r1[d1][d2] = 1 + (d1 * 1);
pe_r2[d1][d2] = 1 + (d1 * 1);
// color
pe_col[d1][d2] = 10;
NEXT;// for <
NEXT;// for <

ENDIF;// dostup <


// press mouse - mbl
IF     mbl = 1 OR mbr = 1;
// start pos.
IF pe_sl = 0; pe_sl = 1; pe_xx1 = mx; pe_yy1 = my; pe_xx2 = mx; pe_yy2 = my;ENDIF;
// new pos.
pe_xx2 = pe_xx1; pe_yy2 = pe_yy1; pe_xx1 = mx; pe_yy1 = my;
ELSEIF mbl = 0 AND mbr = 0;
// new pos.
pe_sl = 0; pe_xx2 = -1000; pe_yy2 = -1000; pe_xx1 = -1000; pe_yy1 = -1000;
ENDIF;

// pos.
FOR d1 = 0 TO pe_max1 - 1;// for >
FOR d2 = 0 TO pe_max2 - 1;// for >
// pos. 1
pe_x1[d1][d2] = pe_xx1 + (pe_r1[d1][d2] * SIN(d2 * 1));
pe_y1[d1][d2] = pe_yy1 - (pe_r1[d1][d2] * COS(d2 * 1));
// pos. 2
pe_x2[d1][d2] = pe_xx2 + (pe_r2[d1][d2] * SIN(d2 * 1));
pe_y2[d1][d2] = pe_yy2 - (pe_r2[d1][d2] * COS(d2 * 1));
NEXT;// for <
NEXT;// for <

// sprite
IF pe_im$ = "yes"; DRAWSPRITE 1, 0, 0;ENDIF;

// image
IF     mbl = 1 AND mbr = 0;
ALPHAMODE (a_max / 10);
FOR d1 = 0 TO pe_max1 - 1;// for >
FOR d2 = 0 TO pe_max2 - 1;// for >
// image - white
DRAWLINE pe_x1[d1][d2], pe_y1[d1][d2], pe_x2[d1][d2], pe_y2[d1][d2], RGB((pe_col[d1][d2] * 1), (pe_col[d1][d2] * 1), (pe_col[d1][d2] * 1));
NEXT;// for <
NEXT;// for <
ALPHAMODE 0;
ELSEIF mbr = 1 AND mbl = 0;
FOR d1 = 0 TO pe_max1 - 1;// for >
FOR d2 = 0 TO pe_max2 - 1;// for >
// image - black (delete)
DRAWLINE pe_x1[d1][d2], pe_y1[d1][d2], pe_x2[d1][d2], pe_y2[d1][d2], RGB(10, 20, 30);
NEXT;// for <
NEXT;// for <
ENDIF;

// sprite
IF mbl = 1 OR mbr = 1; GRABSPRITE 1, 0, 0, (scrx / 1), (scry / 1); pe_im$ = "yes";ENDIF;

ENDFUNCTION


[Gernot]

Today (i will) downloaded and installed the last version.
Tomorrow will look at the "video" command.

Thanks for comments, people.

Gernot, why did you use commands "global, local" required ?

I'm sorry for interrupting "MrTAToad", but i have a question.

People who have the latest version "GLBasic".
As there is with the video command ? (you can play the video during the game or not ?)

I have "GLBasic 6.111", and there can only reproduce(playing) video file.
Everything (game) else is automatically stopped.

Why I do not use the new "GLBasic" version ?

Everything is very simple.
Everything works great without a "global", "local" or "static" commands in "GLBasic  6.111"

I hope this is what you're looking for - http://www.speedshare.org/download.php?id=8B791B2D11
Code inside.

Very sorry.

You have done so much, but "compiler times" spoiled it all.

Very sorry that a rate(speed) has not changed.

Quote from: com_1 on Yesterday at 03:00:24 pm

    Sorry "Gregory Atlas".

For what are you sorry?

For the fact that interrupted your topic.

Sorry "Gregory Atlas".

I want to ask.
Has anything changed in the "GLBasic" latest version for the better ?
I mean speed. (press "F5" and what)

"GLBasic" very good language, but his speed just kills. (may still change ?)

Repeat, "GLBasic" is very good language. (no matter what language it is a good)

What do you mean by confused in the woods?

If you need help, i can help you something where. (with AI and with woods)

By the way, this is my "Map Editor".

Another IDE for GLB, but how ?

I looked at your old and new versions of the game. (I liked it)
But there are problems.

Very nervous as it moves the character and confused in the woods.
And enemy not appear where you can appear.

You need some help ?