( DISPLAY-CURSOR, T, L )                                        : DISPLAY-CURSOR                                                    CR SPACE #LEAD TYPE 5E EMIT                                     #LAG TYPE #LOCATE . DROP ;                                                                                                  : T                                                                 C/L * R# ! 0 DISPLAY-CURSOR ;                                                                                               : L                                                                 SCR @ LIST ;                                                                                                                                                                                                                                                                                                                                                                                -->                                                             