Неверно сформированный список на входе

@pavel481516 · Регистрация: 12.02.2015

Author24 — интернет-сервис помощи студентам

Функция «lp» строит оси координат (строки 6-9),
запрашивает положение конечных точек отрезка (строки 12, 13), строит
отрезок (строка 15) и его зеркальное отражение относительно начала
координат (строки 17-25).

Ошибка:Неверно сформированный список на входе
Подскажите, как решить данную проблему. Заранее благодарен.

Lisp

(defun lp() ;1
(setvar "blipmode" 0) ;2
(setvar "cmdecho" 0) ;3
(command "ZOOM" "w" '(-100 -100) '(100 100)) ;4
(command "COLOR" 5) ;5
(command "LINE" (0 -100) '(0 100) ;6
(command) ;7
(command "LINE" (-100 0) '(100 0) ;8
(command) ;9
(setq st "Y") ;10
(while (= st "Y") ;11
(setq p1 (getpoint "\nPoint_1: ")) ;12
(setq p2 (getpoint "\nPoint_2: ")) ;13
(command "COLOR" 7) ;14
(command "LINE" p1 p2) ;15
(command) ;16
(setq x1 (- (nth 0 p1))) ;17
(setq x2 (- (nth 0 p2))) ;18
(setq y1 (- (nth 1 p1))) ;19
(setq y2 (- (nth 1 p2))) ;20
(setq pt1 (list(x1 y1)) ;21
(setq pt2 (list(x2 y2)) ;22
(command "COLOR" 1) ;23
(command "LINE" pt1 pt2) ;24
(command) ;25
(setq st (getstring "\nNext ? (Y/N):")) ;26
(setq st (strcase st)) ;27
))

@vlisp · 23.04.2017, 15:36

В строках 6,8,21,22 не хватает закрывающей скобки

@pavel481516 · 23.04.2017, 15:56 **[ТС]**

Спасибо, но теперь другая ошибка
ошибка:неверная функция в выражении: (0 -100))

@vlisp · 23.04.2017, 16:29

в строке 6, 8 не хватает апострофа
в строке 21, 22 лишние скобки

@pavel481516 · 23.04.2017, 16:36 **[ТС]**

Спасибо.

@vlisp 1018 / 964 / 152 Регистрация: 10.08.2015 Сообщений: 5,187
	23.04.2017, 15:36	2
	В строках 6,8,21,22 не хватает закрывающей скобки 1

@pavel481516 0 / 0 / 0 Регистрация: 12.02.2015 Сообщений: 16
	23.04.2017, 15:56 [ТС]	3
	Спасибо, но теперь другая ошибка ошибка:неверная функция в выражении: (0 -100)) 0

@vlisp 1018 / 964 / 152 Регистрация: 10.08.2015 Сообщений: 5,187
	23.04.2017, 16:29	4
	Сообщение было отмечено pavel481516 как решение Решение в строке 6, 8 не хватает апострофа в строке 21, 22 лишние скобки 2

@pavel481516 0 / 0 / 0 Регистрация: 12.02.2015 Сообщений: 16
	23.04.2017, 16:36 [ТС]	5
	Спасибо. 0

Неверно сформированный список на входе

Решение