Home » Archimedes archive » Archimedes World » AW-1991-02.adf » !AWFeb91/Goodies/Movie/DemoSource/MODELfile

!AWFeb91/Goodies/Movie/DemoSource/MODELfile

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Archimedes archive » Archimedes World » AW-1991-02.adf
Filename: !AWFeb91/Goodies/Movie/DemoSource/MODELfile
Read OK:
File size: 0762 bytes
Load address: FFFFFF42
Exec address: 86448688
File contents
{****************************************************************
 *                                                              *
 *     Movement data file for "DemoMovie" by John Whigham       *
 *                                                              *
 *    This movie uses four objects and a static background      *
 *                                                              *
 *    The 130 frames would take over 4.5 Megabytes if delta     *
 *                                                              *
 *  files were not used and take just 500K with delta files.    * 
 *                                                              *
 ****************************************************************}

mode(13)
xsize(220)
ysize(160)
frames(130)
background(-1)

{** OBJECT DEFINITIONS **}

object(1,1) {spaceship 1 - winged}
start(70,100,1,4000,90,90,0)
move(10,77,97,2,2500,90,90,0)
move(10,85,95,1,1000,90,90,0)
move(10,97,87,2,650,90,90,0)
move(10,110,80,1,200,90,90,0)
move(10,130,60,2,300,0,70,60)
move(10,150,50,1,500,-90,90,0)
move(10,155,45,2,1000,-90,90,0)
move(10,160,40,1,2000,-90,90,0)
move(10,160,60,2,1500,-90,50,90)
move(10,160,80,1,2000,-90,15,180)
move(10,160,110,2,2000,-90,15,270)
move(10,160,150,1,2000,-90,15,360)
move(10,160,200,2,2000,-90,15,450)

object(2,2) {spaceship - gunship}
start(220,-10,1,200,80,80,0)
move(10,200,7,1,300,80,80,0)
move(10,180,20,1,500,90,90,0)
move(10,160,30,1,1000,90,80,0)
move(20,140,60,1,1500,70,60,-90)
move(20,120,80,1,1750,50,60,-45)
move(20,70,90,1,2000,0,90,0)
move(40,-20,90,1,2000,0,90,180)

object(3,3) {space station}
start(110,80,1,200,0,0,0)
move(65,110,98,1,1500,360,360,360)
move(65,110,116,1,3000,720,720,720)

object(4,4) {space probe}
start(110,80,1,4000,50,90,0)
move(32,140,55,1,2000,50,80,360)
move(33,170,30,1,1000,50,70,720)
move(32,210,5,1,500,50,60,1080)
move(33,240,-20,1,200,50,50,1440)
00000000  7b 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |{***************|
00000010  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
*
00000040  2a 0a 20 2a 20 20 20 20  20 20 20 20 20 20 20 20  |*. *            |
00000050  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000080  20 20 2a 0a 20 2a 20 20  20 20 20 4d 6f 76 65 6d  |  *. *     Movem|
00000090  65 6e 74 20 64 61 74 61  20 66 69 6c 65 20 66 6f  |ent data file fo|
000000a0  72 20 22 44 65 6d 6f 4d  6f 76 69 65 22 20 62 79  |r "DemoMovie" by|
000000b0  20 4a 6f 68 6e 20 57 68  69 67 68 61 6d 20 20 20  | John Whigham   |
000000c0  20 20 20 20 2a 0a 20 2a  20 20 20 20 20 20 20 20  |    *. *        |
000000d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000100  20 20 20 20 20 20 2a 0a  20 2a 20 20 20 20 54 68  |      *. *    Th|
00000110  69 73 20 6d 6f 76 69 65  20 75 73 65 73 20 66 6f  |is movie uses fo|
00000120  75 72 20 6f 62 6a 65 63  74 73 20 61 6e 64 20 61  |ur objects and a|
00000130  20 73 74 61 74 69 63 20  62 61 63 6b 67 72 6f 75  | static backgrou|
00000140  6e 64 20 20 20 20 20 20  2a 0a 20 2a 20 20 20 20  |nd      *. *    |
00000150  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000180  20 20 20 20 20 20 20 20  20 20 2a 0a 20 2a 20 20  |          *. *  |
00000190  20 20 54 68 65 20 31 33  30 20 66 72 61 6d 65 73  |  The 130 frames|
000001a0  20 77 6f 75 6c 64 20 74  61 6b 65 20 6f 76 65 72  | would take over|
000001b0  20 34 2e 35 20 4d 65 67  61 62 79 74 65 73 20 69  | 4.5 Megabytes i|
000001c0  66 20 64 65 6c 74 61 20  20 20 20 20 2a 0a 20 2a  |f delta     *. *|
000001d0  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000200  20 20 20 20 20 20 20 20  20 20 20 20 20 20 2a 0a  |              *.|
00000210  20 2a 20 20 66 69 6c 65  73 20 77 65 72 65 20 6e  | *  files were n|
00000220  6f 74 20 75 73 65 64 20  61 6e 64 20 74 61 6b 65  |ot used and take|
00000230  20 6a 75 73 74 20 35 30  30 4b 20 77 69 74 68 20  | just 500K with |
00000240  64 65 6c 74 61 20 66 69  6c 65 73 2e 20 20 20 20  |delta files.    |
00000250  2a 20 0a 20 2a 20 20 20  20 20 20 20 20 20 20 20  |* . *           |
00000260  20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
*
00000290  20 20 20 2a 0a 20 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |   *. **********|
000002a0  2a 2a 2a 2a 2a 2a 2a 2a  2a 2a 2a 2a 2a 2a 2a 2a  |****************|
*
000002d0  2a 2a 2a 2a 2a 2a 7d 0a  0a 6d 6f 64 65 28 31 33  |******}..mode(13|
000002e0  29 0a 78 73 69 7a 65 28  32 32 30 29 0a 79 73 69  |).xsize(220).ysi|
000002f0  7a 65 28 31 36 30 29 0a  66 72 61 6d 65 73 28 31  |ze(160).frames(1|
00000300  33 30 29 0a 62 61 63 6b  67 72 6f 75 6e 64 28 2d  |30).background(-|
00000310  31 29 0a 0a 7b 2a 2a 20  4f 42 4a 45 43 54 20 44  |1)..{** OBJECT D|
00000320  45 46 49 4e 49 54 49 4f  4e 53 20 2a 2a 7d 0a 0a  |EFINITIONS **}..|
00000330  6f 62 6a 65 63 74 28 31  2c 31 29 20 7b 73 70 61  |object(1,1) {spa|
00000340  63 65 73 68 69 70 20 31  20 2d 20 77 69 6e 67 65  |ceship 1 - winge|
00000350  64 7d 0a 73 74 61 72 74  28 37 30 2c 31 30 30 2c  |d}.start(70,100,|
00000360  31 2c 34 30 30 30 2c 39  30 2c 39 30 2c 30 29 0a  |1,4000,90,90,0).|
00000370  6d 6f 76 65 28 31 30 2c  37 37 2c 39 37 2c 32 2c  |move(10,77,97,2,|
00000380  32 35 30 30 2c 39 30 2c  39 30 2c 30 29 0a 6d 6f  |2500,90,90,0).mo|
00000390  76 65 28 31 30 2c 38 35  2c 39 35 2c 31 2c 31 30  |ve(10,85,95,1,10|
000003a0  30 30 2c 39 30 2c 39 30  2c 30 29 0a 6d 6f 76 65  |00,90,90,0).move|
000003b0  28 31 30 2c 39 37 2c 38  37 2c 32 2c 36 35 30 2c  |(10,97,87,2,650,|
000003c0  39 30 2c 39 30 2c 30 29  0a 6d 6f 76 65 28 31 30  |90,90,0).move(10|
000003d0  2c 31 31 30 2c 38 30 2c  31 2c 32 30 30 2c 39 30  |,110,80,1,200,90|
000003e0  2c 39 30 2c 30 29 0a 6d  6f 76 65 28 31 30 2c 31  |,90,0).move(10,1|
000003f0  33 30 2c 36 30 2c 32 2c  33 30 30 2c 30 2c 37 30  |30,60,2,300,0,70|
00000400  2c 36 30 29 0a 6d 6f 76  65 28 31 30 2c 31 35 30  |,60).move(10,150|
00000410  2c 35 30 2c 31 2c 35 30  30 2c 2d 39 30 2c 39 30  |,50,1,500,-90,90|
00000420  2c 30 29 0a 6d 6f 76 65  28 31 30 2c 31 35 35 2c  |,0).move(10,155,|
00000430  34 35 2c 32 2c 31 30 30  30 2c 2d 39 30 2c 39 30  |45,2,1000,-90,90|
00000440  2c 30 29 0a 6d 6f 76 65  28 31 30 2c 31 36 30 2c  |,0).move(10,160,|
00000450  34 30 2c 31 2c 32 30 30  30 2c 2d 39 30 2c 39 30  |40,1,2000,-90,90|
00000460  2c 30 29 0a 6d 6f 76 65  28 31 30 2c 31 36 30 2c  |,0).move(10,160,|
00000470  36 30 2c 32 2c 31 35 30  30 2c 2d 39 30 2c 35 30  |60,2,1500,-90,50|
00000480  2c 39 30 29 0a 6d 6f 76  65 28 31 30 2c 31 36 30  |,90).move(10,160|
00000490  2c 38 30 2c 31 2c 32 30  30 30 2c 2d 39 30 2c 31  |,80,1,2000,-90,1|
000004a0  35 2c 31 38 30 29 0a 6d  6f 76 65 28 31 30 2c 31  |5,180).move(10,1|
000004b0  36 30 2c 31 31 30 2c 32  2c 32 30 30 30 2c 2d 39  |60,110,2,2000,-9|
000004c0  30 2c 31 35 2c 32 37 30  29 0a 6d 6f 76 65 28 31  |0,15,270).move(1|
000004d0  30 2c 31 36 30 2c 31 35  30 2c 31 2c 32 30 30 30  |0,160,150,1,2000|
000004e0  2c 2d 39 30 2c 31 35 2c  33 36 30 29 0a 6d 6f 76  |,-90,15,360).mov|
000004f0  65 28 31 30 2c 31 36 30  2c 32 30 30 2c 32 2c 32  |e(10,160,200,2,2|
00000500  30 30 30 2c 2d 39 30 2c  31 35 2c 34 35 30 29 0a  |000,-90,15,450).|
00000510  0a 6f 62 6a 65 63 74 28  32 2c 32 29 20 7b 73 70  |.object(2,2) {sp|
00000520  61 63 65 73 68 69 70 20  2d 20 67 75 6e 73 68 69  |aceship - gunshi|
00000530  70 7d 0a 73 74 61 72 74  28 32 32 30 2c 2d 31 30  |p}.start(220,-10|
00000540  2c 31 2c 32 30 30 2c 38  30 2c 38 30 2c 30 29 0a  |,1,200,80,80,0).|
00000550  6d 6f 76 65 28 31 30 2c  32 30 30 2c 37 2c 31 2c  |move(10,200,7,1,|
00000560  33 30 30 2c 38 30 2c 38  30 2c 30 29 0a 6d 6f 76  |300,80,80,0).mov|
00000570  65 28 31 30 2c 31 38 30  2c 32 30 2c 31 2c 35 30  |e(10,180,20,1,50|
00000580  30 2c 39 30 2c 39 30 2c  30 29 0a 6d 6f 76 65 28  |0,90,90,0).move(|
00000590  31 30 2c 31 36 30 2c 33  30 2c 31 2c 31 30 30 30  |10,160,30,1,1000|
000005a0  2c 39 30 2c 38 30 2c 30  29 0a 6d 6f 76 65 28 32  |,90,80,0).move(2|
000005b0  30 2c 31 34 30 2c 36 30  2c 31 2c 31 35 30 30 2c  |0,140,60,1,1500,|
000005c0  37 30 2c 36 30 2c 2d 39  30 29 0a 6d 6f 76 65 28  |70,60,-90).move(|
000005d0  32 30 2c 31 32 30 2c 38  30 2c 31 2c 31 37 35 30  |20,120,80,1,1750|
000005e0  2c 35 30 2c 36 30 2c 2d  34 35 29 0a 6d 6f 76 65  |,50,60,-45).move|
000005f0  28 32 30 2c 37 30 2c 39  30 2c 31 2c 32 30 30 30  |(20,70,90,1,2000|
00000600  2c 30 2c 39 30 2c 30 29  0a 6d 6f 76 65 28 34 30  |,0,90,0).move(40|
00000610  2c 2d 32 30 2c 39 30 2c  31 2c 32 30 30 30 2c 30  |,-20,90,1,2000,0|
00000620  2c 39 30 2c 31 38 30 29  0a 0a 6f 62 6a 65 63 74  |,90,180)..object|
00000630  28 33 2c 33 29 20 7b 73  70 61 63 65 20 73 74 61  |(3,3) {space sta|
00000640  74 69 6f 6e 7d 0a 73 74  61 72 74 28 31 31 30 2c  |tion}.start(110,|
00000650  38 30 2c 31 2c 32 30 30  2c 30 2c 30 2c 30 29 0a  |80,1,200,0,0,0).|
00000660  6d 6f 76 65 28 36 35 2c  31 31 30 2c 39 38 2c 31  |move(65,110,98,1|
00000670  2c 31 35 30 30 2c 33 36  30 2c 33 36 30 2c 33 36  |,1500,360,360,36|
00000680  30 29 0a 6d 6f 76 65 28  36 35 2c 31 31 30 2c 31  |0).move(65,110,1|
00000690  31 36 2c 31 2c 33 30 30  30 2c 37 32 30 2c 37 32  |16,1,3000,720,72|
000006a0  30 2c 37 32 30 29 0a 0a  6f 62 6a 65 63 74 28 34  |0,720)..object(4|
000006b0  2c 34 29 20 7b 73 70 61  63 65 20 70 72 6f 62 65  |,4) {space probe|
000006c0  7d 0a 73 74 61 72 74 28  31 31 30 2c 38 30 2c 31  |}.start(110,80,1|
000006d0  2c 34 30 30 30 2c 35 30  2c 39 30 2c 30 29 0a 6d  |,4000,50,90,0).m|
000006e0  6f 76 65 28 33 32 2c 31  34 30 2c 35 35 2c 31 2c  |ove(32,140,55,1,|
000006f0  32 30 30 30 2c 35 30 2c  38 30 2c 33 36 30 29 0a  |2000,50,80,360).|
00000700  6d 6f 76 65 28 33 33 2c  31 37 30 2c 33 30 2c 31  |move(33,170,30,1|
00000710  2c 31 30 30 30 2c 35 30  2c 37 30 2c 37 32 30 29  |,1000,50,70,720)|
00000720  0a 6d 6f 76 65 28 33 32  2c 32 31 30 2c 35 2c 31  |.move(32,210,5,1|
00000730  2c 35 30 30 2c 35 30 2c  36 30 2c 31 30 38 30 29  |,500,50,60,1080)|
00000740  0a 6d 6f 76 65 28 33 33  2c 32 34 30 2c 2d 32 30  |.move(33,240,-20|
00000750  2c 31 2c 32 30 30 2c 35  30 2c 35 30 2c 31 34 34  |,1,200,50,50,144|
00000760  30 29                                             |0)|
00000762