1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
;;
;; DO NOT EDIT THIS FILE
;; this file is automatically generated from euslisp+euslib;;
;;
(provide :room73a3-scene "models/room73a3-scene.l")
(load "models/room73a3-73a3-ground-object.l")
(load "models/room73a3-door-right-object.l")
(load "models/room73a3-clock-object.l")
(load "models/room73a3-plus-830-locker-object.l")
(load "models/room73a3-bariera-1400-middle-0-object.l")
(load "models/room73a3-bariera-1400-middle-1-object.l")
(load "models/room73a3-bariera-1400-middle-2-object.l")
(load "models/room73a3-bariera-1400-middle-3-object.l")
(load "models/room73a3-bariera-1400-middle-4-object.l")
(load "models/room73a3-askul-1600-desk-0-object.l")
(load "models/room73a3-askul-1600-desk-1-object.l")
(load "models/room73a3-askul-1200x700-desk-0-object.l")
(load "models/room73a3-officeprinter-object.l")
(load "models/room73a3-askul-1200x700-desk-1-object.l")
(load "models/room73a3-village-chair-0-object.l")
(load "models/room73a3-bariera-1400-middle-5-object.l")
(load "models/room73a3-bariera-1400-middle-6-object.l")
(load "models/room73a3-bariera-1400-middle-7-object.l")
(load "models/room73a3-bariera-1400-middle-8-object.l")
(load "models/room73a3-bariera-1400-middle-9-object.l")
(load "models/room73a3-village-chair-1-object.l")
(load "models/room73a3-village-chair-2-object.l")
(load "models/room73a3-village-chair-3-object.l")
(load "models/room73a3-village-chair-4-object.l")
(load "models/room73a3-village-chair-5-object.l")
(load "models/room73a3-askul-1600-desk-2-object.l")
(load "models/room73a3-askul-1400-desk-0-object.l")
(load "models/room73a3-askul-1400-desk-1-object.l")
(load "models/room73a3-askul-1400-desk-2-object.l")
(load "models/room73a3-unknown-1200-desk-object.l")
(load "models/room73a3-shelf-0-object.l")
(load "models/room73a3-shelf-1-object.l")
(load "models/room73a3-shelf-2-object.l")
(load "models/room73a3-external-wall-3-object.l")
(load "models/room73a3-external-wall-2-object.l")
(load "models/room73a3-external-wall-1-object.l")
(load "models/room73a3-external-wall-0-object.l")
(defclass room73a3-scene
:super scene-model
:slots ())
(defmethod room73a3-scene
(:init
(&rest args &key (name "room73a3") &allow-other-keys)
(let ()
(send-super*
:init :name name :objects
(list
(send (room73a3-73a3-ground) :transform (make-coords :pos (float-vector 4210.0 1725.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-door-right) :transform (make-coords :pos (float-vector 0.0 405.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-clock) :transform (make-coords :pos (float-vector 25.0 1500.0 2050.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-plus-830-locker) :transform (make-coords :pos (float-vector 565.0 3100.0 0.0) :rot #2f((2.220446e-16 1.0 0.0) (-1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-bariera-1400-middle-0) :transform (make-coords :pos (float-vector 7050.0 3450.0 35.0) :rot #2f((2.220446e-16 1.0 0.0) (-1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-bariera-1400-middle-1) :transform (make-coords :pos (float-vector 5650.0 3450.0 35.0) :rot #2f((2.220446e-16 1.0 0.0) (-1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-bariera-1400-middle-2) :transform (make-coords :pos (float-vector 4250.0 3450.0 35.0) :rot #2f((2.220446e-16 1.0 0.0) (-1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-bariera-1400-middle-3) :transform (make-coords :pos (float-vector 2850.0 3450.0 35.0) :rot #2f((2.220446e-16 1.0 0.0) (-1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-bariera-1400-middle-4) :transform (make-coords :pos (float-vector 1450.0 3450.0 35.0) :rot #2f((2.220446e-16 1.0 0.0) (-1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-askul-1600-desk-0) :transform (make-coords :pos (float-vector 4600.0 3000.0 0.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-askul-1600-desk-1) :transform (make-coords :pos (float-vector 6200.0 3000.0 0.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-askul-1200x700-desk-0) :transform (make-coords :pos (float-vector 7600.0 3050.0 0.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-officeprinter) :transform (make-coords :pos (float-vector 3400.0 3200.0 0.0) :rot #2f((2.220446e-16 1.0 0.0) (-1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-askul-1200x700-desk-1) :transform (make-coords :pos (float-vector 2200.0 3000.0 0.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-village-chair-0) :transform (make-coords :pos (float-vector 2200.0 2600.0 0.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-bariera-1400-middle-5) :transform (make-coords :pos (float-vector 2800.0 30.0 35.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-bariera-1400-middle-6) :transform (make-coords :pos (float-vector 4200.0 30.0 35.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-bariera-1400-middle-7) :transform (make-coords :pos (float-vector 5600.0 30.0 35.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-bariera-1400-middle-8) :transform (make-coords :pos (float-vector 7000.0 30.0 35.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-bariera-1400-middle-9) :transform (make-coords :pos (float-vector 8400.0 30.0 35.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-village-chair-1) :transform (make-coords :pos (float-vector 7500.0 800.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-village-chair-2) :transform (make-coords :pos (float-vector 6000.0 800.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-village-chair-3) :transform (make-coords :pos (float-vector 4600.0 800.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-village-chair-4) :transform (make-coords :pos (float-vector 3200.0 800.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-village-chair-5) :transform (make-coords :pos (float-vector 1900.0 800.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-askul-1600-desk-2) :transform (make-coords :pos (float-vector 7500.0 400.0 0.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-askul-1400-desk-0) :transform (make-coords :pos (float-vector 6000.0 400.0 0.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-askul-1400-desk-1) :transform (make-coords :pos (float-vector 4600.0 400.0 0.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-askul-1400-desk-2) :transform (make-coords :pos (float-vector 3200.0 400.0 0.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-unknown-1200-desk) :transform (make-coords :pos (float-vector 1900.0 400.0 0.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-shelf-0) :transform (make-coords :pos (float-vector 8271.0 2000.0 0.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-shelf-1) :transform (make-coords :pos (float-vector 8271.0 2585.0 0.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-shelf-2) :transform (make-coords :pos (float-vector 150.0 2000.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-external-wall-3) :transform (make-coords :pos (float-vector 8571.0 1725.0 1350.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(send (room73a3-external-wall-2) :transform (make-coords :pos (float-vector 4210.0 -150.0 1350.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-external-wall-1) :transform (make-coords :pos (float-vector 4210.0 3600.0 1350.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
(send (room73a3-external-wall-0) :transform (make-coords :pos (float-vector -70.0 2275.0 1350.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
(make-cascoords :name "door-spot" :pos (float-vector 675.0 210.0 0.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0)))
(make-cascoords :name "table-spot" :pos (float-vector 5000.0 1250.0 0.0) :rot #2f((2.220446e-16 -1.0 0.0) (1.0 2.220446e-16 0.0) (0.0 0.0 1.0)))
(make-cascoords :name "cook-spot" :pos (float-vector 1100.0 1600.0 0.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0)))
(make-cascoords :name "init-spot" :pos (float-vector 500.0 0.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0)))
)
args)
))
)
(defun room73a3 (&rest args) (setq *room73a3* (instance* room73a3-scene :init args)))
|
