Love Bytes

home *** CD-ROM | disk | FTP | other *** search

/ Love Bytes / LoveBytes.bin / lb.z / office.VRT / world.script < prev next >

Wrap

Text File | 1997-11-21 | 86.0 KB | 6,126 lines

; ; Script conversion of file OFFICE.WLD ; Type: WRLD Title: "\n\n\r" "World file OFFICE.WLD revision 97\n\r" "Saved from VRT version 5.00\n\r" "\x1A" ; ;-------Layers------------------------------------------------------------ ; Chunk: LayerNames NumLayers: 2 Name: "Default" Name: "System" End_Chunk ; ;-------Object 0------------------------------------------------------- ; Chunk: Standard Name: "RootObject" Number: 0 Size: 2147483647 2147483647 2147483647 Position: 0 0 0 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: ViewPoint Number: 100 Subchunk Number: 1 Type: 19 View: 3 Control: 2 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 500 500 500 Rotation: 0 Frame: 0 Type: Relative Offset: 0 0 0 Zoom: 0x248F Subchunk Number: 2 Type: 35 View: 0 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 2049962 18488 1946671 Rotation: 0 Frame: 0 Type: Relative Offset: 690 5188 0 Zoom: 0x1FFC Subchunk Number: 3 Type: 35 View: 0 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 2010528 62854 2009981 Rotation: 0 Frame: 0 Type: Relative Offset: 16386 32773 0 Zoom: 0x29CB Subchunk Number: 4 Type: 8 View: 0 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 2009081 20288 1999065 Rotation: 0 Frame: 0 Type: Relative Offset: 7846 19196 0 Zoom: 0x29CB End_Chunk Chunk: Colours Number: 6 0xD8 0x07 0x01 0xC8 0x03 0x01 End_Chunk Chunk: LightSource Brightness: 2048 Offset: -724 1448 -1254 Rotation: 0x0000 0x0000 0x0000 BeamWidth: 0 Dispersion: 200 Colour: 0xFF 0xFF 0xFF BeamEdge: 0 Flags: pOo End_Chunk Children: ; ;-------Object 16------------------------------------------------------- ; Chunk: Standard Name: "office hold" Number: 16 Size: 62000 33000 62000 Position: 1980000 0 1980000 Type: 65535 Layer: 0 DFlags: E End_Chunk Children: ; ;-------Object 62------------------------------------------------------- ; Chunk: Standard Name: "CEILING-REP" Number: 62 Size: 60000 0 60000 Position: 1000 33000 950 Type: 0 Layer: 0 DFlags: R OFlags: Ii End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x00 0x16 End_Chunk ; ;-------Object 52------------------------------------------------------- ; Chunk: Standard Name: "Anchor[52]" Number: 52 Size: 60000 32900 1000 Position: 1000 0 61000 Type: 1 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 7 End_Chunk Chunk: Colours Number: 2 0x77 0x20 End_Chunk ; ;-------Object 17------------------------------------------------------- ; Chunk: Standard Name: "desk[17]" Number: 17 Size: 11000 19000 10000 Position: 49000 300 50950 Type: 7 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 0.79688 1.00000 0.79688 0.00000 SubChunk Facet: 2 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 11 Index: 2 Image: 34 End_Chunk Chunk: Colours Number: 6 0x20 0x15 0x1E 0x1E 0x17 0x20 End_Chunk ; ;-------Object 172------------------------------------------------------- ; Chunk: Standard Name: "Chairbasehold[172]" Number: 172 Size: 7000 13708 7000 Position: 17000 300 45950 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 20------------------------------------------------------- ; Chunk: Standard Name: "chair seat" Number: 20 Size: 7000 8000 7000 Position: 0 5708 0 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 182------------------------------------------------------- ; Chunk: Standard Name: "Seatbase[182]" Number: 182 Size: 7000 1000 7000 Position: 0 0 0 Type: 10 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x3F 0x01 0x3F 0x3F 0x16 0x3F End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 21 End_Chunk ; ;-------Object 184------------------------------------------------------- ; Chunk: Standard Name: "Seatback[184]" Number: 184 Size: 7000 3999 1000 Position: 0 4000 5999 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 4 Mode: 0 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x01 0x75 0x01 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 37 Index: 2 Image: 21 End_Chunk ; ;-------Object 7------------------------------------------------------- ; Chunk: Standard Name: "Seatback[7]" Number: 7 Size: 1000 3000 1000 Position: 3000 1000 5999 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 4 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x76 0x01 0x75 End_Chunk Chunk: ImageRef Number: 3 Index: 1 Image: 38 Index: 2 Image: 65535 Index: 3 Image: 65535 End_Chunk End_Children ; ;-------Object 178------------------------------------------------------- ; Chunk: Standard Name: "caster1[178]" Number: 178 Size: 545 1079 353 Position: 3287 0 294 Type: 9 Layer: 0 End_Chunk Chunk: Distancing Visible: 44527 Invisible: 55659 Replace: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x31C7 0x0000 Centre: 138 376 177 End_Chunk ; ;-------Object 175------------------------------------------------------- ; Chunk: Standard Name: "caster4[175]" Number: 175 Size: 545 1079 353 Position: 3374 0 6562 Type: 9 Layer: 0 DFlags: r End_Chunk Chunk: Distancing Visible: 44527 Invisible: 55659 Replace: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 138 376 177 End_Chunk ; ;-------Object 173------------------------------------------------------- ; Chunk: Standard Name: "Wheelbase[173]" Number: 173 Size: 900 900 7000 Position: 3000 1079 0 Type: 10 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x15 0x01 0x19 0x3F 0x16 0x1B End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 38 End_Chunk ; ;-------Object 180------------------------------------------------------- ; Chunk: Standard Name: "Seatstem[180]" Number: 180 Size: 900 3800 900 Position: 3071 1908 3127 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 4 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 38 End_Chunk ; ;-------Object 19------------------------------------------------------- ; Chunk: Standard Name: "Wheelbase[19]" Number: 19 Size: 3000 900 900 Position: 0 1079 3127 Type: 10 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x3F 0x14 0x19 0x1A 0x16 0x1B End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 38 End_Chunk ; ;-------Object 18------------------------------------------------------- ; Chunk: Standard Name: "Wheelbase[18]" Number: 18 Size: 3000 900 900 Position: 3900 1079 3127 Type: 10 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x15 0x14 0x3F 0x1A 0x16 0x1B End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 38 End_Chunk ; ;-------Object 176------------------------------------------------------- ; Chunk: Standard Name: "caster2[176]" Number: 176 Size: 545 1079 353 Position: 400 0 3447 Type: 9 Layer: 0 End_Chunk Chunk: Distancing Visible: 44527 Invisible: 55659 Replace: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 138 376 177 End_Chunk ; ;-------Object 179------------------------------------------------------- ; Chunk: Standard Name: "caster5[179]" Number: 179 Size: 545 1079 353 Position: 6355 0 3400 Type: 9 Layer: 0 DFlags: r End_Chunk Chunk: Distancing Visible: 44527 Invisible: 55659 Replace: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 138 376 177 End_Chunk End_Children ; ;-------Object 61------------------------------------------------------- ; Chunk: Standard Name: "Ceiling" Number: 61 Size: 62000 0 62000 Position: 0 33000 0 Type: 4 Layer: 0 End_Chunk Chunk: Colours Number: 15 0x11 0x3F 0x3F 0x3F 0x3F 0x3F 0x3F 0x1A 0x3F 0x3F 0x3F 0x3F 0x3F 0x3F 0x3F End_Chunk ; ;-------Object 1------------------------------------------------------- ; Chunk: Standard Name: "tvcontrol" Number: 1 Size: 60000 300 60000 Position: 1000 0 1000 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: SCL short A; resume (1, 2); if (first) A=1; if (A==1) timgref (#71, 1)=timgref (#71, 1)%6+1; if (activate (#306, 0)) { invis (#306); vis (#308); setvp (4); } clrtrig (#306, 0); if (activate (#316, 0)) A=2; clrtrig (#316, 0); if (activate (#317, 0)) A=1; clrtrig (#317, 0); end End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 2 Index: 2 Image: 65535 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x76 0xAB 0x75 End_Chunk ; ;-------Object 59------------------------------------------------------- ; Chunk: Standard Name: "wall[59]" Number: 59 Size: 1000 32900 60000 Position: 0 0 1000 Type: 3 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 9 End_Chunk Chunk: Colours Number: 2 0x77 0x21 End_Chunk ; ;-------Object 5------------------------------------------------------- ; Chunk: Standard Name: "wall[5]" Number: 5 Size: 1000 32900 60000 Position: 61000 0 1000 Type: 2 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 1 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 5 Index: 2 Image: 3 End_Chunk Chunk: Colours Number: 2 0x19 0x1A End_Chunk ; ;-------Object 76------------------------------------------------------- ; Chunk: Standard Name: "wall[76]" Number: 76 Size: 60000 32900 1000 Position: 1000 0 0 Type: 6 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 5 End_Chunk Chunk: Colours Number: 2 0x18 0x19 End_Chunk ; ;-------Object 13------------------------------------------------------- ; Chunk: Standard Name: "desk[13]" Number: 13 Size: 25000 17000 8000 Position: 1000 300 1000 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.39844 0.00000 0.99609 0.79688 0.99609 0.79688 0.39844 SubChunk Facet: 4 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 3.00000 1.00000 3.00000 0.00000 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 35 Index: 2 Image: 34 End_Chunk Chunk: Colours Number: 6 0x20 0x15 0x1E 0x1E 0x17 0x20 End_Chunk ; ;-------Object 100------------------------------------------------------- ; Chunk: Standard Name: "deskhold" Number: 100 Size: 25000 11000 11000 Position: 7500 300 33000 Type: 65535 Layer: 0 End_Chunk Chunk: Distancing Visible: 168750 Invisible: 210937 Replace: 119 End_Chunk Children: ; ;-------Object 9------------------------------------------------------- ; Chunk: Standard Name: "desk[9]" Number: 9 Size: 7000 9000 10000 Position: 500 1000 500 Type: 7 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 17 Index: 2 Image: 20 End_Chunk ; ;-------Object 10------------------------------------------------------- ; Chunk: Standard Name: "desk[10]" Number: 10 Size: 7000 9000 10000 Position: 17500 1000 500 Type: 7 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 16 Index: 2 Image: 20 End_Chunk ; ;-------Object 118------------------------------------------------------- ; Chunk: Standard Name: "desk[118]" Number: 118 Size: 1270 1000 1289 Position: 800 0 800 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 4 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 18 End_Chunk Chunk: Colours Number: 6 0x28 0x22 0x24 0x2D 0x59 0x00 End_Chunk ; ;-------Object 103------------------------------------------------------- ; Chunk: Standard Name: "desk[103]" Number: 103 Size: 1270 1000 1289 Position: 800 0 8911 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 4 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 18 End_Chunk Chunk: Colours Number: 6 0x28 0x2A 0x2E 0x2C 0x59 0x00 End_Chunk ; ;-------Object 117------------------------------------------------------- ; Chunk: Standard Name: "desk[117]" Number: 117 Size: 1270 1000 1289 Position: 22930 0 8911 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 4 Mode: 0 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 18 End_Chunk Chunk: Colours Number: 6 0x2E 0x2A 0x2D 0x2D 0x59 0x00 End_Chunk ; ;-------Object 104------------------------------------------------------- ; Chunk: Standard Name: "desk[104]" Number: 104 Size: 1270 1000 1289 Position: 22930 0 800 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 4 Mode: 0 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 18 End_Chunk Chunk: Colours Number: 6 0x2E 0x2A 0x2C 0x2D 0x59 0x00 End_Chunk ; ;-------Object 101------------------------------------------------------- ; Chunk: Standard Name: "desk[101]" Number: 101 Size: 25000 1000 11000 Position: 0 10000 0 Type: 7 Layer: 0 End_Chunk Chunk: TexCoords Number: 5 Mode: 0 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 3 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 4 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 4 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 4 Index: 1 Image: 15 Index: 2 Image: 29 Index: 3 Image: 27 Index: 4 Image: 19 End_Chunk ; ;-------Object 11------------------------------------------------------- ; Chunk: Standard Name: "desk[11]" Number: 11 Size: 24000 9000 0 Position: 500 1000 500 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 2 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 26 End_Chunk End_Children ; ;-------Object 169------------------------------------------------------- ; Chunk: Standard Name: "Keyboard" Number: 169 Size: 8012 457 2602 Position: 11700 11300 40850 Type: 8 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 4 0x3F 0x3F 0x3F 0x3F End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 12 End_Chunk ; ;-------Object 130------------------------------------------------------- ; Chunk: Standard Name: "pcunit" Number: 130 Size: 7600 2000 6900 Position: 11900 11300 33550 Type: 10 Layer: 0 End_Chunk Chunk: TexCoords Number: 5 Mode: 0 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 3 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 4 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 4 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 4 Index: 1 Image: 14 Index: 2 Image: 32 Index: 3 Image: 25 Index: 4 Image: 23 End_Chunk ; ;-------Object 12------------------------------------------------------- ; Chunk: Standard Name: "pcunit[12]" Number: 12 Size: 6100 5300 5900 Position: 12600 13300 34150 Type: 25 Layer: 0 End_Chunk Chunk: TexCoords Number: 6 Mode: 0 SubChunk Facet: 7 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 3 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 4 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 5 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 6 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: SCL tyoff (me, 1)+=4; txoff (me, 1)+=4; if (txoff (me, 1)>256) { txoff (me, 1)=0; tyoff (me, 1)=0; } end End_Chunk Chunk: ImageRef Number: 6 Index: 1 Image: 40 Index: 2 Image: 13 Index: 3 Image: 31 Index: 4 Image: 30 Index: 5 Image: 22 Index: 6 Image: 24 End_Chunk ; ;-------Object 291------------------------------------------------------- ; Chunk: Standard Name: "Mouse&MatHold" Number: 291 Size: 2850 284 2900 Position: 8200 11300 39550 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 18 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C End_Chunk Children: ; ;-------Object 292------------------------------------------------------- ; Chunk: Standard Name: "Mousemat" Number: 292 Size: 2850 30 2900 Position: 0 0 0 Type: 11 Layer: 0 End_Chunk ; ;-------Object 293------------------------------------------------------- ; Chunk: Standard Name: "Mousemat-rep2" Number: 293 Size: 2850 30 2900 Position: 0 0 0 Type: 0 Layer: 0 DFlags: R OFlags: Ii End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x00 0x00 0x2F 0x00 End_Chunk ; ;-------Object 294------------------------------------------------------- ; Chunk: Standard Name: "Mousemat-rep1" Number: 294 Size: 2850 30 2900 Position: 0 0 0 Type: 11 Layer: 0 DFlags: R OFlags: Ii End_Chunk Chunk: Distancing Visible: 30000 Invisible: 37500 Replace: 293 End_Chunk ; ;-------Object 295------------------------------------------------------- ; Chunk: Standard Name: "mouse" Number: 295 Size: 760 254 1284 Position: 365 30 1418 Type: 12 Layer: 0 End_Chunk Chunk: SCL float f, h; resume (1, 2); f=screenw; h=screenh; xpos (me)= (mousex+1)* (xsize (#292)-xsize (#295))/f; zpos (me)= (h- (mousey+1))* (zsize (#292)-zsize (#295))/h; if (mouseb!=0) { if (mouseb==1) { ccel (me, 1)=2; while (mouseb) waitf; } else { ccel (me, 1)=3; waitfs (2); while (mouseb) waitf; } ccel (me, 1)=1; /* This object simply moves dependent on the current position of the mouse */ } end End_Chunk Chunk: InitPos Position: 365 30 1418 End_Chunk ; ;-------Object 296------------------------------------------------------- ; Chunk: Standard Name: "mouse-rep1" Number: 296 Size: 760 250 1610 Position: 0 30 0 Type: 13 Layer: 0 DFlags: R OFlags: Ii End_Chunk Chunk: Colours Number: 6 0xB6 0x12 0x16 0x19 0x17 0x16 End_Chunk Chunk: SCL float f, h; f=screenw; h=screenh; xpos (me)= (mousex+1)* (xsize (#292)-xsize (#296))/f; zpos (me)= (h- (mousey+1))* (zsize (#292)-zsize (#296))/h; ccel (me, 1)= (mouseb & 1)+1; /* This object simply moves dependent on the current position of the mouse */ end End_Chunk Chunk: InitPos Position: 0 30 0 End_Chunk End_Children ; ;-------Object 65------------------------------------------------------- ; Chunk: Standard Name: "Light[65]" Number: 65 Size: 4000 2000 2000 Position: -950 20300 38620 Type: 5 Layer: 0 DFlags: r End_Chunk Chunk: Colours Number: 2 0x3A 0x37 End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFFC000 0x0000 Centre: 1500 1500 2450 End_Chunk ; ;-------Object 297------------------------------------------------------- ; Chunk: Standard Name: "Light[297]" Number: 297 Size: 4000 2000 2000 Position: -950 20300 13620 Type: 5 Layer: 0 DFlags: r End_Chunk Chunk: Colours Number: 2 0x3A 0x37 End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFFC000 0x0000 Centre: 1500 1500 2450 End_Chunk ; ;-------Object 6------------------------------------------------------- ; Chunk: Standard Name: "Seatback[6]" Number: 6 Size: 2010 14199 19700 Position: 58990 13808 7549 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x77 0x3F 0x77 0x3F 0x3F 0x3F End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 36 End_Chunk ; ;-------Object 32------------------------------------------------------- ; Chunk: Standard Name: "picture" Number: 32 Size: 2999 3300 2499 Position: 26500 11300 37000 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 31------------------------------------------------------- ; Chunk: Standard Name: "desk[31]" Number: 31 Size: 2999 4000 2499 Position: 0 -700 0 Type: 15 Layer: 0 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 1 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 7 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 0.99973 0.00058 End_Chunk Chunk: SCL if (activate (me, 0)) { dlgInfo; clrtrig (me, 0); } end End_Chunk Chunk: Colours Number: 10 0x3F 0xFA 0x3F 0x3F 0x3F 0x3F 0x26 0xFA 0x3F 0x3F End_Chunk Chunk: Rotations Initial: 0x1553 0xFFFFE000 0x0000 Centre: 1499 2000 1249 End_Chunk End_Children ; ;-------Object 33------------------------------------------------------- ; Chunk: Standard Name: "picture[33]" Number: 33 Size: 2999 3300 2499 Position: 19000 17300 5000 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 34------------------------------------------------------- ; Chunk: Standard Name: "desk[34]" Number: 34 Size: 3999 4000 2499 Position: -500 -700 0 Type: 15 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 7 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: SCL if (activate (me, 0)) { dlgPhoto; clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 33 End_Chunk Chunk: Colours Number: 10 0x3F 0xFA 0x3F 0x3F 0x3F 0x3F 0x26 0xFA 0x3F 0x3F End_Chunk Chunk: Rotations Initial: 0x1553 0x1FFE 0x0000 Centre: 1499 2000 1249 End_Chunk End_Children ; ;-------Object 35------------------------------------------------------- ; Chunk: Standard Name: "wall[35]" Number: 35 Size: 2000 2000 0 Position: 44600 10700 2000 Type: 1 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 1000 1000 0 End_Chunk Chunk: SCL yrot (me)=359-yvroff+yrot (object (vattach)); xrot (me)=359-xvroff; if (activate (me, 0)) { /* Menulock stuff*/ share (99)=3; loadvrt ("garden.vrt"); clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 4 End_Chunk Chunk: Colours Number: 2 0x77 0x76 End_Chunk ; ;-------Object 4------------------------------------------------------- ; Chunk: Standard Name: "desk[4]" Number: 4 Size: 0 21000 10000 Position: 4200 300 19400 Type: 14 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 10 End_Chunk Chunk: Colours Number: 1 0x20 End_Chunk ; ;-------Object 36------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA: HOLD " Number: 36 Size: 965 5629 5629 Position: 25576 22000 -1332 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFFC000 0x0000 Centre: 481 2813 2813 End_Chunk Chunk: Colours Number: 18 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C 0x0C End_Chunk Children: ; ;-------Object 37------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Rim " Number: 37 Size: 965 5629 5629 Position: 0 0 0 Type: 16 Layer: 0 End_Chunk Chunk: Distancing Visible: 21711 Invisible: 23067 Replace: 45 End_Chunk Children: ; ;-------Object 38------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face hold " Number: 38 Size: 331 3869 3869 Position: 0 876 876 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 39------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Hour hand " Number: 39 Size: 0 1449 384 Position: 324 1844 1739 Type: 17 Layer: 0 End_Chunk Chunk: Colours Number: 3 0x30 0x01 0x37 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 87 191 End_Chunk ; ;-------Object 40------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Minute hand " Number: 40 Size: 0 1933 481 Position: 326 1812 1691 Type: 18 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x9E 0x01 0x01 0xA7 0x05 0x01 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 118 239 End_Chunk ; ;-------Object 41------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Second hand " Number: 41 Size: 0 1933 17 Position: 328 1812 1923 Type: 19 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x01 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 118 7 End_Chunk ; ;-------Object 42------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face hold (0,1) " Number: 42 Size: 0 3869 3869 Position: 322 0 0 Type: 65535 Layer: 0 End_Chunk Chunk: SCL short h, m, s, s2=0; /* stores the hours,minutes and second values of the system clock */ time (&h, &m, &s); /* rotates the hands of the clock relative to the time */ if (s2!=s) s2=s; xrot (#41)=360-s*6.0000; xrot (#40)=360-m*6.0000-s/10.0000; xrot (#39)=360-h*30.0000-m/2.0000; /* */ end End_Chunk Children: ; ;-------Object 43------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face " Number: 43 Size: 0 3869 3869 Position: 0 0 0 Type: 20 Layer: 0 End_Chunk Chunk: Colours Number: 35 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x32 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x00 0x01 0x01 0x01 0x01 End_Chunk Chunk: Distancing Visible: 6029 Invisible: 6406 Replace: 44 End_Chunk ; ;-------Object 44------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face Rep1 " Number: 44 Size: 0 3869 3869 Position: 0 0 0 Type: 21 Layer: 0 DFlags: R OFlags: Ii End_Chunk Chunk: Colours Number: 30 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x32 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0xC7 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 End_Chunk End_Children End_Children End_Children ; ;-------Object 45------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Rim Rep1 " Number: 45 Size: 965 5629 5629 Position: 0 0 0 Type: 22 Layer: 0 DFlags: R OFlags: Ii End_Chunk Children: ; ;-------Object 46------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face hold Rep1 " Number: 46 Size: 331 3869 3869 Position: 0 876 876 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 47------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Hour hand Rep1 " Number: 47 Size: 0 1449 384 Position: 324 1844 1739 Type: 17 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x30 0x01 0x37 0x30 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 87 191 End_Chunk ; ;-------Object 48------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Minute hand Rep1 " Number: 48 Size: 0 1933 481 Position: 326 1812 1691 Type: 18 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x9E 0x08 0x01 0xA7 0x05 0x01 End_Chunk Chunk: Colours Number: 6 0x9E 0x08 0x01 0xA7 0x05 0x01 End_Chunk Chunk: Colours Number: 4 0x30 0x01 0x01 0x30 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 118 239 End_Chunk ; ;-------Object 49------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Second hand Rep1 " Number: 49 Size: 0 1933 17 Position: 328 1812 1923 Type: 19 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x01 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 118 7 End_Chunk ; ;-------Object 50------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face hold (2,3) " Number: 50 Size: 0 3869 3869 Position: 322 0 0 Type: 65535 Layer: 0 End_Chunk Chunk: SCL short h, m, s; time (&h, &m, &s); xrot (#49)=360-s*6.0000; xrot (#48)=360- (m*6.0000+s/10.0000); xrot (#47)=360- (h*30.0000+m/2.0000); /* */ end End_Chunk Children: ; ;-------Object 51------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face Rep2 " Number: 51 Size: 0 3869 3869 Position: 0 0 0 Type: 23 Layer: 0 End_Chunk Chunk: Colours Number: 35 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x32 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0xC7 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x00 0x01 0x01 0x01 0x01 End_Chunk Chunk: Distancing Visible: 33775 Invisible: 35884 Replace: 53 End_Chunk ; ;-------Object 53------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face Rep3 " Number: 53 Size: 0 3869 3869 Position: 0 0 0 Type: 24 Layer: 0 DFlags: R OFlags: Ii End_Chunk Chunk: Colours Number: 35 0x01 0x01 0x32 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0xC7 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x01 0x00 0x01 0x01 0x01 0x01 End_Chunk End_Children End_Children End_Children End_Children ; ;-------Object 8------------------------------------------------------- ; Chunk: Standard Name: "Chairbasehold[8]" Number: 8 Size: 12000 19708 6995 Position: 11522 300 14070 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: SCL yrot (me)=359-yvroff+yrot (object (vattach)); end End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFFB2D4 0x0000 Centre: 6000 6854 3500 End_Chunk Children: ; ;-------Object 54------------------------------------------------------- ; Chunk: Standard Name: "chair_smut" Number: 54 Size: 15000 19000 0 Position: -1000 0 0 Type: 1 Layer: 0 DFlags: r OFlags: Ii End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 7200 9500 2520 End_Chunk Chunk: InitPos Position: -1000 0 0 End_Chunk Chunk: InitSize Size: 15000 19000 0 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 49 End_Chunk Chunk: Colours Number: 2 0x77 0x76 End_Chunk ; ;-------Object 14------------------------------------------------------- ; Chunk: Standard Name: "chair seat[14]" Number: 14 Size: 7000 8000 7000 Position: 2000 5708 0 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 3500 4000 3500 End_Chunk Children: ; ;-------Object 15------------------------------------------------------- ; Chunk: Standard Name: "Seatbase[15]" Number: 15 Size: 7000 1000 7000 Position: 0 0 0 Type: 10 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: SCL long STATS[8]; short I, TEMP, LOWEST, MOOD; resume (1, 2); if (activate (me, 0) && vis? (#71)) { statsGet (&STATS); repeat (5) { TEMP=5+-inloop; repeat (5) { if (STATS[TEMP]<STATS[inloop-1] && STATS[TEMP]<STATS[LOWEST]) LOWEST=TEMP; } } MOOD=STATS[LOWEST]/100; MOOD=table (MOOD) {0, 0, 1, 1, 2, 2, 3, 3, 4, 4, 4}; if (MOOD>2) { #73.Follow=#91; #73.Go=1; while (#73.Go==1) waitf; kill (#71); invis (#71); vis (#54); repeat (15) { xpos (#54)=ixpos (#54); counter (21)=table (inloop-1) {224, 229, 228, 227, 226, 235, 238, 237, 236, 225, 234, 233, 232, 231, 223}; if (random (4)==1) counter (26)=table (random (5)) {50, 51, 125, 134, 154}; waitfs (30); } repeat (15) { xpos (#54)=ixpos (#54); counter (21)=table (15-inloop) {224, 229, 228, 227, 226, 235, 238, 237, 236, 225, 234, 233, 232, 231, 223}; if (random (4)==1) counter (26)=table (random (5)) {50, 51, 125, 134, 154}; waitfs (30); } unkill (#71); vis (#71); invis (#54); #73.Follow=#86; #73.Go=1; #74.MOODS=1; } else counter (25)=table (random (2)) {26, 92}; clrtrig (me, 0); } end End_Chunk Chunk: Colours Number: 6 0x3F 0x01 0x3F 0x3F 0x16 0x3F End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 21 End_Chunk ; ;-------Object 21------------------------------------------------------- ; Chunk: Standard Name: "Seatback[21]" Number: 21 Size: 7000 3999 1000 Position: 0 4000 5999 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 5 Mode: 0 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 0.99999 0.00020 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x01 0x75 0x01 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 37 Index: 2 Image: 21 End_Chunk ; ;-------Object 22------------------------------------------------------- ; Chunk: Standard Name: "Seatback[22]" Number: 22 Size: 1000 3000 1000 Position: 3000 1000 5999 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 4 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x76 0x01 0x75 End_Chunk Chunk: ImageRef Number: 3 Index: 1 Image: 38 Index: 2 Image: 65535 Index: 3 Image: 65535 End_Chunk End_Children ; ;-------Object 23------------------------------------------------------- ; Chunk: Standard Name: "caster1[23]" Number: 23 Size: 545 1079 353 Position: 5287 0 294 Type: 9 Layer: 0 End_Chunk Chunk: Distancing Visible: 44527 Invisible: 55659 Replace: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x31C7 0x0000 Centre: 138 376 177 End_Chunk ; ;-------Object 24------------------------------------------------------- ; Chunk: Standard Name: "caster4[24]" Number: 24 Size: 545 1079 353 Position: 5374 0 6562 Type: 9 Layer: 0 DFlags: r End_Chunk Chunk: Distancing Visible: 44527 Invisible: 55659 Replace: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 138 376 177 End_Chunk ; ;-------Object 25------------------------------------------------------- ; Chunk: Standard Name: "Wheelbase[25]" Number: 25 Size: 900 900 7000 Position: 5000 1079 0 Type: 10 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x15 0x01 0x19 0x3F 0x16 0x1B End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 38 End_Chunk ; ;-------Object 26------------------------------------------------------- ; Chunk: Standard Name: "Seatstem[26]" Number: 26 Size: 900 3800 900 Position: 5071 1908 3127 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 4 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 3 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 38 End_Chunk ; ;-------Object 27------------------------------------------------------- ; Chunk: Standard Name: "Wheelbase[27]" Number: 27 Size: 3000 900 900 Position: 2000 1079 3127 Type: 10 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 0.99973 0.00000 End_Chunk Chunk: Colours Number: 6 0x3F 0x14 0x19 0x1A 0x16 0x1B End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 38 End_Chunk ; ;-------Object 28------------------------------------------------------- ; Chunk: Standard Name: "Wheelbase[28]" Number: 28 Size: 3000 900 900 Position: 5900 1079 3127 Type: 10 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 0.99995 0.00000 End_Chunk Chunk: Colours Number: 6 0x15 0x14 0x3F 0x1A 0x16 0x1B End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 38 End_Chunk ; ;-------Object 29------------------------------------------------------- ; Chunk: Standard Name: "caster2[29]" Number: 29 Size: 545 1079 353 Position: 2400 0 3447 Type: 9 Layer: 0 End_Chunk Chunk: Distancing Visible: 44527 Invisible: 55659 Replace: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 138 376 177 End_Chunk ; ;-------Object 30------------------------------------------------------- ; Chunk: Standard Name: "caster5[30]" Number: 30 Size: 545 1079 353 Position: 8355 0 3400 Type: 9 Layer: 0 DFlags: r End_Chunk Chunk: Distancing Visible: 44527 Invisible: 55659 Replace: 0 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 138 376 177 End_Chunk End_Children ; ;-------Object 56------------------------------------------------------- ; Chunk: Standard Name: "Seatback[56]" Number: 56 Size: 7010 2199 13700 Position: 53990 300 25249 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x77 0x3F 0x77 0x3F 0x3F 0x3F End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 43 End_Chunk ; ;-------Object 57------------------------------------------------------- ; Chunk: Standard Name: "Seatback[57]" Number: 57 Size: 8010 9309 15700 Position: 52990 2499 24249 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 4 Mode: 0 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 3 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 4 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x77 0x3F 0x77 0x3F 0x3F 0x3F End_Chunk Chunk: ImageRef Number: 4 Index: 1 Image: 48 Index: 2 Image: 44 Index: 3 Image: 47 Index: 4 Image: 41 End_Chunk ; ;-------Object 66------------------------------------------------------- ; Chunk: Standard Name: " photo-scan" Number: 66 Size: 5010 0 900 Position: 53990 11808 36549 Type: 26 Layer: 0 End_Chunk Chunk: InitPos Position: 53990 11808 36549 End_Chunk ; ;-------Object 60------------------------------------------------------- ; Chunk: Standard Name: "Seatback[60]" Number: 60 Size: 2010 1009 15700 Position: 58990 11808 24249 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x3F 0x3F 0x77 0x3F 0x3F 0x3F End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 41 End_Chunk ; ;-------Object 63------------------------------------------------------- ; Chunk: Standard Name: "Seatback[63]" Number: 63 Size: 6000 1009 15700 Position: 52990 11808 24249 Type: 0 Layer: 0 DFlags: r End_Chunk Chunk: TexCoords Number: 5 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 4 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 5 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 6 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 3 Index: 2 Sound: 4 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 6000 1009 7850 End_Chunk Chunk: SCL short Good=1, MOOD, TEMP, LOWEST; long STATS[8]; resume (1, 2); if (activate (me, 0)) { statsGet (&STATS); repeat (5) { TEMP=5+-inloop; repeat (5) { if (STATS[TEMP]<STATS[inloop-1] && STATS[TEMP]<STATS[LOWEST]) LOWEST=TEMP; } } MOOD=STATS[LOWEST]/100; MOOD=table (MOOD) {0, 0, 1, 1, 2, 2, 3, 3, 4, 4, 4}; if (MOOD>2) { Good=1; counter (26)=157; waitfs (3); if (zrot (me)==0) { /* sound (2, 64, 127, 0); sound (2, 64, 127, 0); sound (2, 64, 127, 0); */ repeat (9) { zrot (me)+=10; waitf; } /* sound (2, 64, 127, 0);*/ zrot (me)=90; #73.Follow=#88; #73.Go=1; while (#73.Go==1) waitf; kill (#71); invis (#71); } else { invis (#55); Good=0; /* sound (2, 64, 127, 0);*//* george put your walking person back*/ #73.Follow=#85; #73.Go=1; unkill (#71); vis (#71); repeat (9) { zrot (me)-=10; waitf; } /* sound (1, 64, 127, 0); sound (1, 64, 127, 0); sound (1, 64, 127, 0); */ zrot (me)=0; } if (Good) { /* george movewalking person to copyier then invis*/ #73.Follow=#88; #73.Go=1; while (#73.Go==1) waitf; kill (#71); invis (#71); vis (#55); marker (25)=999; } } else counter (25)=table (random (2)) {26, 92}; clrtrig (me, 0); } end End_Chunk Chunk: Colours Number: 6 0x77 0x3F 0x77 0x3F 0x3F 0x3F End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 43 Index: 2 Image: 41 End_Chunk ; ;-------Object 58------------------------------------------------------- ; Chunk: Standard Name: "Seatback[58]" Number: 58 Size: 5010 1199 6700 Position: 54490 7300 17549 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 3 Mode: 0 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 1 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 2 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Colours Number: 6 0x77 0x3F 0x77 0x3F 0x3F 0x3F End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 41 Index: 2 Image: 45 End_Chunk ; ;-------Object 55------------------------------------------------------- ; Chunk: Standard Name: " photo-bint" Number: 55 Size: 15000 19000 0 Position: 45490 4300 34011 Type: 1 Layer: 0 DFlags: r OFlags: Ii End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 0.00000 0.00000 End_Chunk Chunk: Rotations Initial: 0x0000 0x4000 0x0000 Centre: 7500 9500 0 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 6 End_Chunk Chunk: Colours Number: 2 0x77 0x00 End_Chunk ; ;-------Object 64------------------------------------------------------- ; Chunk: Standard Name: "Seatback[64]" Number: 64 Size: 400 1909 2600 Position: 52590 8899 25649 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 1 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: SoundRef Number: 1 Index: 1 Sound: 2 End_Chunk Chunk: SCL resume (1, 2); if (activate (me, 0) && vis? (#55)) { sound (1, 64, 127, 0); sound (1, 64, 127, 0); sound (1, 64, 127, 0); zpos (#66)=izpos (#66); vis (#66); repeat (10) { zpos (#66)-=1000; waitf; } invis (#66); animode (#67, 1)=5; waitf; vis (#67); waitfs (9); invis (#67); vis (#68); clrtrig (me, 0); } end End_Chunk Chunk: Colours Number: 6 0x77 0x3F 0x77 0x3F 0x3F 0x3F End_Chunk Chunk: ImageRef Number: 3 Index: 1 Image: 42 Index: 2 Image: 65535 Index: 3 Image: 65535 End_Chunk ; ;-------Object 67------------------------------------------------------- ; Chunk: Standard Name: "paper" Number: 67 Size: 4010 0 6000 Position: 54990 8599 18249 Type: 27 Layer: 0 OFlags: Aa End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 1 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: SCL txscale (me, 1)=cframe (me, 1)/10; txoff (me, 1)=256-cframe (me, 1)/10; end End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 10 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: Colours Number: 1 0x20 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 45 Index: 2 Image: 8 End_Chunk ; ;-------Object 68------------------------------------------------------- ; Chunk: Standard Name: " hiddenpaper[68]" Number: 68 Size: 4010 0 6000 Position: 54990 8499 18249 Type: 27 Layer: 0 OFlags: AaIi End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 1 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 10 Phase: 0x0A00 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: Colours Number: 1 0x20 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 45 Index: 2 Image: 8 End_Chunk ; ;-------Object 71------------------------------------------------------- ; Chunk: Standard Name: "WOMAN_HOLD" Number: 71 Size: 5470 26000 5640 Position: 39076 300 49215 Type: 65535 Layer: 0 OFlags: Ii End_Chunk Chunk: InitPos Position: 39076 300 49215 End_Chunk Chunk: Dynamics MovType: 0x80000081 Fuel: 0 Climb: 5000 Gravity: 120 Coupled: 73 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 0 0 0 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Children: ; ;-------Object 72------------------------------------------------------- ; Chunk: Standard Name: "woman" Number: 72 Size: 0 23900 9600 Position: 2621 0 -519 Type: 28 Layer: 0 DFlags: E End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 2 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 49 End_Chunk Chunk: InitPos Position: 2621 0 -519 End_Chunk Chunk: InitSize Size: 0 23900 9600 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 9405 0 End_Chunk Chunk: SCL yrot (me)=89-yvroff+yrot (object (vattach)); end End_Chunk ; ;-------Object 73------------------------------------------------------- ; Chunk: Standard Name: "direction" Number: 73 Size: 2000 2181 2000 Position: 1850 13309 1954 Type: 65535 Layer: 0 DFlags: rE End_Chunk Chunk: SCL objnum Follow; short Speed=800, Delay=100, Go=1; fixed x, y; if (first) Follow=#83; y=angle3d (Follow, me, &y); yrot (me)=y; if (Go==1) zdrive (parent (me))=Speed; else zdrive (parent (me))=0; end End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 1000 1090 1000 End_Chunk End_Children ; ;-------Object 87------------------------------------------------------- ; Chunk: Standard Name: "3" Number: 87 Size: 1000 1000 1000 Position: 49000 300 6511 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#73.Follow==me) { nearMe=mdist (me, #71); if (nearMe<14000) { #73.Go=0; waitfs (#73.Delay); theObj=table (random (2)) {#86, #83}; Choose=object (theObj); if (#73.Follow==me) #73.Follow=Choose; #73.Go=1; } } end End_Chunk ; ;-------Object 85------------------------------------------------------- ; Chunk: Standard Name: "2" Number: 85 Size: 1000 1000 1000 Position: 36000 0 28511 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#73.Follow==me) { nearMe=mdist (me, #71); if (nearMe<16000) { #73.Go=0; waitfs (#73.Delay); theObj=table (random (2)) {#87, #86}; Choose=object (theObj); if (#73.Follow==me) #73.Follow=Choose; #73.Go=1; } } end End_Chunk ; ;-------Object 88------------------------------------------------------- ; Chunk: Standard Name: "pc" Number: 88 Size: 1000 1000 1000 Position: 49000 0 32511 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#73.Follow==me) { nearMe=mdist (me, #71); if (nearMe<14000) #73.Go=0; } end End_Chunk ; ;-------Object 86------------------------------------------------------- ; Chunk: Standard Name: "4" Number: 86 Size: 1000 1000 1000 Position: 6000 0 28511 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#73.Follow==me) { nearMe=mdist (me, #71); if (nearMe<14000) { #73.Go=0; waitfs (#73.Delay); theObj=table (random (2)) {#85, #87}; Choose=object (theObj); if (#73.Follow==me) #73.Follow=Choose; #73.Go=1; } } end End_Chunk ; ;-------Object 90------------------------------------------------------- ; Chunk: Standard Name: "cash" Number: 90 Size: 4000 0 2000 Position: 23500 11300 34000 Type: 0 Layer: 0 OFlags: Ii End_Chunk Chunk: TexCoords Number: 1 Mode: 0 SubChunk Facet: 5 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: SCL if (activate (me, 0)) { invis (me); addMoney (60); clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 58 End_Chunk ; ;-------Object 91------------------------------------------------------- ; Chunk: Standard Name: "pc[91]" Number: 91 Size: 1000 1000 1000 Position: 24710 0 23252 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#73.Follow==me) { nearMe=mdist (me, #71); if (nearMe<14000) #73.Go=0; } end End_Chunk ; ;-------Object 83------------------------------------------------------- ; Chunk: Standard Name: "1" Number: 83 Size: 1000 1000 1000 Position: 43000 300 44511 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#73.Follow==me) { nearMe=mdist (me, #71); if (nearMe<14000) { #73.Go=0; waitfs (#73.Delay); theObj=85; Choose=object (theObj); if (#73.Follow==me) #73.Follow=Choose; #73.Go=1; } } end End_Chunk End_Children ; ;-------Object 70------------------------------------------------------- ; Chunk: Standard Name: "Menus" Number: 70 Size: 10000 10000 10000 Position: 2070764 0 1973439 Type: 65535 Layer: 0 End_Chunk Chunk: SCL if (first) { menuNew (me); menuLock (0); } end End_Chunk Chunk: Text "item \"E&xit\" scl exitVis; sclend\r" "item \"A&bout\" scl Credits; sclend" End_Chunk ; ;-------Object 74------------------------------------------------------- ; Chunk: Standard Name: "loadImage" Number: 74 Size: 2000 2000 2000 Position: 2018915 0 1975891 Type: 65535 Layer: 0 End_Chunk Chunk: SCL char NAME[10], PATH[256], DIR[256], DRIVE[3]; long WIDTH, HEIGHT, newPOS, oldWIDTH, STATS[8]; short Scale=20, imgNum=49, LOWEST, MOODS=1, TEMP; resume (2, 2); if (first) { cdDrive (&DRIVE); strcpy (&DIR, &DRIVE); strcat (&DIR, "\\LoveBytes\\"); counter (20)=-1; counter (25)=-1; counter (21)=-1; } if (vis? (#71) || vis? (#54) || first) { if (counter (20)>-1) { strcpy (&PATH, &DIR); strcat (&PATH, "images\\"); ltoa (&NAME, counter (20)); strcat (&PATH, &NAME); strcat (&PATH, ".gif"); imageLd (&PATH, imgNum, 1, &WIDTH, &HEIGHT); newPOS=zpos (#72); oldWIDTH=zsize (#72)/2; zsize (#72)=WIDTH*Scale; ysize (#72)=HEIGHT*Scale; write (&zcent (#72))=zsize (#72)/2; newPOS=newPOS+oldWIDTH-WIDTH*Scale/2; zpos (#72)=newPOS; counter (20)=-1; MOODS=1; } if (counter (21)>-1) { strcpy (&PATH, &DIR); strcat (&PATH, "images\\"); ltoa (&NAME, counter (21)); strcat (&PATH, &NAME); strcat (&PATH, ".gif"); imageLd (&PATH, imgNum, 1, &WIDTH, &HEIGHT); newPOS=xpos (#54); oldWIDTH=xsize (#54)/2; xsize (#54)=WIDTH*40; ysize (#54)=HEIGHT*40; write (&xcent (#54))=xsize (#54)/2; newPOS=newPOS+oldWIDTH-WIDTH*40/2; xpos (#54)=newPOS; counter (21)=-1; } if (counter (25)>-1) { strcpy (&PATH, &DIR); strcat (&PATH, "sounds\\"); ltoa (&NAME, counter (25)); strcat (&PATH, &NAME); strcat (&PATH, ".wav"); playWAV (&PATH); counter (25)=-1; } if (counter (26)>-1) { strcpy (&PATH, &DIR); strcat (&PATH, "sounds\\"); ltoa (&NAME, counter (26)); strcat (&PATH, &NAME); strcat (&PATH, ".wav"); while (sndState) waitf; playWAV (&PATH); counter (26)=-1; } if (MOODS || first) { statsGet (&STATS); repeat (5) { TEMP=5+-inloop; repeat (5) { if (STATS[TEMP]<STATS[inloop-1] && STATS[TEMP]<STATS[LOWEST]) LOWEST=TEMP; } } if (STATS[LOWEST]<111) counter (20)=180; if (STATS[LOWEST]>=111 && STATS[LOWEST]<222) counter (20)=171; if (STATS[LOWEST]>=222 && STATS[LOWEST]<333) counter (20)=179; if (STATS[LOWEST]>=333 && STATS[LOWEST]<444) counter (20)=176; if (STATS[LOWEST]>=444 && STATS[LOWEST]<555) counter (20)=175; if (STATS[LOWEST]>=555 && STATS[LOWEST]<666) counter (20)=172; if (STATS[LOWEST]>=666 && STATS[LOWEST]<777) counter (20)=173; if (STATS[LOWEST]>=777 && STATS[LOWEST]<888) counter (20)=178; if (STATS[LOWEST]>=888) counter (20)=230; strcpy (&PATH, &DIR); strcat (&PATH, "images\\"); ltoa (&NAME, counter (20)); strcat (&PATH, &NAME); strcat (&PATH, ".gif"); imageLd (&PATH, imgNum, 1, &WIDTH, &HEIGHT); newPOS=zpos (#72); oldWIDTH=zsize (#72)/2; zsize (#72)=WIDTH*Scale; ysize (#72)=HEIGHT*Scale; write (&zcent (#72))=zsize (#72)/2; newPOS=newPOS+oldWIDTH-WIDTH*Scale/2; zpos (#72)=newPOS; counter (20)=-1; MOODS=0; } } end End_Chunk ; ;-------Object 75------------------------------------------------------- ; Chunk: Standard Name: "icons" Number: 75 Size: 2000 2000 2000 Position: 2020915 0 1975891 Type: 65535 Layer: 0 End_Chunk Chunk: SCL short SELECTED=56; instr (1)=50; instr (2)=52; instr (3)=54; instr (4)=SELECTED; switch (marker (2)); case 1: instr (1)=51; case 2: instr (2)=53; case 3: instr (3)=55; switch (marker (1)); case 1: dlgStats; case 2: dlgShop; case 3: dlgUse; marker (1)=0; marker (2)=0; repeat (4) update (inloop); end End_Chunk ; ;-------Object 77------------------------------------------------------- ; Chunk: Standard Name: "remarks" Number: 77 Size: 2000 2000 2000 Position: 2022915 0 1975891 Type: 65535 Layer: 0 End_Chunk Chunk: SCL long STATS[8]; short MOOD, RANDOM, TEMP, LOWEST, EXISTS, VALUE; long CHOUR, CMINS, ILL, GO; resume (0, 2); /*CODE FOR AMBIENT REMARKS*/ if (first) { timeCurr (&CHOUR, &CMINS); if (CHOUR<12) counter (26)=151; ranseed (vrtime); if (regGetN ("jogo", &GO)) GO=0; if (regGetN ("ill", &ILL)) ILL=0; if (!ILL && GO) vis (#71); } resume (0, 2); if (vis? (#71) || first) { EXISTS=0; VALUE=0; RANDOM=random (1000); if (RANDOM==100 || first) { statsGet (&STATS); repeat (5) { TEMP=5+-inloop; repeat (5) { if (STATS[TEMP]<STATS[inloop-1] && STATS[TEMP]<STATS[LOWEST]) LOWEST=TEMP; } } MOOD=STATS[LOWEST]/100; MOOD=table (MOOD) {0, 0, 1, 1, 2, 2, 3, 3, 4, 4, 4}; switch (MOOD); case 0: counter (26)=table (random (3)) {150, 134, 154}; case 1: counter (26)=table (random (2)) {154, 134}; case 2: counter (26)=table (random (4)) {125, 51, 125, 154}; case 3: counter (26)=table (random (4)) {50, 51, 125, 154}; case 4: counter (26)=table (random (5)) {94, 68, 50, 49, 154}; } } end End_Chunk ; ;-------Object 78------------------------------------------------------- ; Chunk: Standard Name: "updateAmbient" Number: 78 Size: 2000 2000 2000 Position: 2024915 0 1975891 Type: 65535 Layer: 0 End_Chunk Chunk: SCL long oldVALUE, stats[8], CURRENT, TEMP, TEMP2; float newVALUE, TOTAL; char REG[256], VALUE[5]; if (counter (30) || first || activate (me, 0)) { CURRENT=0; regGetN ("AmbientTotal", &TEMP); TOTAL=TEMP; if (regGetN ("rat", &TEMP)) TEMP=0; CURRENT+=TEMP*5; if (regGetN ("tony", &TEMP)) TEMP=0; CURRENT+=TEMP*5; if (regGetN ("alex", &TEMP)) TEMP=0; CURRENT+=TEMP*5; regGetN ("fish", &TEMP); if (TEMP==0) CURRENT+=5; regGetN ("dog", &TEMP); if (TEMP==0) CURRENT+=5; repeat (20) { strcpy (®, "rubbish"); ltoa (&VALUE, inloop); strcat (®, &VALUE); if (regGetN (®, &TEMP)) TEMP=0; CURRENT+=TEMP; } repeat (18) { strcpy (®, "ClothesItemStatus"); ltoa (&VALUE, inloop); strcat (®, &VALUE); if (regGetN (®, &TEMP2)) TEMP2=0; if (TEMP2==2) TEMP=1; else TEMP=0; CURRENT+=TEMP; } repeat (10) { strcpy (®, "Dishes"); ltoa (&VALUE, inloop); strcat (®, &VALUE); if (regGetN (®, &TEMP)) TEMP=0; CURRENT+=TEMP; } repeat (21) { strcpy (®, "weed"); ltoa (&VALUE, inloop); strcat (®, &VALUE); if (regGetN (®, &TEMP)) TEMP=0; CURRENT+=TEMP; } repeat (12) { strcpy (®, "grass"); ltoa (&VALUE, inloop); strcat (®, &VALUE); if (regGetN (®, &TEMP)) TEMP=0; CURRENT+=TEMP; } repeat (5) { strcpy (®, "water"); ltoa (&VALUE, inloop); strcat (®, &VALUE); if (regGetN (®, &TEMP)) TEMP=0; CURRENT+=TEMP; } repeat (25) { strcpy (®, "flower"); ltoa (&VALUE, inloop); strcat (®, &VALUE); if (regGetN (®, &TEMP2)) TEMP=0; if (!TEMP2) CURRENT+=1; } /* IF CURRENT IS >TOTAL THEN AMBIENT = 0 IF CURRENT IS 0 THEN AMBIENT = 1000 *//*DO CALCULATION*/ CURRENT=TOTAL-CURRENT; if (CURRENT<0) CURRENT=0; newVALUE=CURRENT/TOTAL; newVALUE=newVALUE*1000; if (newVALUE>1000) newVALUE=1000; /*GET AMBIENT VALUE*/ statsGet (&stats); oldVALUE=stats[3]; /*FIND DIFFERENCE*/ newVALUE=newVALUE-oldVALUE; /*WRITE NEW VALUE*/ stats[0]=0; stats[1]=0; stats[2]=0; stats[3]=newVALUE; stats[4]=0; stats[5]=0; stats[6]=0; stats[7]=0; statsExp (&stats); counter (30)=0; } end End_Chunk ; ;-------Object 79------------------------------------------------------- ; Chunk: Standard Name: "statsOverTime" Number: 79 Size: 2000 2000 2000 Position: 2026915 0 1975891 Type: 65535 Layer: 0 End_Chunk Chunk: SCL /* USE THIS CODE TO AFFECT STATS OVER TIME TO DUMP WHEN STATS GET TOO LOW */ float DAYS; short Hunger, Happy, Health, Sex; long STATS[8], Time; float Total; if (vrtime>Time+120000 || first) { Health=0; Happy=0; Sex=0; Hunger=-2; statsGet (&STATS); if (STATS[4]<30) Health=-3; if (STATS[0]<30) Happy=-3; if (STATS[1]<30) Sex=-3; STATS[0]=Health; STATS[1]=Happy; STATS[2]=Sex; STATS[3]=0; STATS[4]=Hunger; STATS[5]=0; STATS[6]=0; STATS[7]=0; statsExp (&STATS); statsGet (&STATS); Total=STATS[0]+STATS[1]+STATS[2]+STATS[4]; Total=Total/4; Time=vrtime; } if (Total<30) { share (1)=-1; dumpHim (0); exitVis; } end End_Chunk ; ;-------Object 80------------------------------------------------------- ; Chunk: Standard Name: "other" Number: 80 Size: 2000 2000 2000 Position: 2028915 0 1975891 Type: 65535 Layer: 0 End_Chunk Chunk: SCL long STATS[8]; if (first) { counter (50)=-1; counter (51)=-1; counter (52)=-1; counter (53)=-1; } if (counter (50)!=-1 || counter (51)!=-1 || counter (52)!=-1 || counter (53)!=-1) { if (counter (50)!=-1) STATS[0]=counter (50); else STATS[0]=0; if (counter (51)!=-1) STATS[1]=counter (51); else STATS[1]=0; if (counter (52)!=-1) STATS[2]=counter (52); else STATS[2]=0; if (counter (53)!=-1) STATS[4]=counter (53); else STATS[4]=0; STATS[5]=0; STATS[6]=0; STATS[7]=0; statsExp (&STATS); counter (50)=-1; counter (51)=-1; counter (52)=-1; counter (53)=-1; } end End_Chunk ; ;-------Object 81------------------------------------------------------- ; Chunk: Standard Name: "clickJo" Number: 81 Size: 2000 2000 2000 Position: 2030915 0 1975891 Type: 65535 Layer: 0 End_Chunk Chunk: SCL long STATS[8]; short LOWEST, MOOD, TEMP; float Total; /*CODE FOR CLICKING ON JO*/ resume (2, 2); if (activate (#72, 0)) { statsGet (&STATS); repeat (5) { TEMP=5+-inloop; repeat (5) { if (STATS[TEMP]<STATS[inloop-1] && STATS[TEMP]<STATS[LOWEST]) LOWEST=TEMP; } } MOOD=STATS[LOWEST]/100; MOOD=table (MOOD) {0, 0, 1, 1, 2, 2, 3, 3, 4, 4, 4}; if (share (1)<0) { /* SOUND RESPONSES FOR TOUCHING UP DEPENDING ON MOOD */ switch (MOOD); case 0: counter (25)=table (random (6)) {176, 11, 29, 82, 89, 90}; case 1: counter (25)=table (random (5)) {175, 178, 41, 28, 72, 12}; case 2: counter (25)=table (random (2)) {15, 9}; case 3: counter (25)=table (random (4)) {171, 179, 94, 174}; case 4: counter (25)=table (random (3)) {172, 173, 174}; counter (50)=-2; counter (51)=-2; counter (52)=-2; counter (53)=-2; } else counter (40)=MOOD; statsGet (&STATS); Total=STATS[0]+STATS[1]+STATS[2]+STATS[4]; Total=Total/4; if (Total<30) { share (1)=-1; dumpHim (0); exitVis; } while (mouseb) waitf; clrtrig (me, 0); clrtrig (#72, 0); } end End_Chunk ; ;-------Object 82------------------------------------------------------- ; Chunk: Standard Name: "clickJo 2" Number: 82 Size: 2000 2000 2000 Position: 2030915 2000 1975891 Type: 65535 Layer: 0 End_Chunk Chunk: SCL long TEMP, COOKING; short COOKED, FREE=1, MOOD, WEAR; char NAME[256], SHARE[10]; resume (4, 4); /*CODE FOR CLICKING ON JO*/ if (first) { counter (40)=-1; share (1)=-1; } if (counter (40)>=0) { FREE=1; MOOD=counter (40); counter (40)=-1; if (share (1)>=0) { if (objAttrP (share (1), "G")) { /* SOUND RESPONSES FOR GIVE DEPENDING ON MOOD */ switch (MOOD); case 0: counter (25)=table (random (4)) {95, 97, 6, 105}; case 1: counter (25)=table (random (3)) {95, 97, 6}; case 2: counter (25)=table (random (4)) {6, 14, 21, 91}; case 3: counter (25)=table (random (10)) {21, 16, 40, 91, 6, 20, 14, 21, 171, 91}; case 4: counter (25)=table (random (10)) {20, 52, 53, 94, 159, 171, 14, 1, 91, 40}; /* END OF GIVE */ } if (share (1)>43 && share (1)<62) { counter (20)=-1; counter (25)=-1; FREE=0; } if (share (1)>13 && share (1)<21) { counter (20)=-1; counter (25)=-1; FREE=0; } if (share (1)>-1 && share (1)<2 && FREE) { /*flowers*/ counter (20)=table (random (4)) {108, 109, 110, 111}; statsObj (share (1)); useObj (share (1)); FREE=0; } if (share (1)>1 && share (1)<4 && FREE) { /*chocs*/ if (random (5)==3) counter (25)=33; counter (20)=table (random (4)) {190, 191, 192, 193}; statsObj (share (1)); useObj (share (1)); FREE=0; } if (share (1)==9 && FREE) { /*budviser*/ counter (25)=table (random (2)) {67, 123}; counter (20)=133; statsObj (share (1)); useObj (share (1)); FREE=0; } if (share (1)==33 && FREE) { /*frying pan*/ counter (20)=table (random (6)) {104, 103, 102, 0, 104, 105, 113}; counter (25)=186; counter (26)=table (random (14)) {11, 12, 28, 63, 82, 83, 89, 90, 148, 175, 176, 178, 180, 73}; statsObj (share (1)); if (MOOD<2) { #73.Go=0; counter (21)=1; repeat (6) { counter (20)=table (inloop-1) {154, 155, 151, 160, 161, 158}; waitfs (5); } counter (21)=0; #73.Go=1; } FREE=0; } if (share (1)==34 && FREE) { /*whip*/ counter (20)=table (MOOD) {8, 138, 102, 277, 277}; counter (25)=185; if (MOOD>2) counter (26)=table (random (8)) {9, 15, 85, 86, 94, 130, 171, 179}; else counter (26)=table (random (15)) {93, 11, 12, 28, 63, 82, 83, 89, 90, 148, 175, 176, 178, 180, 73}; statsObj (share (1)); FREE=0; } if (share (1)==63 && FREE) { share (70)=3; /*add menu lock stuff*/ statsObj (share (1)); useObj (share (1)); FREE=0; menuLock (1); loadvrt ("map.vrt"); } if (share (1)==64 && FREE) { share (70)=2; statsObj (share (1)); useObj (share (1)); FREE=0; menuLock (1); loadvrt ("map.vrt"); } if (share (1)==79 && FREE) { share (70)=1; statsObj (share (1)); useObj (share (1)); FREE=0; menuLock (1); loadvrt ("map.vrt"); } if (share (1)>39 && share (1)<43 && FREE) { share (70)=0; switch (share (1)); case 40: share (69)=1; case 41: share (69)=2; case 42: share (69)=3; statsObj (share (1)); useObj (share (1)); FREE=0; share (1)=76; menuLock (1); loadvrt ("map.vrt"); } if (share (1)==81 && FREE) { if (MOOD>2) { statsObj (share (1)); useObj (share (1)); menuLock (1); loadvrt ("striptease.vrt"); } else { counter (25)=92; counter (20)=table (random (5)) {164, 169, 170, 189, 184}; share (1)=-1; } FREE=0; } if (share (1)>9 && share (1)<13 && FREE) { counter (25)=192; statsObj (share (1)); useObj (share (1)); FREE=0; } if (share (1)==22) { if (regGetN ("dog", &TEMP)) TEMP=0; if (TEMP!=0) { counter (20)=134; counter (25)=171; regPutN ("dog", 5); statsObj (share (1)); useObj (share (1)); } else counter (25)=-1; FREE=0; } if (share (1)>39 && share (1)<43 && FREE) { counter (20)=-1; counter (25)=-1; FREE=0; } if (share (1)>64 && share (1)<67 && FREE) { counter (20)=-1; counter (25)=-1; FREE=0; } if (share (1)==4 && FREE) { counter (20)=136; counter (25)=table (random (2)) {80, 76}; statsObj (share (1)); useObj (share (1)); FREE=0; } if (share (1)==7 && FREE) { counter (25)=20; statsObj (share (1)); useObj (share (1)); counter (21)=1; #73.Go=0; repeat (6) { counter (20)=table (inloop-1) {283, 285, 287, 286, 288, 289}; waitfs (5); } waitfs (5); counter (21)=0; #73.Go=1; FREE=0; } if (share (1)>4 && share (1)<7 && FREE) { counter (20)=table (random (3)) {170, 137, 300}; statsObj (share (1)); useObj (share (1)); FREE=0; } if (share (1)==80 && FREE) { counter (20)=table (random (5)) {309, 310, 311, 312, 313}; statsObj (share (1)); useObj (share (1)); FREE=0; } if (share (1)==29 && FREE) { counter (20)=table (random (2)) {105, 138}; counter (25)=88; regPutN ("ill", 1); statsObj (share (1)); useObj (share (1)); FREE=0; } if (share (1)==27 && FREE) { counter (20)=table (random (2)) {105, 138}; counter (25)=88; regPutN ("ill", 1); statsObj (share (1)); useObj (share (1)); FREE=0; } } } end End_Chunk ; ;-------Object 84------------------------------------------------------- ; Chunk: Standard Name: "items" Number: 84 Size: 2000 2000 2000 Position: 2016915 0 1975891 Type: 65535 Layer: 0 End_Chunk Chunk: SCL short TEMP=-1, imgNum=57, imgNum2=56, TEMP2; long WIDTH, HEIGHT, COOKEDV; char NAME[10], PATH[256], DIR[256], SHARE[5]; if (first) strcpy (&DIR, "c:\\LoveBytes\\images\\"); if (activate (me, 0)) share (1)=-1; if (TEMP!=share (1)) { if (share (1)>=0) { ltoa (&SHARE, share (1)); strcpy (&PATH, &DIR); strcat (&PATH, &SHARE); strcat (&PATH, ".bmp"); imageLd (&PATH, imgNum, 1, &WIDTH, &HEIGHT); #75.SELECTED=imgNum; } else #75.SELECTED=imgNum2; strcpy (&PATH, &DIR); } TEMP=share (1); end End_Chunk ; ;-------Object 89------------------------------------------------------- ; Chunk: Standard Name: "money" Number: 89 Size: 2000 2000 2000 Position: 2014915 0 1975891 Type: 65535 Layer: 0 End_Chunk Chunk: SCL long MONEYD, MONTH, DAY; if (first) { dateCurr (&MONTH, &DAY); if (regGetN ("MoneyDay", &MONEYD)) { regPutN ("MoneyDay", DAY); MONEYD=DAY; } if (MONEYD!=DAY) { vis (#90); regPutN ("MoneyDay", DAY); } } end End_Chunk End_Children ; ;-------Object 2------------------------------------------------------- ; Chunk: Standard Name: "HUMANVP: HOLD " Number: 2 Size: 4000 4000 4000 Position: 2024020 13300 1985703 Type: 65535 Layer: 0 DFlags: M End_Chunk Chunk: Colours Number: 18 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E 0x0E End_Chunk Chunk: InitPos Position: 2024020 13300 1985703 End_Chunk Chunk: Dynamics MovType: 0x800004A1 Fuel: 0 Climb: 0 Gravity: 0 Coupled: 3 Drive: 0 0 0 External: 0 0 0 MaxForce: 0 0 0 GroundFric: 8192 0 8192 Restitution: 0 0 0 Velocity: 0 0 0 MaxVel: 0 0 0 End_Chunk Children: ; ;-------Object 3------------------------------------------------------- ; Chunk: Standard Name: "HUMANVP:View point " Number: 3 Size: 1000 1000 1000 Position: 1500 1500 1500 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFFFA1A 0x0000 Centre: 500 500 500 End_Chunk Chunk: Colours Number: 18 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B 0x0B End_Chunk ; ;-------Object 69------------------------------------------------------- ; Chunk: Standard Name: "movelogic" Number: 69 Size: 1000 1000 1000 Position: 0 0 0 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: SCL short X, Y; resume (1, 2); if (mouseb>1) { if (!first) X=mousex; Y=mousey; while (mouseb>1) { if (mouseb==3) { Y=mousey; while (mouseb==3) { ydrive (#2)= (mousey-Y)*-10; yrot (#3)+=deg ( (mousex-X)*4); waitf; } Y=mousey; } zdrive (#2)= (mousey-Y)*-20; yrot (#3)+=deg ( (mousex-X)*4); waitf; } } end End_Chunk End_Children End_File