Love Bytes

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

/ Love Bytes / LoveBytes.bin / lb.z / living.vrt / world.script < prev next >

Wrap

Text File | 1997-11-21 | 162.9 KB | 24,609 lines

; ; Script conversion of file LIVING.WLD ; Type: WRLD Title: "\n\n\r" "World file LIVING.WLD revision 39\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: 6 Control: 5 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 484 439 166 Rotation: 0 Frame: 0 Type: Relative Offset: 0 201 0 Zoom: 0x2000 Subchunk Number: 2 Type: 35 View: 0 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 2150201 30939 1886733 Rotation: 0 Frame: 0 Type: Relative Offset: 312 7411 0 Zoom: 0x2000 Subchunk Number: 3 Type: 31 View: 96 Control: 87 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 4134 18932 -9529 Rotation: 0 Frame: 0 Type: Relative Offset: 4241 86 0 Zoom: 0x2492 Subchunk Number: 4 Type: 35 View: 0 Point: 0 Frames: 1 Position: 0 Frame: 0 Type: StraightMove Pos: 2230118 30939 1822314 Rotation: 0 Frame: 0 Type: Relative Offset: 312 9292 0 Zoom: 0x2000 Subchunk Number: 5 Type: 35 View: 0 Point: 0 Frames: 1500 Position: 0 Frame: 0 Type: StraightMove Pos: 2146920 18968 1891390 Position: 1 Frame: 99 Type: CurveMove Pos: 2156282 27117 1934965 Position: 2 Frame: 199 Type: CurveMove Pos: 2123338 29535 1981236 Position: 3 Frame: 299 Type: CurveMove Pos: 2070939 19600 1974987 Position: 4 Frame: 399 Type: CurveMove Pos: 2055781 18883 1932699 Position: 5 Frame: 499 Type: CurveMove Pos: 2120393 22519 1919086 Position: 6 Frame: 599 Type: CurveMove Pos: 2145842 22204 1971231 Position: 7 Frame: 699 Type: CurveMove Pos: 2114751 32545 2003063 Position: 8 Frame: 799 Type: CurveMove Pos: 2076667 50649 2015833 Position: 9 Frame: 899 Type: CurveMove Pos: 2044830 65302 2002441 Position: 10 Frame: 999 Type: CurveMove Pos: 2089422 44801 2002642 Position: 11 Frame: 1099 Type: CurveMove Pos: 2132795 27782 2006030 Position: 12 Frame: 1199 Type: CurveMove Pos: 2108279 30223 1950040 Position: 13 Frame: 1299 Type: CurveMove Pos: 2108715 29504 1902489 Rotation: 0 Frame: 0 Type: Relative Offset: 64182 1735 0 Zoom: 0x2000 Rotation: 1 Frame: 99 Type: Relative Offset: 1266 9946 0 Zoom: 0x2000 Rotation: 2 Frame: 199 Type: Relative Offset: 2726 21978 0 Zoom: 0x2000 Rotation: 3 Frame: 299 Type: Relative Offset: 3714 36076 0 Zoom: 0x2000 Rotation: 4 Frame: 399 Type: Relative Offset: 678 51979 0 Zoom: 0x2000 Rotation: 5 Frame: 499 Type: Relative Offset: 1323 2435 0 Zoom: 0x2000 Rotation: 6 Frame: 599 Type: Relative Offset: 65213 9456 0 Zoom: 0x2000 Rotation: 7 Frame: 699 Type: Relative Offset: 63627 15744 0 Zoom: 0x2000 Rotation: 8 Frame: 799 Type: Relative Offset: 2813 30636 0 Zoom: 0x2000 Rotation: 9 Frame: 899 Type: Relative Offset: 5497 49180 0 Zoom: 0x2000 Rotation: 10 Frame: 999 Type: Relative Offset: 7346 48674 0 Zoom: 0x2000 Rotation: 11 Frame: 1099 Type: Relative Offset: 972 31178 0 Zoom: 0x2000 Rotation: 12 Frame: 1199 Type: Relative Offset: 3176 38630 0 Zoom: 0x2000 Rotation: 13 Frame: 1299 Type: Relative Offset: 2752 50514 0 Zoom: 0x2000 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 28------------------------------------------------------- ; Chunk: Standard Name: "floor[28]" Number: 28 Size: 140000 80100 140000 Position: 2029000 0 1884000 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: Colours Number: 16 0x02 0x02 0x02 0x02 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 0x08 End_Chunk Children: ; ;-------Object 101------------------------------------------------------- ; Chunk: Standard Name: "leftwall[101]" Number: 101 Size: 10000 35000 20000 Position: 0 45100 110000 Type: 1 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: 12 End_Chunk Chunk: Colours Number: 1 0xA9 End_Chunk ; ;-------Object 118------------------------------------------------------- ; Chunk: Standard Name: "table[118]" Number: 118 Size: 15200 2500 16100 Position: 84800 7500 73900 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 0x76 0x00 0x00 0x75 0x00 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 38 Index: 2 Image: 42 End_Chunk ; ;-------Object 17------------------------------------------------------- ; Chunk: Standard Name: "table[17]" Number: 17 Size: 20300 2500 20300 Position: 79700 5000 69700 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: 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: 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: Colours Number: 6 0x77 0x76 0x00 0x00 0x75 0x00 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 39 Index: 2 Image: 43 End_Chunk ; ;-------Object 16------------------------------------------------------- ; Chunk: Standard Name: "table[16]" Number: 16 Size: 25300 2500 25400 Position: 74700 2500 64600 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: 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: 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: Colours Number: 6 0x77 0x76 0x00 0x00 0x75 0x00 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 40 Index: 2 Image: 44 End_Chunk ; ;-------Object 15------------------------------------------------------- ; Chunk: Standard Name: "table[15]" Number: 15 Size: 30500 2500 30000 Position: 69500 0 60000 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: 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: 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: Colours Number: 6 0x77 0x76 0x00 0x00 0x75 0x00 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 41 Index: 2 Image: 45 End_Chunk ; ;-------Object 99------------------------------------------------------- ; Chunk: Standard Name: "floor[99]" Number: 99 Size: 55000 0 20000 Position: 85000 45000 110000 Type: 6 Layer: 0 End_Chunk Chunk: Colours Number: 1 0x15 End_Chunk ; ;-------Object 12------------------------------------------------------- ; Chunk: Standard Name: "floor[12]" Number: 12 Size: 130000 0 110000 Position: 10000 45000 0 Type: 6 Layer: 0 End_Chunk Chunk: Colours Number: 1 0x15 End_Chunk ; ;-------Object 116------------------------------------------------------- ; Chunk: Standard Name: "floor[116]" Number: 116 Size: 130000 0 40000 Position: 10000 10000 90000 Type: 5 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: 32 End_Chunk Chunk: Colours Number: 1 0x99 End_Chunk ; ;-------Object 7------------------------------------------------------- ; Chunk: Standard Name: "frontwall" Number: 7 Size: 130000 34900 10000 Position: 10000 10100 130000 Type: 3 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: 33 End_Chunk ; ;-------Object 18------------------------------------------------------- ; Chunk: Standard Name: "frontwall[18]" Number: 18 Size: 75000 10000 10000 Position: 10000 0 90000 Type: 3 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: 29 End_Chunk ; ;-------Object 4------------------------------------------------------- ; Chunk: Standard Name: " intrologic" Number: 4 Size: 0 35000 130000 Position: 140000 10000 0 Type: 2 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: SCL resume (1, 2); if (first) { if (regGetN ("fish", &null)) regPutN ("fish", 5); if (share (80)) { setvp (5); waitfs (2); welcome; while (1==aviState) waitf; setvp (1); share (99)=0; xpos (#5)=2148000; ypos (#5)=29000; zpos (#5)=1885000; yrot (#6)=0; share (80)=0; counter (25)=35; } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 8 End_Chunk ; ;-------Object 9------------------------------------------------------- ; Chunk: Standard Name: "backwall[9]" Number: 9 Size: 130000 45000 0 Position: 10000 0 0 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: Colours Number: 6 0x77 0x00 0x77 0x76 0x75 0x75 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 18 End_Chunk Children: ; ;-------Object 170------------------------------------------------------- ; Chunk: Standard Name: "backwall[170]" Number: 170 Size: 31200 21100 0 Position: 40300 14000 0 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: Colours Number: 6 0x77 0x00 0x77 0x76 0x75 0x75 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 100 End_Chunk End_Children ; ;-------Object 3------------------------------------------------------- ; Chunk: Standard Name: "leftwall" Number: 3 Size: 0 45000 110000 Position: 10000 0 0 Type: 1 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: 1 0x00 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 17 End_Chunk Children: ; ;-------Object 35------------------------------------------------------- ; Chunk: Standard Name: "table[35]" Number: 35 Size: 0 6500 7000 Position: 0 19900 68000 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: SCL if (activate (me, 0)) { dlgPhoto; clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 4 End_Chunk ; ;-------Object 36------------------------------------------------------- ; Chunk: Standard Name: "table[36]" Number: 36 Size: 0 6500 7000 Position: 0 19900 23300 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: SCL if (activate (me, 0)) { dlgInfo; clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 1 End_Chunk End_Children ; ;-------Object 13------------------------------------------------------- ; Chunk: Standard Name: "floor[13]" Number: 13 Size: 90000 0 90000 Position: 10000 0 0 Type: 5 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: 15 End_Chunk Chunk: Colours Number: 1 0x00 End_Chunk ; ;-------Object 136------------------------------------------------------- ; Chunk: Standard Name: "table[136]" Number: 136 Size: 1000 4900 15000 Position: 12392 1100 3806 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x3F 0x3F 0x3F 0x76 0x75 0x00 End_Chunk ; ;-------Object 135------------------------------------------------------- ; Chunk: Standard Name: "table[135]" Number: 135 Size: 1000 4900 15000 Position: 40392 1100 3806 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x3F 0x3F 0x3F 0x76 0x75 0x00 End_Chunk ; ;-------Object 134------------------------------------------------------- ; Chunk: Standard Name: "table[134]" Number: 134 Size: 29000 1100 15000 Position: 12392 0 3806 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x3F 0x3F 0x3F 0x76 0x28 0x00 End_Chunk ; ;-------Object 132------------------------------------------------------- ; Chunk: Standard Name: "table[132]" Number: 132 Size: 12000 10000 6000 Position: 15294 7000 8708 Type: 9 Layer: 0 DFlags: r End_Chunk Chunk: TexCoords Number: 2 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: 2 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: 64 Index: 2 Image: 65 Index: 3 Image: 66 Index: 4 Image: 51 End_Chunk Chunk: SCL short On; resume (0, 4); if (first) dlgIntro; if (!On) timgref (me, 1)=timgref (me, 1)%3+1; if (activate (me, 0)) { if (share (1)==31) { while (sndState) waitf; intro; useObj (share (1)); } else { if (share (1)==78) { while (sndState) waitf; welcome; useObj (share (1)); } } clrtrig (me, 0); } end End_Chunk Chunk: Colours Number: 7 0x3A 0x76 0x3A 0x3F 0x36 0x75 0x20 End_Chunk Chunk: Rotations Initial: 0x0000 0x1555 0x0000 Centre: 6000 5000 3000 End_Chunk ; ;-------Object 22------------------------------------------------------- ; Chunk: Standard Name: "table[22]" Number: 22 Size: 29000 1000 15000 Position: 12392 6000 3806 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x3F 0x3F 0x3F 0x76 0x28 0x3F End_Chunk ; ;-------Object 125------------------------------------------------------- ; Chunk: Standard Name: "lamp" Number: 125 Size: 10000 10000 10000 Position: 45140 33000 39938 Type: 7 Layer: 0 OFlags: Aa End_Chunk Chunk: AnimCols ColsPerCel: 80 Cels: 10 0x35 0x34 0x30 0x32 0x33 0x30 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x30 0x34 0x33 0x32 0x30 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x30 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x30 0x34 0x15 0x15 0x35 0x34 0x30 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x34 0x33 0x32 0x30 0x34 0x35 0x15 0x15 0x34 0x33 0x30 0x31 0x32 0x33 0x34 0x15 0x15 0x30 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x30 0x32 0x33 0x30 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x30 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x30 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x30 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x30 0x32 0x33 0x30 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x30 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x36 0x35 0x36 0x35 0x30 0x35 0x36 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x30 0x32 0x30 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x30 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x30 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x30 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x30 0x30 0x32 0x33 0x34 0x15 0x15 0x35 0x36 0x35 0x36 0x30 0x36 0x35 0x36 0x35 0x34 0x30 0x32 0x33 0x34 0x35 0x15 0x15 0x30 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x30 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x30 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x30 0x30 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x30 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x30 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x30 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x30 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x30 0x35 0x15 0x15 0x34 0x33 0x30 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x30 0x30 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x30 0x34 0x35 0x15 0x15 0x30 0x30 0x32 0x31 0x30 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x30 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x30 0x32 0x33 0x34 0x15 0x15 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x34 0x30 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x30 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x30 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x30 0x34 0x33 0x30 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x30 0x34 0x33 0x32 0x33 0x30 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x30 0x33 0x34 0x15 0x15 0x30 0x36 0x35 0x36 0x35 0x36 0x35 0x36 End_Chunk Chunk: SCL ccel (me, 1)=random (10)+1; end End_Chunk Chunk: Animations Number: 1 Subchunk First: 1 Last: 10 Phase: 0x0100 Velocity: 0x0100 Mode: 0 End_Chunk Chunk: Angular Velocities Initial: 0x0000 0x071D 0x0000 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 5000 5000 5000 End_Chunk Chunk: Colours Number: 80 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x34 0x33 0x32 0x33 0x34 0x35 0x15 0x15 0x34 0x33 0x32 0x31 0x32 0x33 0x34 0x15 0x15 0x35 0x36 0x35 0x36 0x35 0x36 0x35 0x36 End_Chunk ; ;-------Object 38------------------------------------------------------- ; Chunk: Standard Name: "lamp[38]" Number: 38 Size: 2000 2000 2000 Position: 49140 43000 43938 Type: 0 Layer: 0 DFlags: r OFlags: Aa End_Chunk Chunk: Colours Number: 6 0x01 0x01 0x01 0x01 0x75 0x01 End_Chunk ; ;-------Object 123------------------------------------------------------- ; Chunk: Standard Name: "stairs[123]" Number: 123 Size: 75000 35000 0 Position: 10000 10000 110000 Type: 3 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: 16 End_Chunk ; ;-------Object 100------------------------------------------------------- ; Chunk: Standard Name: "frontwall[100]" Number: 100 Size: 75600 35000 0 Position: 10000 45000 130000 Type: 3 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: 6 End_Chunk ; ;-------Object 108------------------------------------------------------- ; Chunk: Standard Name: "rightwall[108]" Number: 108 Size: 10000 35000 20000 Position: 85000 45000 110000 Type: 2 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: 14 End_Chunk ; ;-------Object 20------------------------------------------------------- ; Chunk: Standard Name: "rightwall[20]" Number: 20 Size: 75000 35000 20000 Position: 10000 45000 90000 Type: 4 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: 19 End_Chunk ; ;-------Object 21------------------------------------------------------- ; Chunk: Standard Name: "stairs[21]" Number: 21 Size: 25000 3000 20000 Position: 10000 42000 110000 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 2 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: 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: Colours Number: 6 0x00 0x76 0x77 0x00 0x75 0x75 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 34 Index: 2 Image: 10 End_Chunk ; ;-------Object 107------------------------------------------------------- ; Chunk: Standard Name: "floor[107]" Number: 107 Size: 75000 0 20000 Position: 10000 80000 110000 Type: 6 Layer: 0 End_Chunk Chunk: Colours Number: 1 0x21 End_Chunk ; ;-------Object 27------------------------------------------------------- ; Chunk: Standard Name: "floor[27]" Number: 27 Size: 54900 34000 2000 Position: 36900 6000 0 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 29------------------------------------------------------- ; Chunk: Standard Name: "floor[29]" Number: 29 Size: 54900 3000 2000 Position: 0 31000 0 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 48 End_Chunk Chunk: Colours Number: 6 0x0F 0x00 0x0F 0x10 0xFF 0xFF End_Chunk ; ;-------Object 30------------------------------------------------------- ; Chunk: Standard Name: "floor[30]" Number: 30 Size: 49120 31000 400 Position: 4334 0 1000 Type: 65535 Layer: 0 End_Chunk Chunk: SCL short Dir=1200, IMAGE, facetNo=24; char IMAGEN[5], DIR[1024], PATH[1024], DRIVE[3]; long WIDTH, HEIGHT; resume (1, 2); if (first) { cdDrive (&DRIVE); strcpy (&DIR, &DRIVE); strcat (&DIR, "\\LoveBytes\\Locations\\"); } if (activate (#34, 0) || activate (#33, 0) || activate (#31, 0) || activate (#32, 0)) { if (Dir==1200) { IMAGE=random (6); ltoa (&IMAGEN, IMAGE); strcpy (&PATH, &DIR); strcat (&PATH, &IMAGEN); strcat (&PATH, ".gif"); imageLd (&PATH, 100, 0, &WIDTH, &HEIGHT); strcpy (&PATH, &DIR); } repeat (8) { xpos (#33)+=Dir; xpos (#31)-=Dir; waitf; } Dir=Dir*-1; clrtrig (#34, 0); clrtrig (#33, 0); clrtrig (#31, 0); clrtrig (#32, 0); } end End_Chunk Children: ; ;-------Object 32------------------------------------------------------- ; Chunk: Standard Name: "floor[32]" Number: 32 Size: 14446 31000 0 Position: 0 0 400 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 37 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x77 0x10 0xFF 0xFF End_Chunk ; ;-------Object 34------------------------------------------------------- ; Chunk: Standard Name: "floor[34]" Number: 34 Size: 14446 31000 0 Position: 34673 0 400 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 37 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x77 0x10 0xFF 0xFF End_Chunk ; ;-------Object 33------------------------------------------------------- ; Chunk: Standard Name: "floor[33]" Number: 33 Size: 14446 31000 0 Position: 23114 0 400 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 37 End_Chunk Chunk: InitPos Position: 23114 0 400 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x77 0x10 0xFF 0xFF End_Chunk ; ;-------Object 31------------------------------------------------------- ; Chunk: Standard Name: "floor[31]" Number: 31 Size: 14446 31000 0 Position: 11557 0 200 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 37 End_Chunk Chunk: InitPos Position: 11557 0 200 End_Chunk Chunk: Colours Number: 6 0x00 0x00 0x77 0x10 0xFF 0xFF End_Chunk End_Children End_Children ; ;-------Object 104------------------------------------------------------- ; Chunk: Standard Name: "table[104]" Number: 104 Size: 7100 28000 18000 Position: 132900 10100 10848 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 0x10 0x1D 0x00 0x1D 0x1B 0x00 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 47 End_Chunk ; ;-------Object 44------------------------------------------------------- ; Chunk: Standard Name: "table[44]" Number: 44 Size: 29000 7000 0 Position: 12392 0 18806 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x00 0x75 0x75 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 49 End_Chunk ; ;-------Object 137------------------------------------------------------- ; Chunk: Standard Name: "table[137]" Number: 137 Size: 1800 4900 15000 Position: 25992 1100 3806 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x3F 0x3F 0x3F 0x76 0x75 0x00 End_Chunk ; ;-------Object 139------------------------------------------------------- ; Chunk: Standard Name: "table[139]" Number: 139 Size: 10000 2600 12000 Position: 14392 1100 3806 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: SCL resume (0, 4); if (activate (me, 0)) { if (share (1)==31) { while (sndState) waitf; intro; useObj (share (1)); } else { if (share (1)==78) { while (sndState) waitf; welcome; useObj (share (1)); } } clrtrig (me, 0); } end End_Chunk Chunk: Colours Number: 6 0x08 0x3F 0x08 0x76 0x08 0x00 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 50 End_Chunk ; ;-------Object 46------------------------------------------------------- ; Chunk: Standard Name: "table[46]" Number: 46 Size: 34200 100 23100 Position: 26800 3900 31648 Type: 5 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: 46 End_Chunk ; ;-------Object 48------------------------------------------------------- ; Chunk: Standard Name: "table[48]" Number: 48 Size: 1000 3900 1000 Position: 28000 0 42506 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: 54 End_Chunk ; ;-------Object 49------------------------------------------------------- ; Chunk: Standard Name: "table[49]" Number: 49 Size: 1000 3900 1000 Position: 45000 0 52506 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: 54 End_Chunk ; ;-------Object 50------------------------------------------------------- ; Chunk: Standard Name: "table[50]" Number: 50 Size: 1000 3900 1000 Position: 45000 0 32506 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: 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 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 54 End_Chunk ; ;-------Object 47------------------------------------------------------- ; Chunk: Standard Name: "table[47]" Number: 47 Size: 1000 3900 1000 Position: 59000 0 42506 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: 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: 54 End_Chunk ; ;-------Object 53------------------------------------------------------- ; Chunk: Standard Name: "fishtank" Number: 53 Size: 6000 10000 17000 Position: 10000 10000 92430 Type: 0 Layer: 0 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 60 End_Chunk Chunk: Colours Number: 6 0x00 0x01 0x01 0x00 0x1E 0x75 End_Chunk ; ;-------Object 54------------------------------------------------------- ; Chunk: Standard Name: "fishtank[54]" Number: 54 Size: 6000 400 17000 Position: 10000 27000 92430 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x01 0x01 0x76 0x01 0x1D End_Chunk ; ;-------Object 57------------------------------------------------------- ; Chunk: Standard Name: "fishtank[57]" Number: 57 Size: 100 7000 16000 Position: 10000 20000 92930 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x01 0x02 0x76 0x75 0x75 End_Chunk ; ;-------Object 64------------------------------------------------------- ; Chunk: Standard Name: "fishtank[64]" Number: 64 Size: 6000 7000 500 Position: 10000 20000 92430 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x01 0x01 0x1C 0x01 0x75 End_Chunk ; ;-------Object 65------------------------------------------------------- ; Chunk: Standard Name: "fishtank[65]" Number: 65 Size: 6000 7000 500 Position: 10000 20000 108930 Type: 0 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x00 0x1C 0x01 0x00 0x01 0x75 End_Chunk ; ;-------Object 66------------------------------------------------------- ; Chunk: Standard Name: "fishy hold" Number: 66 Size: 0 4100 5000 Position: 14000 22000 103500 Type: 65535 Layer: 0 End_Chunk Chunk: SCL short State=0; resume (1, 1); repeat (20) { zpos (me)-=500; waitf; } zpos (#63)=4000; zpos (#60)=0; timgref (#60, 1)=2+State; repeat (20) { zpos (me)+=500; waitf; } zpos (#63)=0; zpos (#60)=1000; timgref (#60, 1)=1+State; end End_Chunk Chunk: InitPos Position: 14000 22000 103500 End_Chunk Children: ; ;-------Object 60------------------------------------------------------- ; Chunk: Standard Name: "fishtank[60]" Number: 60 Size: 0 3000 4000 Position: 0 0 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: 3 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: 3 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: 4 Index: 1 Sound: 11 Index: 2 Sound: 9 Index: 3 Sound: 10 Index: 4 Sound: 12 End_Chunk Chunk: SCL long TEMP; resume (1, 2); if (first) { regGetN ("fish", &TEMP); if (TEMP==0) #66.State=2; } if (random (10000-timSince/144)==1) { regGetN ("fish", &TEMP); if (TEMP>1) { --TEMP; regPutN ("fish", TEMP); if (TEMP<3) sound (3, 64, 127, 0); } else { #66.State=2; regPutN ("fish", 0); counter (30)=1; } } if (activate (me, 0)) { counter (30)=1; if (share (1)==23 && #66.State==2) { /* new fish */ #66.State=0; regPutN ("fish", 5); sound (1, 64, 127, 0); statsObj (share (1)); useObj (share (1)); } else { if (share (1)==25 && #66.State==0) { /* give food */ regPutN ("fish", 5); sound (2, 64, 127, 0); statsObj (share (1)); useObj (share (1)); } else { if ( (share (1)==29 || share (1)==27) && #66.State==0) { /* poisoned*/ useObj (share (1)); sound (4, 64, 127, 0); #66.State=2; regPutN ("fish", 0); } } } clrtrig (me, 0); } end End_Chunk Chunk: InitPos Position: 0 0 1000 End_Chunk Chunk: ImageRef Number: 4 Index: 1 Image: 86 Index: 2 Image: 87 Index: 3 Image: 89 Index: 4 Image: 88 End_Chunk Chunk: Colours Number: 6 0x00 0x01 0x01 0x76 0x01 0x34 End_Chunk ; ;-------Object 63------------------------------------------------------- ; Chunk: Standard Name: "fishtank[63]" Number: 63 Size: 0 3000 1000 Position: 0 1100 0 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: 3 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: 3 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 End_Chunk Chunk: InitPos Position: 0 1100 0 End_Chunk Chunk: SCL resume (1, 1); ++timgref (me, 1); if (timgref (me, 1)>=4) { invis (me); waitfs (20); vis (me); timgref (me, 1)=itimgref (me, 1); } waitfs (3); end End_Chunk Chunk: ImageRef Number: 3 Index: 1 Image: 57 Index: 2 Image: 58 Index: 3 Image: 59 End_Chunk Chunk: Colours Number: 6 0x00 0x01 0x01 0x76 0x01 0x34 End_Chunk End_Children ; ;-------Object 1------------------------------------------------------- ; Chunk: Standard Name: "table[1]" Number: 1 Size: 37000 14000 14000 Position: 20000 0 74000 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 24------------------------------------------------------- ; Chunk: Standard Name: "table[24]" Number: 24 Size: 37000 9000 3000 Position: 0 5000 11000 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: 5 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 0x00 0x76 0x00 0x00 0x75 0x75 End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 20 Index: 2 Image: 24 End_Chunk ; ;-------Object 26------------------------------------------------------- ; Chunk: Standard Name: "table[26]" Number: 26 Size: 3000 3300 11000 Position: 34000 5000 0 Type: 0 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: 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: 5 ImageRef: 3 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 0x00 0x00 0x75 0x75 End_Chunk Chunk: ImageRef Number: 3 Index: 1 Image: 23 Index: 2 Image: 28 Index: 3 Image: 26 End_Chunk ; ;-------Object 23------------------------------------------------------- ; Chunk: Standard Name: "table[23]" Number: 23 Size: 37000 5000 14000 Position: 0 0 0 Type: 3 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: 21 End_Chunk ; ;-------Object 2------------------------------------------------------- ; Chunk: Standard Name: "table[2]" Number: 2 Size: 31000 0 11000 Position: 3000 5000 0 Type: 5 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: 25 End_Chunk ; ;-------Object 25------------------------------------------------------- ; Chunk: Standard Name: "table[25]" Number: 25 Size: 3000 3300 11000 Position: 0 5000 0 Type: 0 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: 3 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: 3 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 0x00 0x76 0x77 0x00 0x75 0x75 End_Chunk Chunk: ImageRef Number: 3 Index: 1 Image: 22 Index: 2 Image: 28 Index: 3 Image: 26 End_Chunk ; ;-------Object 8------------------------------------------------------- ; Chunk: Standard Name: "table[8]" Number: 8 Size: 0 14000 14000 Position: 0 0 0 Type: 2 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: 1 0x21 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 27 End_Chunk ; ;-------Object 10------------------------------------------------------- ; Chunk: Standard Name: "table[10]" Number: 10 Size: 0 14000 14000 Position: 37000 0 0 Type: 1 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: 1 0x21 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 27 End_Chunk ; ;-------Object 11------------------------------------------------------- ; Chunk: Standard Name: "table[11]" Number: 11 Size: 37000 14000 0 Position: 0 0 14000 Type: 4 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: 1 0x21 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 21 End_Chunk End_Children ; ;-------Object 61------------------------------------------------------- ; Chunk: Standard Name: "fishtank[61]" Number: 61 Size: 100 5000 4000 Position: 11800 20000 93930 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 2 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: 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: SCL resume (1, 1); ++timgref (me, 1); if (timgref (me, 1)>=3) timgref (me, 1)=itimgref (me, 1); waitfs (3); end End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 56 Index: 2 Image: 61 End_Chunk Chunk: Colours Number: 6 0x00 0x02 0x00 0x02 0x02 0x75 End_Chunk ; ;-------Object 62------------------------------------------------------- ; Chunk: Standard Name: "fishtank[62]" Number: 62 Size: 0 3600 4000 Position: 14400 20000 100430 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 2 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: 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: SCL resume (1, 1); ++timgref (me, 1); if (timgref (me, 1)>=3) timgref (me, 1)=itimgref (me, 1); waitfs (2); end End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 56 Index: 2 Image: 61 End_Chunk Chunk: Colours Number: 6 0x00 0x02 0x00 0x02 0x02 0x75 End_Chunk ; ;-------Object 39------------------------------------------------------- ; Chunk: Standard Name: "wall[39]" Number: 39 Size: 3000 3000 1500 Position: 115159 23055 0 Type: 10 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: 1500 1500 1500 End_Chunk Chunk: SCL yrot (me)=359-yvroff+yrot (object (vattach)); xrot (me)=359-xvroff; if (activate (me, 0)) { /* Menulock stuff*/ menuLock (1); share (99)=4; loadvrt ("garden.vrt"); clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 13 End_Chunk Chunk: Colours Number: 2 0x77 0x76 End_Chunk ; ;-------Object 40------------------------------------------------------- ; Chunk: Standard Name: "wall[40]" Number: 40 Size: 3000 3000 1500 Position: 123159 23055 128500 Type: 10 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: 0xFFFFFADD 0xFFFFB574 0x0000 Centre: 1500 1500 0 End_Chunk Chunk: SCL yrot (me)=359-yvroff+yrot (object (vattach)); xrot (me)=359-xvroff; if (activate (me, 0)) { /* Menulock stuff*/ menuLock (1); loadvrt ("kitchen.vrt"); clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 13 End_Chunk Chunk: Colours Number: 2 0x77 0x76 End_Chunk ; ;-------Object 41------------------------------------------------------- ; Chunk: Standard Name: "wall[41]" Number: 41 Size: 3000 3000 1500 Position: 26000 58055 128500 Type: 10 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: 0xFFFFFADD 0xFFFFB574 0x0000 Centre: 1500 1500 0 End_Chunk Chunk: SCL yrot (me)=359-yvroff+yrot (object (vattach)); xrot (me)=359-xvroff; if (activate (me, 0)) { /* Menulock stuff*/ menuLock (1); loadvrt ("bathroom.vrt"); clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 13 End_Chunk Chunk: Colours Number: 2 0x77 0x76 End_Chunk ; ;-------Object 42------------------------------------------------------- ; Chunk: Standard Name: "wall[42]" Number: 42 Size: 3000 3000 1500 Position: 18000 59055 110000 Type: 10 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: 1500 1500 1500 End_Chunk Chunk: SCL long STATS[8], ILL; resume (0, 2); yrot (me)=359-yvroff+yrot (object (vattach)); xrot (me)=359-xvroff; if (activate (me, 0)) { if (regGetN ("ill", &ILL)) ILL=0; if (timSince>1440 || ILL) { statsGet (&STATS); if (STATS[1]<200 || ILL) { /*Menulock stuff*/ menuLock (1); loadvrt ("bedroom.vrt"); } else counter (25)=25; } else counter (25)=75; while (mouseb) waitf; clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 13 End_Chunk Chunk: Colours Number: 2 0x77 0x76 End_Chunk ; ;-------Object 43------------------------------------------------------- ; Chunk: Standard Name: "picture[43]" Number: 43 Size: 2999 3300 2499 Position: 34016 7000 8397 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 55------------------------------------------------------- ; Chunk: Standard Name: "desk[55]" Number: 55 Size: 3999 4000 2499 Position: -500 -700 0 Type: 11 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: 4 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 68------------------------------------------------------- ; Chunk: Standard Name: "table[68]" Number: 68 Size: 1100 12000 21000 Position: 138900 28100 59848 Type: 12 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: ImageRef Number: 2 Index: 1 Image: 30 Index: 2 Image: 82 End_Chunk Chunk: SCL long width, height; resume (1, 2); if (activate (me, 0)) { dlgPhoto; clrtrig (me, 0); } if (random (20000)==1) { getSmut (71); while (share (71)==-1) waitf; if (share (71)==1 && vis? (#140)) { #142.Follow=#165; #142.Go=1; waitfs (30); #142.Follow=#151; #142.Go=1; waitfs (30); #142.Follow=#149; #142.Go=1; waitfs (30); imageLd ("c:\\lovebytes\\trawl.bmp", 82, 0, &width, &height); timgref (me, 1)=2; counter (26)=136; counter (20)=189; } share (71)=0; } end End_Chunk Chunk: Colours Number: 10 0x3F 0xFA 0x3F 0x3F 0x3F 0x3F 0x26 0xFA 0x3F 0x3F End_Chunk ; ;-------Object 69------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA: HOLD " Number: 69 Size: 1597 9305 9305 Position: 92262 31000 124552 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: Rotations Initial: 0x0000 0x4000 0x0000 Centre: 797 4651 4651 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 70------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Rim " Number: 70 Size: 1597 9305 9305 Position: 0 0 0 Type: 13 Layer: 0 End_Chunk Children: ; ;-------Object 71------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face hold " Number: 71 Size: 549 6397 6397 Position: 0 1449 1449 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 72------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Hour hand " Number: 72 Size: 0 2397 637 Position: 537 3049 2877 Type: 14 Layer: 0 End_Chunk Chunk: Colours Number: 3 0x30 0x01 0x37 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 145 317 End_Chunk ; ;-------Object 73------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Minute hand " Number: 73 Size: 0 3197 797 Position: 541 2997 2797 Type: 15 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x9E 0x01 0x01 0xA7 0x05 0x01 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 197 397 End_Chunk ; ;-------Object 74------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Second hand " Number: 74 Size: 0 3197 29 Position: 545 2997 3181 Type: 16 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x01 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 197 13 End_Chunk ; ;-------Object 75------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face hold (0,1) " Number: 75 Size: 0 6397 6397 Position: 533 0 0 Type: 65535 Layer: 0 End_Chunk Chunk: SoundRef Number: 1 Index: 1 Sound: 1 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 */ xrot (#74)=360-s*6.0000; xrot (#73)=360-m*6.0000-s/10.0000; xrot (#72)=360-h*30.0000-m/2.0000; /* */ end End_Chunk Children: ; ;-------Object 76------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face " Number: 76 Size: 0 6397 6397 Position: 0 0 0 Type: 17 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: 9979 Invisible: 10603 Replace: 77 End_Chunk ; ;-------Object 77------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face Rep1 " Number: 77 Size: 0 6397 6397 Position: 0 0 0 Type: 18 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 78------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Rim Rep1 " Number: 78 Size: 1597 9305 9305 Position: 0 0 0 Type: 19 Layer: 0 DFlags: R OFlags: Ii End_Chunk Children: ; ;-------Object 79------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face hold Rep1 " Number: 79 Size: 549 6397 6397 Position: 0 1449 1449 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 80------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Hour hand Rep1 " Number: 80 Size: 0 2397 637 Position: 537 3049 2877 Type: 14 Layer: 0 End_Chunk Chunk: Colours Number: 4 0x30 0x01 0x37 0x30 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 145 317 End_Chunk ; ;-------Object 81------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Minute hand Rep1 " Number: 81 Size: 0 3197 797 Position: 541 2997 2797 Type: 15 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 197 397 End_Chunk ; ;-------Object 82------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Second hand Rep1 " Number: 82 Size: 0 3197 29 Position: 545 2997 3181 Type: 16 Layer: 0 End_Chunk Chunk: Colours Number: 2 0x01 0x00 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 0 197 13 End_Chunk ; ;-------Object 83------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face hold (2,3) " Number: 83 Size: 0 6397 6397 Position: 533 0 0 Type: 65535 Layer: 0 End_Chunk Chunk: SCL short h, m, s; time (&h, &m, &s); xrot (#82)=360-s*6.0000; xrot (#81)=360- (m*6.0000+s/10.0000); xrot (#80)=360- (h*30.0000+m/2.0000); /* */ end End_Chunk Children: ; ;-------Object 84------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face Rep2 " Number: 84 Size: 0 6397 6397 Position: 0 0 0 Type: 20 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: 55895 Invisible: 59386 Replace: 85 End_Chunk ; ;-------Object 85------------------------------------------------------- ; Chunk: Standard Name: "CLOCKA:Face Rep3 " Number: 85 Size: 0 6397 6397 Position: 0 0 0 Type: 21 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 58------------------------------------------------------- ; Chunk: Standard Name: "mates-move" Number: 58 Size: 18000 25000 18000 Position: 107900 10100 6006 Type: 65535 Layer: 0 DFlags: r OFlags: Ii End_Chunk Chunk: SCL short Mates=1; resume (1, 5); if (first) { ranseed (vrtime); kill (#86); } if (random (20000)==1) { unkill (#86); vis (me); repeat (2) { repeat (17) { repeat (5) { zpos (me)+=1000; waitf; } } repeat (17) { repeat (5) { xpos (me)-=1000; waitf; } } repeat (17) { repeat (5) { xpos (me)+=1000; waitf; } } repeat (17) { repeat (5) { zpos (me)-=1000; waitf; } } #86.Track=2; } invis (me); counter (30)=1; kill (me); } end End_Chunk Chunk: InitPos Position: 107900 10100 6006 End_Chunk Children: ; ;-------Object 37------------------------------------------------------- ; Chunk: Standard Name: "mates" Number: 37 Size: 24000 25000 0 Position: -3000 0 9000 Type: 22 Layer: 0 DFlags: r 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: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 12000 12500 0 End_Chunk Chunk: SCL yrot (me)=359-yvroff+yrot (object (vattach)); end End_Chunk Chunk: SoundRef Number: 1 Index: 1 Sound: 2 End_Chunk Chunk: Colours Number: 1 0x20 End_Chunk Chunk: ImageRef Number: 6 Index: 1 Image: 69 Index: 2 Image: 70 Index: 3 Image: 71 Index: 4 Image: 72 Index: 5 Image: 67 Index: 6 Image: 68 End_Chunk ; ;-------Object 86------------------------------------------------------- ; Chunk: Standard Name: "sound" Number: 86 Size: 1000 1000 1000 Position: 0 0 -3000 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: SCL long Time, Length=10230, Track=1; resume (1, 2); if (first) waitf; if (Track==1) { sound (Track, 64, 127, 0); sound (Track, 64, 127, 0); sound (Track, 64, 127, 0); Time=vrtime; while (vrtime-Time<Length) { timgref (#37, 1)=random (4)+1; waitfs (5); } } else { timgref (#37, 1)=5; sound (Track, 64, 127, 0); sound (Track, 64, 127, 0); sound (Track, 64, 127, 0); Time=vrtime; while (vrtime-Time<1800) waitf; timgref (#37, 1)=6; while (vrtime-Time<4100) waitf; timgref (#37, 1)=5; while (vrtime-Time<6320) waitf; timgref (#37, 1)=6; while (vrtime-Time<8240) waitf; } end End_Chunk Chunk: SoundRef Number: 2 Index: 1 Sound: 3 Index: 2 Sound: 8 End_Chunk Children: ; ;-------Object 127------------------------------------------------------- ; Chunk: Standard Name: "rubbish create" Number: 127 Size: 1000 1000 1000 Position: 0 0 0 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: SCL long C; ++C; if (C==4) vis (#111); if (C==32) vis (#90); if (C==78) vis (#91); if (C==106) vis (#113); if (C==146) vis (#112); if (C==175) vis (#110); if (C==180) vis (#114); if (C==213) vis (#89); if (C==118) vis (#109); if (C==251) vis (#105); if (C==285) vis (#92); if (C==306) vis (#88); end End_Chunk End_Children End_Children ; ;-------Object 90------------------------------------------------------- ; Chunk: Standard Name: " rubbish[90]" Number: 90 Size: 5000 1 5000 Position: 115900 10100 44848 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish9", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish9", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish9", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 75 End_Chunk ; ;-------Object 19------------------------------------------------------- ; Chunk: Standard Name: "stairs[19]" Number: 19 Size: 50000 32000 20000 Position: 35000 10000 110000 Type: 8 Layer: 0 DFlags: E End_Chunk Chunk: ImageRef Number: 2 Index: 1 Image: 10 Index: 2 Image: 35 End_Chunk Chunk: TexCoords Number: 20 Mode: 0 SubChunk Facet: 11 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 12 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 13 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00062 SubChunk Facet: 14 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 15 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00125 SubChunk Facet: 16 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 17 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 18 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00063 SubChunk Facet: 19 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 20 ImageRef: 1 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00125 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 SubChunk Facet: 3 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 0.99939 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: 5 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 0.99882 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 SubChunk Facet: 7 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 8 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 0.99939 0.00000 SubChunk Facet: 9 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 1.00000 0.00000 SubChunk Facet: 10 ImageRef: 2 PixScale: 0 NumCoords: 4 0.00000 0.00000 0.00000 1.00000 1.00000 1.00000 0.99882 0.00000 End_Chunk ; ;-------Object 128------------------------------------------------------- ; Chunk: Standard Name: "stairs[128]" Number: 128 Size: 0 6000 20000 Position: 85000 10000 110000 Type: 65535 Layer: 0 End_Chunk ; ;-------Object 94------------------------------------------------------- ; Chunk: Standard Name: " stair logic" Number: 94 Size: 40000 70000 20000 Position: 35000 10000 110000 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL if (vinside (me)) ypos (#5)=50000- (xpos (#5)-2064000)+13000; end End_Chunk ; ;-------Object 92------------------------------------------------------- ; Chunk: Standard Name: " rubbish[92]" Number: 92 Size: 5000 1 5000 Position: 123900 10100 68848 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish8", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish8", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish8", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 73 End_Chunk ; ;-------Object 14------------------------------------------------------- ; Chunk: Standard Name: "floor[14]" Number: 14 Size: 40000 10000 90000 Position: 100000 0 0 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 2 Mode: 0 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: 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: 3 Index: 1 Image: 2 Index: 2 Image: 31 Index: 3 Image: 65535 End_Chunk Chunk: Colours Number: 6 0x77 0x00 0x00 0x00 0x75 0x00 End_Chunk ; ;-------Object 91------------------------------------------------------- ; Chunk: Standard Name: " rubbish[91]" Number: 91 Size: 5000 1 5000 Position: 113900 10100 83848 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish7", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish7", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish7", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 74 End_Chunk ; ;-------Object 105------------------------------------------------------- ; Chunk: Standard Name: " rubbish[105]" Number: 105 Size: 5000 1 5000 Position: 107289 10100 100076 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish11", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish11", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish11", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 77 End_Chunk ; ;-------Object 109------------------------------------------------------- ; Chunk: Standard Name: " rubbish[109]" Number: 109 Size: 5000 1 5000 Position: 80541 10100 92300 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish5", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish5", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish5", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 76 End_Chunk ; ;-------Object 110------------------------------------------------------- ; Chunk: Standard Name: " rubbish[110]" Number: 110 Size: 5000 1 5000 Position: 25805 10100 101320 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish1", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish1", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish1", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 75 End_Chunk ; ;-------Object 112------------------------------------------------------- ; Chunk: Standard Name: " rubbish[112]" Number: 112 Size: 5000 1 5000 Position: 49441 10100 94476 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish3", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish3", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish3", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 73 End_Chunk ; ;-------Object 113------------------------------------------------------- ; Chunk: Standard Name: " rubbish[113]" Number: 113 Size: 5000 1 5000 Position: 92045 10100 100696 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish6", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish6", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish6", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 73 End_Chunk ; ;-------Object 114------------------------------------------------------- ; Chunk: Standard Name: " rubbish[114]" Number: 114 Size: 5000 1 5000 Position: 35137 10100 94476 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish2", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish2", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish2", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 77 End_Chunk ; ;-------Object 88------------------------------------------------------- ; Chunk: Standard Name: " rubbish[88]" Number: 88 Size: 5000 1 5000 Position: 119004 10100 31176 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish10", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish10", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish10", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 77 End_Chunk ; ;-------Object 111------------------------------------------------------- ; Chunk: Standard Name: " rubbish[111]" Number: 111 Size: 5000 1 5000 Position: 107608 10100 8498 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish12", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish12", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish12", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 77 End_Chunk ; ;-------Object 89------------------------------------------------------- ; Chunk: Standard Name: " rubbish[89]" Number: 89 Size: 5000 1 5000 Position: 68900 10100 99940 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish4", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish4", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish4", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 76 End_Chunk ; ;-------Object 87------------------------------------------------------- ; Chunk: Standard Name: "mower[87]" Number: 87 Size: 9599 16328 9889 Position: 126401 10000 35106 Type: 65535 Layer: 0 DFlags: E OFlags: Ii End_Chunk Chunk: SCL if (share (1)==30) vis (me); else { invis (me); if (getvp==3) setvp (1); } end End_Chunk Chunk: Dynamics MovType: 0x80000421 Fuel: 0 Climb: 4000 Gravity: 1000 Coupled: 96 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 Chunk: InitPos Position: 126401 10000 35106 End_Chunk Children: ; ;-------Object 96------------------------------------------------------- ; Chunk: Standard Name: "mower[96]" Number: 96 Size: 9599 16328 9889 Position: 0 0 0 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 4799 8163 4943 End_Chunk Children: ; ;-------Object 97------------------------------------------------------- ; Chunk: Standard Name: "mower" Number: 97 Size: 9599 1439 4799 Position: 0 0 5089 Type: 23 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: 9 0x20 0x14 0x15 0x14 0x12 0x13 0x12 0x13 0x12 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 84 End_Chunk Chunk: SCL resume (1, 2); if (activate (me, 0)) { while (mouseb) waitf; if (getvp==3) setvp (1); else setvp (3); clrtrig (me, 0); } end End_Chunk ; ;-------Object 103------------------------------------------------------- ; Chunk: Standard Name: "mower[103]" Number: 103 Size: 4799 15239 2159 Position: 2399 1439 3889 Type: 65535 Layer: 0 End_Chunk Chunk: SCL resume (1, 2); if (activate (me, 0)) { while (mouseb) waitf; if (getvp==3) setvp (1); else setvp (3); clrtrig (me, 0); } end End_Chunk Chunk: Rotations Initial: 0x1555 0x0000 0x0000 Centre: 0 -839 2159 End_Chunk Children: ; ;-------Object 95------------------------------------------------------- ; Chunk: Standard Name: "mower[95]" Number: 95 Size: 0 15239 1799 Position: 2399 0 719 Type: 24 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 0.99994 0.00028 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 80 End_Chunk Chunk: SCL resume (1, 2); if (activate (me, 0)) { while (mouseb) waitf; if (getvp==3) setvp (1); else setvp (3); clrtrig (me, 0); } end End_Chunk ; ;-------Object 102------------------------------------------------------- ; Chunk: Standard Name: "mower[102]" Number: 102 Size: 4799 8679 0 Position: 0 839 719 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 2 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: 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: 83 End_Chunk Chunk: SCL resume (1, 2); if (activate (me, 0)) { while (mouseb) waitf; if (getvp==3) setvp (1); else setvp (3); clrtrig (me, 0); } end End_Chunk End_Children ; ;-------Object 98------------------------------------------------------- ; Chunk: Standard Name: "mower-centre" Number: 98 Size: 2999 1199 2279 Position: 3479 1439 6529 Type: 0 Layer: 0 End_Chunk Chunk: TexCoords Number: 1 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 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 81 End_Chunk Chunk: SCL resume (1, 2); if (activate (me, 0)) { while (mouseb) waitf; if (getvp==3) setvp (1); else setvp (3); clrtrig (me, 0); } end End_Chunk Chunk: Colours Number: 6 0x38 0x3B 0x38 0x3B 0x75 0x75 End_Chunk End_Children End_Children ; ;-------Object 129------------------------------------------------------- ; Chunk: Standard Name: " rat" Number: 129 Size: 6000 6000 0 Position: 129758 10000 114928 Type: 22 Layer: 0 DFlags: r OFlags: Ii 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: 12 End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 3000 0 0 End_Chunk Chunk: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rat", &Temp); if (Temp) vis (me); } if (random (10000-timSince/144)==1 && !vis? (me)) { xrot (me)=0; regPutN ("rat", 1); counter (30)=1; } if (activate (me, 0) && share (1)==29) { counter (30)=1; useObj (share (1)); regPutN ("rat", 0); sound (1, 64, 127, 0); repeat (10) { xrot (me)-=9; waitf; } invis (me); clrtrig (me, 0); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { regPutN ("rat", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 85 End_Chunk ; ;-------Object 133------------------------------------------------------- ; Chunk: Standard Name: "dead tony" Number: 133 Size: 18000 0 30000 Position: 112000 10000 15000 Type: 5 Layer: 0 OFlags: Ii 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: 97 End_Chunk ; ;-------Object 138------------------------------------------------------- ; Chunk: Standard Name: "floor[138]" Number: 138 Size: 11000 24000 0 Position: 106000 10000 15000 Type: 22 Layer: 0 DFlags: r OFlags: Ii 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: 6 Index: 1 Sound: 17 Index: 2 Sound: 13 Index: 3 Sound: 15 Index: 4 Sound: 14 Index: 5 Sound: 18 Index: 6 Sound: 21 End_Chunk Chunk: SCL short HIT; long TEMP; resume (1, 2); if (first) ranseed (vrtime); if (first) { regGetN ("tony", &TEMP); if (TEMP) vis (me); } if (random (50000-timSince/144)==1 && !vis? (me)) { counter (30)=1; timgref (me, 1)=1; sound (1, 64, 127, 0); sound (1, 64, 127, 0); sound (1, 64, 127, 0); regPutN ("tony", 1); vis (me); } yrot (me)=359-yvroff+yrot (object (vattach)); if (activate (me, 0)) { if (share (1)==33 || share (1)==34) { /* hit & whip */ timgref (me, 1)=2; sound (6, 64, 127, 0); sound (6, 64, 127, 0); sound (6, 64, 127, 0); ++HIT; repeat (15) { yrot (me)=359-yvroff+yrot (object (vattach)); waitf; } if (HIT>2) { sound (3, 64, 127, 0); sound (3, 64, 127, 0); sound (3, 64, 127, 0); repeat (50) { yrot (me)=359-yvroff+yrot (object (vattach)); waitf; } regPutN ("tony", 0); invis (me); } else { sound (2, 64, 127, 0); sound (2, 64, 127, 0); sound (2, 64, 127, 0); } timgref (me, 1)=1; } else { if (share (1)==29 || share (1)==27) { /* poison */ regPutN ("tony", 0); useObj (share (1)); timgref (me, 1)=3; sound (5, 64, 127, 0); sound (5, 64, 127, 0); sound (5, 64, 127, 0); repeat (30) { yrot (me)=359-yvroff+yrot (object (vattach)); waitf; } invis (me); vis (#133); kill (me); } else { if (share (1)==-1) { sound (4, 64, 127, 0); sound (4, 64, 127, 0); sound (4, 64, 127, 0); } } } clrtrig (me, 0); counter (30)=1; } end End_Chunk Chunk: Rotations Initial: 0x0000 0xFFFF8000 0x0000 Centre: 9500 11000 0 End_Chunk Chunk: ImageRef Number: 3 Index: 1 Image: 95 Index: 2 Image: 94 Index: 3 Image: 96 End_Chunk ; ;-------Object 148------------------------------------------------------- ; Chunk: Standard Name: "11" Number: 148 Size: 1000 1000 1000 Position: 121170 10000 9368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#162, #150}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 150------------------------------------------------------- ; Chunk: Standard Name: "17" Number: 150 Size: 1000 1000 1000 Position: 105170 10000 28368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#148, #154}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 151------------------------------------------------------- ; Chunk: Standard Name: "13" Number: 151 Size: 1000 1000 1000 Position: 92170 10000 81368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#154, #162}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 152------------------------------------------------------- ; Chunk: Standard Name: "8" Number: 152 Size: 1000 1000 1000 Position: 113170 10000 98368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#148, #156}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 153------------------------------------------------------- ; Chunk: Standard Name: "10" Number: 153 Size: 1000 1000 1000 Position: 130170 10000 120368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; long STATS[8]; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { if (vis? (#129)) { counter (20)=138; counter (25)=73; STATS[0]=-10; STATS[0]=-100; STATS[0]=-100; STATS[0]=0; STATS[0]=0; STATS[0]=0; STATS[0]=0; STATS[0]=0; statsExp (&STATS); } #142.Go=0; waitfs (2); theObj=table (random (2)) {#155, #149}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 154------------------------------------------------------- ; Chunk: Standard Name: "19" Number: 154 Size: 1000 1000 1000 Position: 92170 10000 120368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#152, #150}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 156------------------------------------------------------- ; Chunk: Standard Name: "12" Number: 156 Size: 1000 1000 1000 Position: 26000 10000 98368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#157, #151}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 157------------------------------------------------------- ; Chunk: Standard Name: "18" Number: 157 Size: 1000 1000 1000 Position: 76000 10000 98368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#158, #151}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 158------------------------------------------------------- ; Chunk: Standard Name: "6" Number: 158 Size: 1000 1000 1000 Position: 70000 0 54368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#162, #153}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 160------------------------------------------------------- ; Chunk: Standard Name: "7" Number: 160 Size: 1000 1000 1000 Position: 18000 0 64368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#164, #161}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 161------------------------------------------------------- ; Chunk: Standard Name: "4" Number: 161 Size: 1000 1000 1000 Position: 18000 0 28368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#160, #162}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 162------------------------------------------------------- ; Chunk: Standard Name: "2" Number: 162 Size: 1000 1000 1000 Position: 55000 0 8368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#161, #164}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 163------------------------------------------------------- ; Chunk: Standard Name: "1" Number: 163 Size: 1000 1000 1000 Position: 88526 0 8368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#162, #165}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 164------------------------------------------------------- ; Chunk: Standard Name: "5" Number: 164 Size: 1000 1000 1000 Position: 88526 0 48648 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#152, #159}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 165------------------------------------------------------- ; Chunk: Standard Name: "3" Number: 165 Size: 1000 1000 1000 Position: 71526 0 30648 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#158, #163}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 159------------------------------------------------------- ; Chunk: Standard Name: "9" Number: 159 Size: 1000 1000 1000 Position: 39000 0 66368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#151, #163}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 140------------------------------------------------------- ; Chunk: Standard Name: "WOMAN_HOLD" Number: 140 Size: 5470 26000 5640 Position: 89526 0 4818 Type: 65535 Layer: 0 OFlags: Ii End_Chunk Chunk: InitPos Position: 89526 0 4818 End_Chunk Chunk: Dynamics MovType: 0x80000081 Fuel: 0 Climb: 5000 Gravity: 120 Coupled: 142 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 141------------------------------------------------------- ; Chunk: Standard Name: "woman" Number: 141 Size: 0 23900 9600 Position: 2621 0 -519 Type: 25 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: 98 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 short ROT, IMG, TEMP, NUM; fixed Y; short ROTS, ONCE=1; resume (2, 2); yrot (me)=89-yvroff+yrot (object (vattach)); if (ROT) { ROTS=ROT-44; NUM=table (ROTS) {18, 18, 18, 18, 18, 20, 15, 19, 18, 12, 20, 18, 13, 23, 21, 17, 11, 16}; Y=angle (me, #5); IMG= ( (-Y+181)/ (360/NUM)+NUM/2-1)%NUM+1; if (ONCE) { repeat (NUM) { counter (20)=inloop; waitf; } ONCE=0; } if (IMG!=TEMP) { counter (20)=IMG; TEMP=IMG; } } end End_Chunk ; ;-------Object 142------------------------------------------------------- ; Chunk: Standard Name: "direction" Number: 142 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=#163; 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 155------------------------------------------------------- ; Chunk: Standard Name: "14" Number: 155 Size: 1000 1000 1000 Position: 112000 10000 121000 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#154}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 166------------------------------------------------------- ; Chunk: Standard Name: "table[166]" Number: 166 Size: 9200 0 11100 Position: 41507 4000 39769 Type: 5 Layer: 0 DFlags: r 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 0.99999 0.00000 End_Chunk Chunk: SCL long Temp, X, Z, X2, Z2; if (activate (me, 0)) MegaStar; if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) invis (me); } end End_Chunk Chunk: Rotations Initial: 0x0000 0x6AAA 0x0000 Centre: 4600 0 5550 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 99 End_Chunk ; ;-------Object 171------------------------------------------------------- ; Chunk: Standard Name: "note2" Number: 171 Size: 4000 100 2000 Position: 12000 0 0 Type: 5 Layer: 0 OFlags: Ii 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: SCL if (first) { ranseed (vrtime); if (random (40)==1) vis (me); } if (activate (me, 0)) { invis (me); addMoney (random (5)*10); clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 101 End_Chunk Chunk: Colours Number: 1 0xB7 End_Chunk ; ;-------Object 172------------------------------------------------------- ; Chunk: Standard Name: "note1" Number: 172 Size: 4000 0 2000 Position: 33000 4000 39806 Type: 5 Layer: 0 OFlags: Ii 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: SCL if (first) { ranseed (vrtime); if (random (100)==1) vis (me); } if (activate (me, 0)) { invis (me); addMoney (random (5)*10); clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 101 End_Chunk Chunk: Colours Number: 1 0xB7 End_Chunk ; ;-------Object 173------------------------------------------------------- ; Chunk: Standard Name: "note4" Number: 173 Size: 4000 100 2000 Position: 135000 38100 24106 Type: 5 Layer: 0 OFlags: Ii 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: SCL if (first) { ranseed (vrtime); if (random (100)==1) vis (me); } if (activate (me, 0)) { invis (me); addMoney (random (5)*10); clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 101 End_Chunk Chunk: Colours Number: 1 0xB7 End_Chunk ; ;-------Object 174------------------------------------------------------- ; Chunk: Standard Name: "note3" Number: 174 Size: 4000 100 2000 Position: 82800 40000 0 Type: 5 Layer: 0 OFlags: Ii 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: SCL if (first) { ranseed (vrtime); if (random (100)==1) vis (me); } if (activate (me, 0)) { invis (me); addMoney (random (5)*10); clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 101 End_Chunk Chunk: Colours Number: 1 0xB7 End_Chunk ; ;-------Object 175------------------------------------------------------- ; Chunk: Standard Name: "note4[175]" Number: 175 Size: 4000 100 2000 Position: 22000 0 88000 Type: 5 Layer: 0 OFlags: Ii 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: SCL if (first) { ranseed (vrtime); if (random (100)==1) vis (me); } if (activate (me, 0)) { invis (me); addMoney (random (5)*10); clrtrig (me, 0); } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 101 End_Chunk Chunk: Colours Number: 1 0xB7 End_Chunk ; ;-------Object 149------------------------------------------------------- ; Chunk: Standard Name: "15" Number: 149 Size: 1000 1000 1000 Position: 129170 10000 78368 Type: 65535 Layer: 0 DFlags: E End_Chunk Chunk: SCL long nearMe; objnum Choose; short theObj; resume (2, 0); if (#142.Follow==me) { nearMe=mdist (me, #140); if (nearMe<14000) { #142.Go=0; waitfs (#142.Delay); theObj=table (random (2)) {#159, #153}; Choose=object (theObj); #142.Follow=Choose; #142.Go=1; } } end End_Chunk ; ;-------Object 56------------------------------------------------------- ; Chunk: Standard Name: "picture" Number: 56 Size: 2999 3300 2499 Position: 34615 4000 40223 Type: 65535 Layer: 0 End_Chunk Children: ; ;-------Object 67------------------------------------------------------- ; Chunk: Standard Name: "desk[67]" Number: 67 Size: 2999 4000 2499 Position: 0 -700 0 Type: 11 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.99939 0.00000 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 0x2000 0x0000 Centre: 1499 2000 1249 End_Chunk End_Children ; ;-------Object 59------------------------------------------------------- ; Chunk: Standard Name: "table hold" Number: 59 Size: 12200 22000 12100 Position: 81800 0 24648 Type: 65535 Layer: 0 End_Chunk Chunk: SCL yrot (me)=279-yvroff+yrot (object (vattach)); end End_Chunk Chunk: Rotations Initial: 0x0000 0x0000 0x0000 Centre: 6100 11000 6050 End_Chunk Children: ; ;-------Object 176------------------------------------------------------- ; Chunk: Standard Name: "alix-drink" Number: 176 Size: 0 20000 9100 Position: 0 0 2000 Type: 2 Layer: 0 OFlags: Ii 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: 60 End_Chunk ; ;-------Object 177------------------------------------------------------- ; Chunk: Standard Name: "alix1" Number: 177 Size: 0 17000 8100 Position: 0 1000 3000 Type: 2 Layer: 0 OFlags: Ii 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: SCL short HIT; if (activate (me, 0)) { if (share (1)==33 || share (1)==34) { /* hit & whip */ if (share (1)==33) counter (25)=33; else counter (25)=185; ++HIT; if (HIT>2) { regPutN ("alex", 0); invis (me); invis (#176); #106.HERE=0; } } else { if (share (1)==29 || share (1)==27) { /* poison */ regPutN ("alex", 0); useObj (share (1)); invis (me); invis (#176); #106.HERE=0; } } clrtrig (me, 0); counter (30)=1; } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 78 End_Chunk ; ;-------Object 106------------------------------------------------------- ; Chunk: Standard Name: "table[106]" Number: 106 Size: 12200 90 12100 Position: 0 8910 0 Type: 5 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: SCL long TEMP, HERE; objnum O; resume (1, 2); if (first) { regGetN ("alex", &TEMP); if (TEMP) { vis (#177); HERE=1; } } if (random (50000)==1 && !HERE) { counter (30)=1; regPutN ("alex", 1); vis (#177); HERE=1; } if (HERE) { waitfs (50); waitfs (random (50)); invis (#177); vis (#176); waitfs (random (20)+20); vis (#177); invis (#176); O=object (table (random (8)) {#122, #124, #115, #121, #120, #126, #119, #117}); settrig (13, O); counter (30)=1; } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 46 End_Chunk ; ;-------Object 45------------------------------------------------------- ; Chunk: Standard Name: "table[45]" Number: 45 Size: 2000 1710 2000 Position: 4700 0 5158 Type: 0 Layer: 0 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: 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 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 0x77 0x76 0x77 0x76 0x75 0x00 End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 54 End_Chunk ; ;-------Object 51------------------------------------------------------- ; Chunk: Standard Name: "table[51]" Number: 51 Size: 2000 1710 2000 Position: 4700 7200 5158 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: 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 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 0x76 0x75 0x3F End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 54 End_Chunk ; ;-------Object 52------------------------------------------------------- ; Chunk: Standard Name: "table[52]" Number: 52 Size: 1200 5490 1200 Position: 5100 1710 5558 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: 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 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: 54 End_Chunk End_Children ; ;-------Object 126------------------------------------------------------- ; Chunk: Standard Name: " rubbish[126]" Number: 126 Size: 5000 1 5000 Position: 84101 0 16780 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish20", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish20", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish20", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 75 End_Chunk ; ;-------Object 115------------------------------------------------------- ; Chunk: Standard Name: " rubbish[115]" Number: 115 Size: 5000 1 5000 Position: 72621 0 13520 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish19", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish19", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish19", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 77 End_Chunk ; ;-------Object 117------------------------------------------------------- ; Chunk: Standard Name: " rubbish[117]" Number: 117 Size: 5000 1 5000 Position: 92853 100 39980 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish18", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish18", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish18", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 74 End_Chunk ; ;-------Object 121------------------------------------------------------- ; Chunk: Standard Name: " rubbish[121]" Number: 121 Size: 5000 1 5000 Position: 73029 100 39108 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish16", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish16", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish16", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 73 End_Chunk ; ;-------Object 124------------------------------------------------------- ; Chunk: Standard Name: " rubbish[124]" Number: 124 Size: 5000 1 5000 Position: 64065 100 25324 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish13", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish13", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish13", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 74 End_Chunk ; ;-------Object 120------------------------------------------------------- ; Chunk: Standard Name: " rubbish[120]" Number: 120 Size: 5000 1 5000 Position: 83745 100 42004 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish15", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish15", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish15", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 75 End_Chunk ; ;-------Object 119------------------------------------------------------- ; Chunk: Standard Name: " rubbish[119]" Number: 119 Size: 5000 1 5000 Position: 93253 100 17652 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish17", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish17", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish17", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 76 End_Chunk ; ;-------Object 122------------------------------------------------------- ; Chunk: Standard Name: " rubbish[122]" Number: 122 Size: 5000 1 5000 Position: 74681 100 26520 Type: 5 Layer: 0 DFlags: E OFlags: Ii 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: SCL long Temp, X, Z, X2, Z2; yrot (me)=359-yvroff+yrot (object (vattach)); resume (1, 2); if (first) { regGetN ("rubbish14", &Temp); if (Temp) vis (me); } if (activate (me, 13) && !vis? (me)) { vis (me); regPutN ("rubbish14", 1); } if (getvp==3) { apos (1500, 500, 1700, #96, &X, &null, &Z); apos (3200, 500, 0, me, &X2, &null, &Z2); if (abs (X-X2)+abs (Z-Z2)<10000) { counter (30)=1; regPutN ("rubbish14", 0); invis (me); } } end End_Chunk Chunk: ImageRef Number: 1 Index: 1 Image: 77 End_Chunk End_Children ; ;-------Object 130------------------------------------------------------- ; Chunk: Standard Name: "icons" Number: 130 Size: 10000 0 10000 Position: 2148910 0 1867162 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x76 0x17 0x75 End_Chunk Chunk: SCL short SELECTED=92; instr (1)=52; instr (2)=62; instr (3)=90; instr (4)=SELECTED; switch (marker (2)); case 1: instr (1)=55; case 2: instr (2)=63; case 3: instr (3)=91; 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 131------------------------------------------------------- ; Chunk: Standard Name: "items" Number: 131 Size: 10000 0 10000 Position: 2138910 0 1867162 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x76 0x0A 0x75 End_Chunk Chunk: SCL short TEMP=-1, imgNum=93, imgNum2=92, 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); if (objAttrP (share (1), "C") && share (5)>0) { regGetN ("CookedValue", &COOKEDV); if (COOKEDV==2) strcat (&PATH, "r"); if (COOKEDV>2) strcat (&PATH, "b"); } strcat (&PATH, ".bmp"); imageLd (&PATH, imgNum, 1, &WIDTH, &HEIGHT); #130.SELECTED=imgNum; } else #130.SELECTED=imgNum2; strcpy (&PATH, &DIR); } TEMP=share (1); end End_Chunk ; ;-------Object 143------------------------------------------------------- ; Chunk: Standard Name: "remarks" Number: 143 Size: 10000 0 10000 Position: 2128910 0 1867162 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x76 0x17 0x75 End_Chunk Chunk: SCL long STATS[8], PARAM[4]; short MOOD, RANDOM, TEMP, LOWEST, RND, EXISTS, COOK, CTIMER, MSLD, TCOOKED; long VALUE, TIMER, DAY, MONTH, CHOUR, CMONTH, CDAY, CMINS; char NAME[35], INLOOP[4]; objnum OBJECT; long ILL; resume (0, 2); /*CODE FOR AMBIENT REMARKS*/ if (first) { ranseed (vrtime); if (regGetN ("ill", &ILL)) ILL=0; if (random (2)==1 && !ILL) vis (#140); else kill (#140); } resume (0, 2); if (vis? (#140)) { RND=random (1200); EXISTS=0; VALUE=0; /*IF RUBBISH EXISTS*/ RND=random (600); if (RND==1) { /* LADS RUBBISH */ repeat (12) { OBJECT=object (table (inloop-1) {#111, #88, #90, #92, #91, #105, #113, #109, #89, #112, #114, #110}); if (vis? (OBJECT)) VALUE=1; if (VALUE) EXISTS=1; } if (EXISTS) { #142.Follow=object (table (random (3)) {#149, #152, #157}); #142.Go=1; counter (20)=table (random (6)) {181, 182, 183, 187, 5, 8}; counter (26)=table (random (4)) {96, 140, 141}; counter (51)=-3; counter (52)=-2; /* ALEX RUBBISH */ } } RND=random (600); if (RND==5) { repeat (8) { OBJECT=object (table (inloop-1) {#124, #122, #120, #121, #119, #117, #115, #126}); if (vis? (OBJECT)) VALUE=1; if (VALUE) EXISTS=1; } if (EXISTS) { #142.Follow=object (159); #142.Go=1; counter (20)=table (random (6)) {181, 182, 183, 187, 5, 8}; counter (26)=table (random (4)) {96, 141}; counter (51)=-3; counter (52)=-2; /*IF TONY EXISTS*/ } } RND=random (800); if (RND==10) { if (regGetN ("tony", &VALUE)) VALUE=0; if (VALUE) EXISTS=1; if (EXISTS) { 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}; #142.Follow=object (148); #142.Go=1; if (MOOD>1) { counter (20)=table (random (3)) {10, 138}; counter (26)=167; counter (51)=-2; counter (52)=-1; } else { counter (20)=110; counter (26)=186; counter (52)=-5; } /* IF ALEX EXISTS */ } } RND=random (500); if (RND==3) { if (regGetN ("alex", &VALUE)) VALUE=0; if (VALUE) EXISTS=1; if (EXISTS) { #142.Follow=object (165); #142.Go=1; counter (20)=table (random (3)) {187, 184, 189}; counter (26)=table (random (6)) {137, 138, 139}; /*FOR COOKING STATUS*/ } } RND=random (1500); if (RND==4 || first) { if (regGetN ("Cooking", &VALUE)) VALUE=0; if (VALUE) { /* CHECK HOW LONG ITEM HAS BEEN COOKING */ regGetN ("CookerTimer", &TIMER); regGetN ("CookDay", &DAY); regGetN ("CookMonth", &MONTH); regGetN ("Cooker", &VALUE); COOK=VALUE; paramGet (COOK, &PARAM); timeCurr (&CHOUR, &CMINS); dateCurr (&CMONTH, &CDAY); CTIMER=CHOUR*60; CTIMER=CTIMER+CMINS; if (CDAY>DAY+1 || CMONTH!=MONTH) { /* HOUSE HAS BURNT */ share (1)=-1; dumpHim (1); exitVis; } else { if (CDAY==DAY+1) { MSLD=1440-TIMER; TCOOKED=MSLD+CTIMER; } if (CDAY==DAY) TCOOKED=CTIMER-TIMER; if (TCOOKED<0) TCOOKED=-TCOOKED; if (TCOOKED>=PARAM[0] && TCOOKED<PARAM[0]+10) counter (26)=38; if (TCOOKED>=PARAM[0]+10 && TCOOKED<PARAM[0]+30) counter (26)=table (random (3)) {3, 106, 107}; if (TCOOKED>=PARAM[0]+30 && TCOOKED<PARAM[0]+60) counter (26)=table (random (4)) {39, 108, 109}; /*vis ('smoke');*/ if (TCOOKED>=PARAM[0]+60) { /*BURN HOUSE*/ share (1)=-1; dumpHim (1); exitVis; } } /*AMBIENT REMARKS*/ } } RANDOM=random (1500); if (RANDOM==100) { 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 (4)) {182, 121, 149, 183}; case 1: counter (26)=table (random (3)) {36, 71, 90}; case 2: counter (26)=table (random (3)) {1, 68, 179}; case 3: counter (26)=table (random (4)) {16, 68, 94, 120}; case 4: counter (26)=table (random (3)) {20, 53, 52}; } RANDOM=random (2000); if (RANDOM==100 && !ssCats) { counter (25)=34; counter (51)=-2; } if (#141.ROT) counter (20)=-1; } end End_Chunk ; ;-------Object 144------------------------------------------------------- ; Chunk: Standard Name: "updateAmbient" Number: 144 Size: 10000 0 10000 Position: 2118910 0 1867162 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x76 0x0A 0x75 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 145------------------------------------------------------- ; Chunk: Standard Name: "statsOverTime" Number: 145 Size: 10000 0 10000 Position: 2108910 0 1867162 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x76 0x17 0x75 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 146------------------------------------------------------- ; Chunk: Standard Name: "loadImage" Number: 146 Size: 10000 0 10000 Position: 2158910 0 1867162 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x76 0x0A 0x75 End_Chunk Chunk: SCL char NAME[10], PATH[256], DIR[256], DRIVE[3]; long WIDTH, HEIGHT, newPOS, oldWIDTH, STATS[8]; short Scale=22, imgNum=98, LOWEST, MOODS=1, TEMP, ROT; resume (2, 2); if (first) { cdDrive (&DRIVE); strcpy (&DIR, &DRIVE); strcat (&DIR, "\\LoveBytes\\"); counter (20)=-1; counter (25)=-1; counter (21)=0; } if (vis? (#140)) { if (counter (20)>-1) { strcpy (&PATH, &DIR); strcat (&PATH, "images\\"); ROT=#141.ROT; if (ROT>0) { ltoa (&NAME, ROT); strcat (&PATH, &NAME); strcat (&PATH, "\\"); } ltoa (&NAME, counter (20)); strcat (&PATH, &NAME); strcat (&PATH, ".gif"); imageLd (&PATH, imgNum, 1, &WIDTH, &HEIGHT); newPOS=zpos (#141); oldWIDTH=zsize (#141)/2; zsize (#141)=WIDTH*Scale; ysize (#141)=HEIGHT*Scale; write (&zcent (#141))=zsize (#141)/2; newPOS=newPOS+oldWIDTH-WIDTH*Scale/2; zpos (#141)=newPOS; counter (20)=-1; if (ROT==0) MOODS=1; ROT=0; } 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 && !counter (21)) { if (!first) waitfs (50); 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)=table (random (2)) {132, 7}; if (STATS[LOWEST]>=111 && STATS[LOWEST]<222) counter (20)=table (random (2)) {136, 8}; if (STATS[LOWEST]>=222 && STATS[LOWEST]<333) counter (20)=106; if (STATS[LOWEST]>=333 && STATS[LOWEST]<444) counter (20)=table (random (2)) {169, 170}; if (STATS[LOWEST]>=444 && STATS[LOWEST]<555) counter (20)=168; if (STATS[LOWEST]>=555 && STATS[LOWEST]<666) counter (20)=135; if (STATS[LOWEST]>=666 && STATS[LOWEST]<777) counter (20)=137; if (STATS[LOWEST]>=777 && STATS[LOWEST]<888) counter (20)=134; if (STATS[LOWEST]>=888) counter (20)=133; strcpy (&PATH, &DIR); strcat (&PATH, "images\\"); ltoa (&NAME, counter (20)); strcat (&PATH, &NAME); strcat (&PATH, ".gif"); imageLd (&PATH, imgNum, 1, &WIDTH, &HEIGHT); newPOS=zpos (#141); oldWIDTH=zsize (#141)/2; zsize (#141)=WIDTH*Scale; ysize (#141)=HEIGHT*Scale; write (&zcent (#141))=zsize (#141)/2; newPOS=newPOS+oldWIDTH-WIDTH*Scale/2; zpos (#141)=newPOS; counter (20)=-1; MOODS=0; } } end End_Chunk ; ;-------Object 167------------------------------------------------------- ; Chunk: Standard Name: "Menus" Number: 167 Size: 10000 0 10000 Position: 2182138 0 1867332 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 169------------------------------------------------------- ; Chunk: Standard Name: "other" Number: 169 Size: 10000 0 10000 Position: 2098910 0 1867162 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x77 0x76 0x77 0x76 0x17 0x75 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 147------------------------------------------------------- ; Chunk: Standard Name: "clickJo" Number: 147 Size: 10000 0 10000 Position: 2168910 0 1863162 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x77 0x17 0x77 0x76 0x0A 0x75 End_Chunk Chunk: SCL long STATS[8]; short LOWEST, MOOD, TEMP; float Total; /*CODE FOR CLICKING ON JO*/ resume (2, 2); if (activate (#141, 0)) { if (share (1)>=0) { #141.ROT=0; #141.ONCE=1; /*GET HER MOOD*/ } 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 (#141, 0); } end End_Chunk ; ;-------Object 168------------------------------------------------------- ; Chunk: Standard Name: "clickJo 2" Number: 168 Size: 10000 0 10000 Position: 2168910 0 1867162 Type: 65535 Layer: 0 End_Chunk Chunk: Colours Number: 6 0x77 0x0A 0x77 0x76 0x17 0x75 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; 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)>=0) { if (objAttrP (share (1), "C") && FREE) { COOKED=share (5); if (COOKED>0) { if (share (1)==22 || share (1)==23) { /* YOU COOKED THE FISH OR THE DOG*/ counter (25)=table (random (6)) {30, 63, 72, 73, 72, 72}; counter (20)=table (random (3)) {105, 113, 138}; share (5)=0; counter (51)=-200; counter (52)=-50; share (1)=-1; } if (share (1)>13 && share (1)<21) { regGetN ("CookedValue", &COOKING); share (5)=0; switch (COOKING); case 1: { /*UNDER COOKED*/ counter (25)=44; counter (20)=table (random (3)) {169, 170, 189}; counter (51)=-20; share (1)=-1; } case 2: { /*PERFECT*/ counter (25)=table (random (3)) {13, 62, 104}; counter (20)=table (random (3)) {107, 112, 134}; statsObj (share (1)); share (1)=-1; } case 3: { /*BURNT*/ counter (25)=table (random (4)) {5, 61, 102, 103}; counter (20)=table (random (3)) {113, 138, 184}; counter (51)=-10; share (1)=-1; } case 4: { counter (25)=table (random (4)) {5, 61, 102, 103}; counter (20)=table (random (3)) {113, 138, 184}; counter (51)=-10; share (1)=-1; } case 5: { counter (25)=table (random (4)) {5, 61, 102, 103}; counter (20)=table (random (3)) {113, 138, 184}; counter (51)=-10; share (1)=-1; /* ADD SOME DISHES*/ } repeat (10) { strcpy (&NAME, "Dishes"); ltoa (&SHARE, inloop); strcat (&NAME, &SHARE); if (regGetN (&NAME, &TEMP)) { regPutN (&NAME, 1); break; } else { if (TEMP==0) { regPutN (&NAME, 1); break; } } } FREE=0; } } else { if (share (1)!=22 && share (1)!=23) { counter (25)=table (random (2)) {24, 101}; counter (20)=table (random (3)) {169, 170, 189}; FREE=0; } } } } if (share (1)>=0) { if (objAttrP (share (1), "W") && FREE) { WEAR=share (7); strcpy (&NAME, "ClothesItemStatus"); TEMP=share (1)-43; ltoa (&SHARE, TEMP); strcat (&NAME, &SHARE); if (regGetN (&NAME, &TEMP)) TEMP=0; if (TEMP>0 && !WEAR) { share (1)=-1; counter (25)=189; } else { if (WEAR) { if (MOOD>2) { /* TRY IT ON & MAKE IT DIRTY */ #141.ROT=share (1); strcpy (&NAME, "ClothesItemStatus"); TEMP=share (1)-43; ltoa (&SHARE, TEMP); strcat (&NAME, &SHARE); regPutN (&NAME, 2); share (1)=-1; counter (30)=1; waitf; while (sndState) waitf; counter (25)=table (random (6)) {19, 40, 42, 43, 46, 159, 15}; share (7)=0; } else { /* NOT IN THE MOOD */ share (1)=-1; share (7)=0; counter (25)=table (random (6)) {27, 92, 127}; } } else { /* TAKE IT */ strcpy (&NAME, "ClothesItemStatus"); TEMP=share (1)-43; ltoa (&SHARE, TEMP); strcat (&NAME, &SHARE); regPutN (&NAME, 1); statsObj (share (1)); useObj (share (1)); counter (20)=table (random (4)) {190, 191, 192, 193}; share (7)=0; } } 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) { #142.Go=0; counter (21)=1; repeat (6) { counter (20)=table (inloop-1) {154, 155, 151, 160, 161, 158}; waitfs (5); } counter (21)=0; #142.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; #142.Go=0; repeat (6) { counter (20)=table (inloop-1) {283, 285, 287, 286, 288, 289}; waitfs (5); } waitfs (5); counter (21)=0; #142.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 End_Children ; ;-------Object 5------------------------------------------------------- ; Chunk: Standard Name: "HUMANVP: HOLD " Number: 5 Size: 4000 4000 4000 Position: 2136744 10000 1979320 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: 2136744 10000 1979320 End_Chunk Chunk: Dynamics MovType: 0x800004A1 Fuel: 0 Climb: 0 Gravity: 0 Coupled: 6 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 6------------------------------------------------------- ; Chunk: Standard Name: "HUMANVP:View point " Number: 6 Size: 1000 1000 1000 Position: 1500 1500 1500 Type: 65535 Layer: 0 DFlags: r End_Chunk Chunk: Rotations Initial: 0x0000 0x4000 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 93------------------------------------------------------- ; Chunk: Standard Name: "movelogic" Number: 93 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 (first) { switch (share (99)); case 0: { xpos (#5)=2148000; ypos (#5)=29000; zpos (#5)=1885000; yrot (#6)=0; } case 1: { xpos (#5)=2148000; ypos (#5)=29000; zpos (#5)=2010000; yrot (#6)=180; } case 2: { xpos (#5)=2054000; ypos (#5)=65000; zpos (#5)=2003000; yrot (#6)=90; } } if (getvp==1) { if (mouseb>1) { if (!first) X=mousex; Y=mousey; while (mouseb>1) { if (mouseb==3) { Y=mousey; while (mouseb==3) { ydrive (#5)= (mousey-Y)*-10; yrot (#6)+=deg ( (mousex-X)*4); waitf; } Y=mousey; } zdrive (#5)= (mousey-Y)*-20; yrot (#6)+=deg ( (mousex-X)*4); waitf; } } } else { if (mouseb>1) { if (!first) X=mousex; Y=mousey; while (mouseb>1) { zdrive (#87)= (mousey-Y)*-20; yrot (#96)+=deg ( (mousex-X)*4); waitf; } } } end End_Chunk End_Children End_File