AutoHotkey Community

[SKAN]

A simple script to Search/Preview/Download from over 6600 TrueType fonts
available in http://www.webpagepublicity.com

Download FontDL.ahk




The script requires TheFontList.txt ( 138 KiB ) which will be auto-downloaded as and when required.


• Keywords should be seperated from each other with +
  
• Double click on a fontname or press enter to Preview it
  
• Tested in Vista Ultimate & Windows XP


Thanks to Sean for helping me with DoFileDownload()
Thanks to olfen for HttpQueryInfo() from which HttpQueryContentLength() was derived.
Thanks to Lexikos / Laszlo for the MulDiv tip on extracting string from a pointer


Code:

HttpQueryContentLength( URL ) { ; Thx olfen www.autohotkey.com/forum/viewtopic.php?t=10510  hIOU := DllCall( "wininet\InternetOpenUrlA", UInt       , ( hIO := DllCall( "wininet\InternetOpenA", Str,N, UInt,1, Str,N, Str,N, UInt,0 ) )       , Str,URL, Str,N, UInt,0, UInt,0x80000000, UInt,0 )  If ErrorLevel || !hIOU     Return -1   Loop % VarSetCapacity( CL,20,0 ) - 15    If Q:=DllCall( "wininet\HttpQueryInfoA", UInt,hIOU, Int,5, UInt,&CL, UIntP,Len, Int,0 )      Break  DllCall( "wininet\InternetCloseHandle", UInt,hIO )  DllCall( "wininet\InternetCloseHandle", UInt,hIOU ) Return, Q ? DllCall( "MulDiv", Int,&CL, Int,1, Int,1, Str ) : -2    }

_________________
URLGet - Internet Explorer based Downloader

[Z_Gecko]

Very Nice!
amazing as alway, SKAN

[SoggyDog]

Sweet!
_________________

SoggyDog
Dwarf Fortress:
"The most intriguing game I've ever played."

[infogulch]

Really cool SKAN! You should add a "Download & Install" button cuz the if we're using this awesome script, we're already too lazy to go look for the font ourself, let alone actually dragging it into the fonts on our system.
_________________
Scripts - License

[tidbit]

I like it alot very cool
when saving, I just set the save directory to font folder insta install.
_________________
rawr. be very afraid
*poke*
Note: My name is all lowercase for a reason.
Even monkeys fall from trees. - Japanese proverb

[infogulch]

[skwire]

Fantastic, SKAN. Really, really nice.

[Trubbleguy]

Superb, just superb, I had no idea you could get so many free fonts from one place.
Thanks Skan.
_________________

[SKAN]

Thanks to everyone.

Here is an updated version, that uses Microsoft's fontinst tool, to install the downloaded fonts.



Download TFD-v1.0.zip 79.96 KiB ( The Script, FontList & fontinst.exe )

( VirusTotal.com results for fontinst.exe )
_________________
URLGet - Internet Explorer based Downloader

[SoggyDog]

It just keeps getting better!
Awesome tool for graphic designers.
_________________

SoggyDog
Dwarf Fortress:
"The most intriguing game I've ever played."