Projeto Isis - Início

Olá amigos do The Club e pessoal que nos acompanha no Facebook e Twitter.

Estaremos dando início a partir desse post de um pequeno jogo em Delphi.

O jogo por enquanto tem o nome de Isis e consistirá de uma label exibida intermitentemente em um Panel. O objetivo do jogador será acertar com o mouse e futuramente com um alvo a label.

A base ou engine de nosso jogo estará na unit IsisEngine. O principal componente dessa unit será a classe TIsis, que apresento abaixo:

[code]

TIsis=class

private

fHits:Integer;

fErrors:Integer;

fLevel:Integer;

fPanel:TPanel;

fDisplay:TLabel;

fTimerCreate:TTimer;

FTimerDestroy:TTimer;

procedure SetHitsandErrors(Hit:Boolean);

procedure ChangeLevel(Level:TLevel);

procedure ShowLabelOnPanel(Top,Left:Integer);

procedure RemoveLabelfromPanel;

procedure CustomOnClickLabel(Sender:TObject);

procedure CustomOnClickPanel(Sender:TObject);

procedure TimerDestroyOnTimer(Sender:TObject);

procedure TimerCreateOnTimer(Sender:TObject);

public

constructor IsisStart(Surface:TPanel;Display:TLabel);reintroduce;

procedure Start;

procedure ReStart;

procedure Stop;

end;

[/code]

Essa é classe que comandará todas as ações no jogo. Nos posts seguintes estarei explicando todos os métodos e propriedades dessa classe em detalhes.

Abraços e aguardem os próximos posts !

Antonio Spitaleri.