🚀 go-pugleaf

I have been sitting here watching my upload progress and in the past 5 
minutes only 15 KB of a certain file have been uploaded.  The weird thing is 
that sometimes the transfer is blazingly fast, and other times it goes at 
literally about 2 or 3 KBs a second.  I am uploading the files-in-question 
to my Tripod account via my own mini-FTP program.  FTPClient is a TIdFTP 
component.  Below is my code:

    FTPClient->Host = "ftp.tripod.com";
    FTPClient->Port = 21;
    FTPClient->User = "winboxer";
    FTPClient->Password = "CENSORED";
    FTPClient->Connect();

    Memo1->Lines->Add("Uploading version information...");
    FTPClient->TransferType = ftASCII;
    FTPClient->Put("version.txt", "version.txt", false);

    Memo1->Lines->Add("Uploading WinBoxer program...");
    FTPClient->TransferType = ftBinary;
    FTPClient->Put("winboxer.zip", "winboxer.zip", false);

    Memo1->Lines->Add("Uploading WinBoxer source code...");
    FTPClient->Put("winboxer_source.zip", "winboxer_source.zip", false);

    Memo1->Lines->Add("Publishing complete.  Disconnecting...");
    FTPClient->Disconnect();


Like I said before, sometimes the speed is very fast but most of the time it 
goes at a snail's pace.  One thing that I've noticed is that it does NOT 
alternate between the two speeds: if it starts slow, it will remain slow the 
whole time...if it starts fast, it will remain fast the whole time.  I'm on 
DSL, so I know it's not my connection speed.  Also, I can log into my Tripod 
account via FTP using Internet Explorer and upload files and they go 
super-fast - even at the SAME time that they're uploading slow using my 
program.  Is there something about my code that may make it (on occasion) 
procede very slowly?