OSErr FSpCreate(FSSpec *f,long c,long t,long s)
{
char name[256];
char info[256];
BYTE data[60];
HANDLE h;
DWORD dw=60;
DWORD err=0;

memcpy(name,f->name+1,f->name[0]);
name[f->name[0]]=0;

h=CreateFile(name,GENERIC_WRITE,0,NULL,
		CREATE_NEW,0,INVALID_HANDLE_VALUE);

if (h==INVALID_HANDLE_VALUE) return GetLastError();

CloseHandle(h);

strcpy(info,name);
strcat(info,":AFP_AfpInfo");

h=CreateFile(info,GENERIC_WRITE,0,NULL,
		CREATE_ALWAYS,0,INVALID_HANDLE_VALUE);

if (h==INVALID_HANDLE_VALUE) 
{
	dw=GetLastError();

	DeleteFile(name);

	return dw;
}

memset(data,0,sizeof(data));
memcpy(data,"AFP",3);
memcpy(data+0x10,&t,4);
memcpy(data+0x14,&c,4);

data[6]=1;
data[7]=0;
data[0xF]=0x80;
data[0x18]=1;

if (!WriteFile(h,data,sizeof(data),&dw,NULL))
{
	err=GetLastError();
}

CloseHandle(h);

if (err)
{
	DeleteFile(name);
}

return err;
}