Clovertech
The following line:
if {![string length $disp]} {set disp KILL}
means: if the length of $disp is 0, set disp to KILL.