|
|
|
|
misschien leuk om daar een subforum voor te maken.
met linkt en tips over compilest goede library's enz .. ideetje en natuurlijk 'n plek om je eigen spel te posten zodat iedereen ervan kan meegenieten .. wel als eis dat 't freeware is natuurlijk http://www.allegro.cc/go.php?_url=ht...2FStartrek.zip kijk is toch leuk zoiets ? |
|
| Advertentie | |
|
|
|
|
|
||
|
Citaat:
bovendien . iedereen kan daar dan zo'n ding gratis downen Laatst gewijzigd op 17-10-2004 om 17:09. |
||
|
|
||
|
Citaat:
__________________
If you're trying to stay high then you're bound to stay low
|
||
|
|
||
|
Citaat:
![]() Maar inderdaad.. wat is er mis met gewoon een topic? Als dan blijkt dat er echt heel erg veel mensen zijn die dat doen, kan je het altijd nog overwegen. (maar ga er maar niet vanuit) |
||
|
|
||
|
Citaat:
|
||
|
|
||
|
Citaat:
maar zoieso is dat 'n leuk idee bedoel ook mensen die niet kunnen programmeren .. tekenaars heb je ook nodig en ideeen
|
||
|
|
||
Verwijderd
|
Citaat:
is toch niet zo heel moeilijk? |
|
|
|
||
|
Citaat:
__________________
Wie weet wat je hier neer moet zetten?
|
||
|
|
||
|
Citaat:
|
||
|
|
||
Verwijderd
|
Citaat:
|
|
|
|
||
|
Citaat:
en 't is altijd leuk om code van iemand anders te jatten ![]() hmmm wekelijkse KiloLiner zoals ooit in de kijk stond? maar is miss meer wat voor software & multimedia dit is 'n leuke: Code:
unit Unit1;
// 3D sterren effect in Delphi
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
ExtCtrls;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
Type
TSter=record
X,Y,Z,C:integer;
end;
var
Form1: TForm1;
ster: array[0..99] of TSter;
timer:thandle;
implementation
{$R *.DFM}
procedure TimerFunc(Hwnd:THandle;Msg:Integer;Event:Integer;Time:Integer); stdcall;
var i:integer;
begin
for i:=0 to 99 do
begin
ster[i].X:=ster[i].X+ster[i].Z;
if (ster[i].X>form1.clientwidth) then
begin
ster[i].Y:=random(form1.clientheight);
ster[i].X:=0;
end;
end;
form1.canvas.FillRect(form1.getclientrect());
for i:=0 to 99 do
begin
form1.Canvas.Pixels[ster[i].X,ster[i].Y]:=RGB(ster[i].C,ster[i].C,ster[i].C);
end;
end;
procedure TForm1.FormCreate(Sender: TObject);
var i:integer;
begin
timer:=settimer(form1.handle,1,10,@timerfunc);
randomize;
for i:=0 to 99 do
begin
ster[i].X:=random(form1.clientwidth);
ster[i].Y:=random(form1.clientheight);
ster[i].z:=random(3)+1;
ster[i].C:=(ster[i].Z*50)+100;
end;
end;
end.
Laatst gewijzigd op 20-10-2004 om 10:52. |
||
|
|
||
|
Citaat:
![]() Jezus. Kijk gewoon eens naar hoe veel topics er geopend worden over 't schrijven van games. Zullen we dan maar voor elk onderwerp wat jou enigzins intereseerd een forum openen? |
||
|
|
||
|
Citaat:
|
||
|
|
||
|
Citaat:
Overleg maar met een Fb van het game forum of ze hier een 'groot-topic' voor willen maken. Anders zal het bij aparte topics moeten blijven. Een sub-forum zit er sowieso niet in. Gesloten. |
||
| Advertentie |
|
|
![]() |
| Topictools | Zoek in deze topic |
|
|
Soortgelijke topics
|
||||
| Forum | Topic | Reacties | Laatste bericht | |
| Games |
[DS] Flashcards ? wie heeft hier ervaring mee ? Benteknol | 52 | 25-11-2006 21:15 | |
| Games |
[Discussie] Geweld in Games Public_Enemy | 58 | 06-04-2005 16:30 | |
| Levensbeschouwing & Filosofie |
@ ongelovigen Love & Peace | 305 | 13-03-2005 13:10 | |
| Games |
Nintendo-liefhebbers? Lakitu | 83 | 13-11-2003 21:11 | |
| Software & Hardware |
Leuk spel ( hoop ik, testers en coders gezocht) Aries | 16 | 28-03-2003 19:12 | |
| Verhalen & Gedichten |
BOEKBESPREKING: Buitenstaanders - Renate Dorrestein Vlooienband | 59 | 21-09-2002 11:45 | |