myDocument = app.activeDocument;
myFonts = myDocument.fonts;
myDocumentName = "untitled";

try {
		myDocumentName = myDocument.name;
		}
	catch(e){}

myString = ("Font report for: " + myDocumentName + "\r\n");
myString = myString + ("Number of fonts used: " + myFonts.length + "\r\n");


for (i = 0; i < myFonts.length; i++)
	{
		myFont = myFonts[i];		
		myString = myString + ("Font name: " +  myFont.name + "\r");
		myString = myString + ("Font family: " + myFont.fontFamily + "\r");
		myString = myString + ("Version: " + myFont.version + "\r");
		
		//Check the font type
		if (myFont.fontType == "1718899796")
			{myType = "TrueType";	}
			else if (myFont.fontType == "1718899761")
				{myType = "Type 1";}
				else if (myFont.fontType == "1718898516")
					{myType = "OpenType TT";}
					else if (myFont.fontType == "1718898505")
						{myType = "OpenType CID";}
						else if (myFont.fontType == "1718895209")
							{myType = "Bitmap";}
							else {myType = "Unknown";}
		
		myString = myString + ("Font type: " + myType + "\r");					
		
		//Check the font status
		if (myFont.status == "1718831470")
			{myStatus = "Installed";}
				else{myStatus = "Missing";}
					
		myString = myString + ("Font status: " + myStatus + "\r");	
		myString =  myString + ("\r" + "---------------------------" + "\r\r");	
		}

//Create a new document and textframe to display the report
myNewDoc = app.documents.add();
myNewTextFrame = myNewDoc.pages[0].textFrames.add(); 
myNewTextFrame.contents = myString;
myNewTextFrame.geometricBounds = [0,0,60,55];
myNewTextFrame.fit(FitOptions.FRAME_TO_CONTENT);