//---------------------------------------------------------------------------

#ifndef LogoCmdUH
#define LogoCmdUH
#include <Controls.hpp>
#include <System.hpp>
#include <DString.h>
#include <Graphics.hpp>

//---------------------------------------------------------------------------

class LogoCmd;
struct CmdList{
	bool (__fastcall*Fun)(LogoCmd *logo,int);
	int Num;
	int Len;
};

class LogoCmd{
	CmdList *List;
	int Count;
	int Pos;
	double A;
	float x,y,x0,y0;
	bool Draw,Show;
	TCanvas *Ca;
	TControl *Ps;
public:
	static bool __fastcall Up(LogoCmd *logo,int );
	static bool __fastcall Down(LogoCmd *logo,int);
	static bool __fastcall PenColor(LogoCmd *logo,int clr);
	static bool __fastcall Clear(LogoCmd *logo,int);
	static bool __fastcall Left(LogoCmd *logo,int dA);
	static bool __fastcall Right(LogoCmd *logo,int dA);
	static bool __fastcall Forward(LogoCmd *logo,int dL);
	static bool __fastcall Back(LogoCmd *logo,int dL);
	static bool __fastcall Redo(LogoCmd *logo,int count);
	static bool __fastcall ShowIt(LogoCmd *logo,int);
	static bool __fastcall HideIt(LogoCmd *logo,int);

	__fastcall LogoCmd():Count(0),Pos(0),Ca(0),Ps(0),Draw(false),Show(false),List(0){};
	__fastcall ~LogoCmd(){Ca=0;Ps=0;};
	bool __fastcall SetList(int n);
	bool __fastcall FreeList();
	bool __fastcall Set(TCanvas *c,TControl *p){bool Ret=false;if(c&&p){Ca = c;Ps = p;Ret=true;}return Ret;};
	bool __fastcall Run();
	bool __fastcall ReadFromFile(AnsiString filename);
	bool __fastcall Read(AnsiString strings);
	double __property Ange={read=A,write=A};
	float __property X={read=x,write=x0};
	float __property Y={read=y,write=y0};
};
//extern CmdList *LogoCmd::List;

#endif