DCL is never intelligible, here's a fragment :

$!            IF f$getdvi(F$trnlnm("MT_TK70"),"EXISTS") .EQS. "TRUE"
$!             THEN
$!                IF first_drive .EQS. f$getdvi(F$trnlnm("MT_TK70"),"FULLDEVNAM")
$!                THEN
$!                    init 'first_drive' 'tape_id'-01
$!                    fnd_drv=1
$!                    mount/noassist/foreign 'first_drive' 
$!                ENDIF
$!            ENDIF


Yes, it's nicely indented. Yes, I do know what it does. Can you tell that this particular code fragment is actually commented out? (This is from our site backup script, btw)

gdkxft is a small library that hooks up GDK to the Xft extension of XFree86.

All you need to know is that you get luvly antialiased fonts.