> 1 <

Автор Сообщение

Яков Замир Кацман (нью)

Members


Статус

22 сообщений

Где: Russia
Род занятий:
Возраст:

#7811   2017-12-03 02:05 GMT+3 часа(ов)      
load(draw);
 
:lisp (defun $random-from-range (start end)
(+ start (random (+ 1 (- end start))))
)
 
(defun $gridfunction()
(let (a '())
(setq a
(list '(MLIST SIMP)
(list '(MLIST SIMP) ($random-from-range 1 100) ($random-from-range 1 100))
(list '(MLIST SIMP) ($random-from-range 1 100) ($random-from-range 1 100))
(list '(MLIST SIMP) ($random-from-range 1 100) ($random-from-range 1 100))
(list '(MLIST SIMP) ($random-from-range 1 100) ($random-from-range 1 100))
(list '(MLIST SIMP) ($random-from-range 1 100) ($random-from-range 1 100))
(list '(MLIST SIMP) ($random-from-range 1 100) ($random-from-range 1 100))
)
)
)
)
 
bs:gridfunction()
 
draw2d(
xrange = [0,100],
yrange = [0,100],
point_size = 0.5,
point_type = filled_circle,
points(bs)
);
> 1 <


Онлайн :

0 пользователь(ей), 9 гость(ей) :




Реклама на сайте: