Chilkat FoxPro Events (.prg event classes)

I wrote some code to generate FoxPro .prg templates for the ActiveX events. They are available here: http://www.chilkatsoft.com/download/chilkat_foxpro_prg.zip

An example of the Ftp2 events is shown here:

ftp2EventHandler = CREATEOBJECT("MyFtp2Events")
loFtp2 = CreateObject("Chilkat_9_5_0.Ftp2")
EVENTHANDLER(loFtp2,ftp2EventHandler)
DEFINE CLASS MyFtp2Events AS SESSION OLEPUBLIC
IMPLEMENTS _IChilkatFtp2Events IN "Chilkat_9_5_0.Ftp2"
PROCEDURE _IChilkatFtp2Events_AbortCheck(abort As Number)
? "AbortCheck"
ENDPROC
PROCEDURE _IChilkatFtp2Events_BeginDownloadFile(path As String, skip As Number)
? "BeginDownloadFile"
ENDPROC
PROCEDURE _IChilkatFtp2Events_BeginUploadFile(path As String, skip As Number)
? "BeginUploadFile"
ENDPROC
PROCEDURE _IChilkatFtp2Events_DownloadRate(byteCount As Number, bytesPerSec As Number)
? "DownloadRate"
ENDPROC
PROCEDURE _IChilkatFtp2Events_EndDownloadFile(path As String, byteCount As Number)
? "EndDownloadFile"
ENDPROC
PROCEDURE _IChilkatFtp2Events_EndUploadFile(path As String, byteCount As Number)
? "EndUploadFile"
ENDPROC
PROCEDURE _IChilkatFtp2Events_PercentDone(pctDone As Number, abort As Number)
? "PercentDone"
ENDPROC
PROCEDURE _IChilkatFtp2Events_ProgressInfo(name As String, value As String)
? "ProgressInfo"
ENDPROC
PROCEDURE _IChilkatFtp2Events_TaskCompleted(task As Generic)
? "TaskCompleted"
ENDPROC
PROCEDURE _IChilkatFtp2Events_UploadRate(byteCount As Number, bytesPerSec As Number)
? "UploadRate"
ENDPROC
PROCEDURE _IChilkatFtp2Events_VerifyDeleteDir(path As String, skip As Number)
? "VerifyDeleteDir"
ENDPROC
PROCEDURE _IChilkatFtp2Events_VerifyDeleteFile(path As String, skip As Number)
? "VerifyDeleteFile"
ENDPROC
PROCEDURE _IChilkatFtp2Events_VerifyDownloadDir(path As String, skip As Number)
? "VerifyDownloadDir"
ENDPROC
PROCEDURE _IChilkatFtp2Events_VerifyUploadDir(path As String, skip As Number)
? "VerifyUploadDir"
ENDPROC
ENDDEFINE