File: room73b2-scene.l

package info (click to toggle)
euslisp 9.32%2Bdfsg-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 55,268 kB
  • sloc: ansic: 41,693; lisp: 3,339; makefile: 286; sh: 238; asm: 138; python: 53
file content (215 lines) | stat: -rw-r--r-- 21,933 bytes parent folder | download | duplicates (2)
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
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
;;
;; DO NOT EDIT THIS FILE
;; this file is automatically generated from euslisp+euslib;;
;;
(provide :room73b2-scene "models/room73b2-scene.l")

(load "models/room73b2-73b2-ground-object.l")
(load "models/room73b2-door-left-object.l")
(load "models/room73b2-door-right-object.l")
(load "models/room73b2-foldable-desk-object.l")
(load "models/room73b2-gifuplastic-900-cart-object.l")
(load "models/room73b2-kirin-steppy-black-ladder-object.l")
(load "models/room73b2-broom-object.l")
(load "models/room73b2-bamboo-broom-object.l")
(load "models/room73b2-azuma-broom-object.l")
(load "models/room73b2-azuma-short-broom-object.l")
(load "models/room73b2-cupboard-right-object.l")
(load "models/room73b2-trashbox3-object.l")
(load "models/room73b2-trashbox2-object.l")
(load "models/room73b2-trashbox1-object.l")
(load "models/room73b2-trashbox0-object.l")
(load "models/room73b2-coe-800-shelf-object.l")
(load "models/room73b2-coe-450-shelf-object.l")
(load "models/room73b2-uchida-shelf-1100-object.l")
(load "models/room73b2-uchida-shelf-1300-object.l")
(load "models/room73b2-uchida-shelf-1300-object.l")
(load "models/room73b2-uchida-shelf-1300-object.l")
(load "models/room73b2-uchida-shelf-1300-object.l")
(load "models/room73b2-uchida-shelf-1300-object.l")
(load "models/room73b2-uchida-shelf-1300-object.l")
(load "models/room73b2-bariera-1200-right-top-object.l")
(load "models/room73b2-bariera-1200-middle-0-object.l")
(load "models/room73b2-bariera-1200-middle-1-object.l")
(load "models/room73b2-bariera-1200-middle-2-object.l")
(load "models/room73b2-bariera-1200-middle-3-object.l")
(load "models/room73b2-bariera-1200-middle-4-object.l")
(load "models/room73b2-bariera-1200-middle-5-object.l")
(load "models/room73b2-bariera-1200-corner-object.l")
(load "models/room73b2-wanda-object.l")
(load "models/room73b2-iemon-object.l")
(load "models/room73b2-georgia-emerald-mountain-object.l")
(load "models/room73b2-hitachi-fiesta-refrigerator-object.l")
(load "models/room73b2-chair1-object.l")
(load "models/room73b2-chair0-object.l")
(load "models/room73b2-empty-box-object.l")
(load "models/room73b2-bottle-object.l")
(load "models/room73b2-sushi-cup2-object.l")
(load "models/room73b2-karimoku-table-object.l")
(load "models/room73b2-uchida-shelf-1300-object.l")
(load "models/room73b2-hrp2-parts-drawer-object.l")
(load "models/room73b2-plus-590-locker-object.l")
(load "models/room73b2-sharp-52-aquostv-object.l")
(load "models/room73b2-askul-1200x700-desk-0-object.l")
(load "models/room73b2-askul-1200x700-desk-1-object.l")
(load "models/room73b2-askul-1200x700-desk-2-object.l")
(load "models/room73b2-askul-1200x700-desk-3-object.l")
(load "models/room73b2-askul-1200x700-desk-4-object.l")
(load "models/room73b2-askul-1200x700-desk-5-object.l")
(load "models/room73b2-askul-1200x700-desk-6-object.l")
(load "models/room73b2-askul-1200x700-desk-7-object.l")
(load "models/room73b2-uchida-shelf-1100-object.l")
(load "models/room73b2-uchida-shelf-1300-object.l")
(load "models/room73b2-cupboard-left-object.l")
(load "models/room73b2-toshiba-clacio-refrigerator-object.l")
(load "models/room73b2-bariera-1400-middle-object.l")
(load "models/room73b2-bariera-900-middle-top-0-object.l")
(load "models/room73b2-bariera-900-middle-top-1-object.l")
(load "models/room73b2-bariera-900-left-top-object.l")
(load "models/room73b2-askul-1400-desk-object.l")
(load "models/room73b2-desk-0-object.l")
(load "models/room73b2-desk-1-object.l")
(load "models/room73b2-desk-2-object.l")
(load "models/room73b2-unknown-1200-desk-0-object.l")
(load "models/room73b2-unknown-1200-desk-1-object.l")
(load "models/room73b2-unknown-1200-desk-2-object.l")
(load "models/room73b2-unknown-1200-desk-3-object.l")
(load "models/room73b2-unknown-1200-desk-4-object.l")
(load "models/room73b2-external-wall-4-object.l")
(load "models/room73b2-external-wall-3-object.l")
(load "models/room73b2-external-wall-2-object.l")
(load "models/room73b2-external-wall-1-object.l")
(load "models/room73b2-external-wall-0-object.l")
(load "models/room73b2-panelwall-0-object.l")
(load "models/room73b2-sushi-cup-object.l")
(load "models/room73b2-mug-cup-object.l")
(load "models/room73b2-tray-object.l")
(load "models/room73b2-kettle-object.l")
(load "models/room73b2-knife-object.l")
(load "models/room73b2-sponge-object.l")
(load "models/room73b2-cup-object.l")
(load "models/room73b2-dish-object.l")
(load "models/room73b2-kitchen-shelf-object.l")
(load "models/room73b2-kitchen-object.l")

(defclass room73b2-scene
  :super scene-model
  :slots ())
(defmethod room73b2-scene
  (:init
   (&rest args &key (name "room73b2") &allow-other-keys)
   (let ()
     (send-super*
      :init :name name :objects
      (list
 (send (room73b2-73b2-ground) :transform (make-coords :pos (float-vector 5957.0 442.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-door-left) :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 (room73b2-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 (room73b2-foldable-desk) :transform (make-coords :pos (float-vector 1850.0 -2100.0 0.0) :rot #2f((7.216450e-16 1.0 0.0) (-1.0 7.216450e-16 0.0) (0.0 0.0 1.0))))
 (send (room73b2-gifuplastic-900-cart) :transform (make-coords :pos (float-vector 2700.0 -600.0 0.0) :rot #2f((7.216450e-16 1.0 0.0) (-1.0 7.216450e-16 0.0) (0.0 0.0 1.0))))
 (send (room73b2-kirin-steppy-black-ladder) :transform (make-coords :pos (float-vector 1200.0 -1500.0 0.0) :rot #2f((-0.5 0.866025 0.0) (-0.866025 -0.5 0.0) (0.0 0.0 1.0))))
 (send (room73b2-broom) :transform (make-coords :pos (float-vector 600.0 -3000.0 0.0) :rot #2f((0.707107 -0.707107 0.0) (0.707107 0.707107 0.0) (0.0 0.0 1.0))))
 (send (room73b2-bamboo-broom) :transform (make-coords :pos (float-vector 450.0 -3000.0 0.0) :rot #2f((0.707107 -0.707107 0.0) (0.707107 0.707107 0.0) (0.0 0.0 1.0))))
 (send (room73b2-azuma-broom) :transform (make-coords :pos (float-vector 150.0 -3000.0 0.0) :rot #2f((0.707107 -0.707107 0.0) (0.707107 0.707107 0.0) (0.0 0.0 1.0))))
 (send (room73b2-azuma-short-broom) :transform (make-coords :pos (float-vector 300.0 -3000.0 0.0) :rot #2f((0.707107 -0.707107 0.0) (0.707107 0.707107 0.0) (0.0 0.0 1.0))))
 (send (room73b2-cupboard-right) :transform (make-coords :pos (float-vector 2575.0 1300.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 (room73b2-trashbox3) :transform (make-coords :pos (float-vector 2575.0 2525.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-trashbox2) :transform (make-coords :pos (float-vector 2575.0 2875.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-trashbox1) :transform (make-coords :pos (float-vector 2575.0 3225.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-trashbox0) :transform (make-coords :pos (float-vector 2575.0 3575.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-coe-800-shelf) :transform (make-coords :pos (float-vector 2575.0 1900.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 (room73b2-coe-450-shelf) :transform (make-coords :pos (float-vector 2575.0 4025.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 (room73b2-uchida-shelf-1100) :transform (make-coords :pos (float-vector 11400.0 3220.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 (room73b2-uchida-shelf-1300) :transform (make-coords :pos (float-vector 11720.0 -2710.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 (room73b2-uchida-shelf-1300) :transform (make-coords :pos (float-vector 11720.0 -1445.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 (room73b2-uchida-shelf-1300) :transform (make-coords :pos (float-vector 11720.0 -180.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 (room73b2-uchida-shelf-1300) :transform (make-coords :pos (float-vector 11720.0 1085.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 (room73b2-uchida-shelf-1300) :transform (make-coords :pos (float-vector 11720.0 2350.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 (room73b2-uchida-shelf-1300) :transform (make-coords :pos (float-vector 235.0 -1550.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-bariera-1200-right-top) :transform (make-coords :pos (float-vector 2110.0 -3420.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 (room73b2-bariera-1200-middle-0) :transform (make-coords :pos (float-vector 3310.0 -3420.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 (room73b2-bariera-1200-middle-1) :transform (make-coords :pos (float-vector 4510.0 -3420.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 (room73b2-bariera-1200-middle-2) :transform (make-coords :pos (float-vector 5710.0 -3420.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 (room73b2-bariera-1200-middle-3) :transform (make-coords :pos (float-vector 6910.0 -3420.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 (room73b2-bariera-1200-middle-4) :transform (make-coords :pos (float-vector 8110.0 -3420.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 (room73b2-bariera-1200-middle-5) :transform (make-coords :pos (float-vector 9310.0 -3420.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 (room73b2-bariera-1200-corner) :transform (make-coords :pos (float-vector 9370.0 -2150.0 35.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-wanda) :transform (make-coords :pos (float-vector 5685.0 790.0 1093.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-iemon) :transform (make-coords :pos (float-vector 5685.0 1010.0 1153.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-georgia-emerald-mountain) :transform (make-coords :pos (float-vector 5685.0 900.0 1093.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-hitachi-fiesta-refrigerator) :transform (make-coords :pos (float-vector 5720.0 900.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 (room73b2-chair1) :transform (make-coords :pos (float-vector 3700.0 2000.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 (room73b2-chair0) :transform (make-coords :pos (float-vector 4700.0 2000.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 (room73b2-empty-box) :transform (make-coords :pos (float-vector 4050.0 2000.0 700.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-bottle) :transform (make-coords :pos (float-vector 4000.0 1750.0 700.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-sushi-cup2) :transform (make-coords :pos (float-vector 4000.0 2200.0 700.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-karimoku-table) :transform (make-coords :pos (float-vector 4200.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 (room73b2-uchida-shelf-1300) :transform (make-coords :pos (float-vector 5720.0 2800.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 (room73b2-hrp2-parts-drawer) :transform (make-coords :pos (float-vector 5720.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))))
 (send (room73b2-plus-590-locker) :transform (make-coords :pos (float-vector 6400.0 3100.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-sharp-52-aquostv) :transform (make-coords :pos (float-vector 4200.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 (room73b2-askul-1200x700-desk-0) :transform (make-coords :pos (float-vector 8550.0 -2700.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 (room73b2-askul-1200x700-desk-1) :transform (make-coords :pos (float-vector 7350.0 -2700.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 (room73b2-askul-1200x700-desk-2) :transform (make-coords :pos (float-vector 6150.0 -2700.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 (room73b2-askul-1200x700-desk-3) :transform (make-coords :pos (float-vector 4950.0 -2700.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 (room73b2-askul-1200x700-desk-4) :transform (make-coords :pos (float-vector 3750.0 -2700.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 (room73b2-askul-1200x700-desk-5) :transform (make-coords :pos (float-vector 2550.0 -2700.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 (room73b2-askul-1200x700-desk-6) :transform (make-coords :pos (float-vector 1350.0 -2700.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 (room73b2-askul-1200x700-desk-7) :transform (make-coords :pos (float-vector 285.0 -1550.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-uchida-shelf-1100) :transform (make-coords :pos (float-vector 3549.0 3985.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 (room73b2-uchida-shelf-1300) :transform (make-coords :pos (float-vector 4749.0 3985.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 (room73b2-cupboard-left) :transform (make-coords :pos (float-vector 2048.0 4073.5 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 (room73b2-toshiba-clacio-refrigerator) :transform (make-coords :pos (float-vector 1430.0 3950.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 (room73b2-bariera-1400-middle) :transform (make-coords :pos (float-vector 9300.0 4320.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 (room73b2-bariera-900-middle-top-0) :transform (make-coords :pos (float-vector 8400.0 4320.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 (room73b2-bariera-900-middle-top-1) :transform (make-coords :pos (float-vector 7500.0 4320.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 (room73b2-bariera-900-left-top) :transform (make-coords :pos (float-vector 6600.0 4320.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 (room73b2-askul-1400-desk) :transform (make-coords :pos (float-vector 10000.0 3950.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 (room73b2-desk-0) :transform (make-coords :pos (float-vector 8850.0 3950.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 (room73b2-desk-1) :transform (make-coords :pos (float-vector 7950.0 3950.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 (room73b2-desk-2) :transform (make-coords :pos (float-vector 7050.0 3950.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 (room73b2-unknown-1200-desk-0) :transform (make-coords :pos (float-vector 11500.0 -2710.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 (room73b2-unknown-1200-desk-1) :transform (make-coords :pos (float-vector 11500.0 -1445.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 (room73b2-unknown-1200-desk-2) :transform (make-coords :pos (float-vector 11500.0 -180.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 (room73b2-unknown-1200-desk-3) :transform (make-coords :pos (float-vector 11500.0 1085.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 (room73b2-unknown-1200-desk-4) :transform (make-coords :pos (float-vector 11500.0 2350.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 (room73b2-external-wall-4) :transform (make-coords :pos (float-vector 12065.0 443.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 (room73b2-external-wall-3) :transform (make-coords :pos (float-vector 5957.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 (room73b2-external-wall-2) :transform (make-coords :pos (float-vector 5957.0 4485.0 1350.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-external-wall-1) :transform (make-coords :pos (float-vector -70.0 -2125.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 (room73b2-external-wall-0) :transform (make-coords :pos (float-vector -70.0 2567.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 (room73b2-panelwall-0) :transform (make-coords :pos (float-vector 5979.0 2655.0 1120.0) :rot #2f((2.220446e-16 1.0 0.0) (-1.0 2.220446e-16 0.0) (0.0 0.0 1.0))))
 (send (room73b2-sushi-cup) :transform (make-coords :pos (float-vector 300.0 1800.0 1515.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-mug-cup) :transform (make-coords :pos (float-vector 500.0 1750.0 830.0) :rot #2f((1.0 2.449294e-16 0.0) (-2.449294e-16 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-tray) :transform (make-coords :pos (float-vector 500.0 1900.0 825.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-kettle) :transform (make-coords :pos (float-vector 500.0 1500.0 825.0) :rot #2f((1.0 2.449294e-16 0.0) (-2.449294e-16 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-knife) :transform (make-coords :pos (float-vector 550.0 2000.0 840.0) :rot #2f((-1.0 -2.465190e-32 1.224647e-16) (1.224647e-16 -2.220446e-16 1.0) (0.0 1.0 2.220446e-16))))
 (send (room73b2-sponge) :transform (make-coords :pos (float-vector 250.0 2650.0 690.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-cup) :transform (make-coords :pos (float-vector 600.0 3300.0 820.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-dish) :transform (make-coords :pos (float-vector 400.0 3300.0 820.0) :rot #2f((-1.0 -1.224647e-16 0.0) (1.224647e-16 -1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-kitchen-shelf) :transform (make-coords :pos (float-vector 180.0 1955.0 1500.0) :rot #2f((1.0 2.449294e-16 0.0) (-2.449294e-16 1.0 0.0) (0.0 0.0 1.0))))
 (send (room73b2-kitchen) :transform (make-coords :pos (float-vector 305.0 2175.0 0.0) :rot #2f((1.0 2.449294e-16 0.0) (-2.449294e-16 1.0 0.0) (0.0 0.0 1.0))))
 (make-cascoords :name "/eng2/7f/room73B2-front-of-kitchenboard" :pos (float-vector 1350.0 1850.0 0.0) :rot #2f((-1.0 0.0 0.0) (0.0 -1.0 0.0) (0.0 0.0 1.0)))
 (make-cascoords :name "/eng2/7f/room73B2-sink-front" :pos (float-vector 1355.0 2450.0 0.0) :rot #2f((-1.0 0.0 0.0) (0.0 -1.0 0.0) (0.0 0.0 1.0)))
 (make-cascoords :name "/eng2/7f/room73B2-beside-chair" :pos (float-vector 3860.0 350.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0)))
 (make-cascoords :name "/eng2/7f/room73B2-far-chair-back" :pos (float-vector 3470.0 1150.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0)))
 (make-cascoords :name "/eng2/7f/room73B2-tmp-chair-back" :pos (float-vector 3280.0 2150.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0)))
 (make-cascoords :name "/eng2/7f/room73B2-chair-back" :pos (float-vector 3580.0 1150.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0)))
 (make-cascoords :name "/eng2/7f/room73B2-table-front" :pos (float-vector 4200.0 1000.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0)))
 (make-cascoords :name "/eng2/7f/room73B2-table-back" :pos (float-vector 5155.0 10.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 "/eng2/7f/room73B2-table-side" :pos (float-vector 5150.0 2180.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 "/eng2/7f/room73B2-front-kitchen-table" :pos (float-vector 2293.0 1983.0 0.0) :rot #2f((-1.0 0.0 0.0) (0.0 -1.0 0.0) (0.0 0.0 1.0)))
 (make-cascoords :name "/eng2/7f/room73B2-front-of-tv" :pos (float-vector 3700.0 1700.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 "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 "coe-spot" :pos (float-vector 1200.0 2300.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 1.0 0.0) (0.0 0.0 1.0)))
 (make-cascoords :name "broom-spot" :pos (float-vector 2250.0 1000.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 "table-spot" :pos (float-vector 4100.0 1600.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 "fridge-front-spot" :pos (float-vector 4800.0 1480.0 0.0) :rot #2f((1.0 0.0 0.0) (0.0 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 room73b2 (&rest args) (setq *room73b2* (instance* room73b2-scene :init args)))