AssignCrt toimii täysin samalla tavalla kuin Assign mutta AssignCrt:ssä tiedoston nimeä ei ilmoiteta. Sen sijaan tekstitiedostoa käytetään CRT:n(Cathode ray tube, näyttö) kanssa. Tämän ansiosta näytölle tulostus ja syötteet toimivat nopeammin kuin mitä normaalisti olisi mahdollista.
procedure AssignCrt(var F: text);