substr

(substr napis początek długość)

Pobiera część z tekstu.

Przykład jak można pobrać rozszeżenie ze wskazanego pliku *.

(setq plik (getfiled "Wskaż plik" " " "*" 2 ))
(setq typPliku (substr plik (- (strlen plik ) 2) ) )

Przykład odczytujący datę w formacie listy (dzień miesiąc rok)
(setq Stamp(rtos(getvar "CDate") 2))
(list (atoi(substr Stamp 7 2)) (atoi(substr Stamp 5 2)) (atoi(substr Stamp 1 4)))

* Oczywiście ten przykład jest tylko poglądowy do rzeczywistego odczytania rozszeżenia pliku lepiej użyć funkcji (vl-filename-extension file name). Daje nam ona odporność na sytuacje gdzie rozszeżenie może mieć 4 znaki, lub plik może nie mieć rozszerzenia lub jako ścieżkę podamy katalogo a nie plik