Amiga Format CD 5

home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 5 / amigaformatcd05.iso / readerstuff / richard_thompson / cool_stars! / examples / snow.amos < prev next >
AMOS Basic Source Code Archive | 1996-08-13 | 1.3 KB
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: AMOS Basic Source Code Archive (archive/amosSrc).
Confidence	Program	Detection	Match Type	Support
`100%`	dexvert	AMOS Basic Source Code Archive `(archive/amosSrc)`	magic	Supported
`100%`	file	AMOS Basic source code, tested	default
`99%`	file	data	default
`50%`	TrID	AMOS source (v1.34 Alt)	default
`49%`	TrID	AMOS source (generic)	default
`100%`	gt2	Kopftext: 'AMOS Basic V134 '	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 41 4d 4f 53 20 42 61 73 | 69 63 20 56 31 33 34 20 |AMOS Bas|ic V134 |
|00000010| 00 00 05 2e 25 01 06 52 | 00 42 43 6f 6f 6c 20 53 |....%..R|.BCool S|
|00000020| 74 61 72 73 21 20 63 6f | 6d 6d 61 6e 64 73 20 63 |tars! co|mmands c|
|00000030| 61 6e 20 62 65 20 75 73 | 65 64 20 74 6f 20 63 72 |an be us|ed to cr|
|00000040| 65 61 74 65 20 73 6e 6f | 77 20 61 6e 64 20 72 61 |eate sno|w and ra|
|00000050| 69 6e 20 65 66 66 65 63 | 74 73 21 20 00 00 17 01 |in effec|ts! ....|
|00000060| 06 52 00 26 54 68 69 73 | 20 65 78 61 6d 70 6c 65 |.R.&This| example|
|00000070| 20 73 68 6f 77 73 20 61 | 20 6e 69 63 65 20 73 6e | shows a| nice sn|
|00000080| 6f 77 20 73 63 65 6e 65 | 2e 20 00 00 04 01 06 52 |ow scene|. .....R|
|00000090| 00 00 00 00 25 01 06 52 | 00 42 54 68 69 73 20 73 |....%..R|.BThis s|
|000000a0| 74 61 72 66 69 65 6c 64 | 20 69 73 20 64 72 61 77 |tarfield| is draw|
|000000b0| 6e 20 35 30 20 74 69 6d | 65 73 2f 73 65 63 6f 6e |n 50 tim|es/secon|
|000000c0| 64 2c 20 65 76 65 6e 20 | 69 66 20 75 73 69 6e 67 |d, even |if using|
|000000d0| 20 61 20 4d 43 36 38 30 | 30 30 21 20 00 00 05 01 | a MC680|00! ....|
|000000e0| 06 52 00 02 20 20 00 00 | 21 01 09 ea 00 3e 00 00 |.R..  ..|!....>..|
|000000f0| 00 00 00 5c 00 3e 00 00 | 01 40 00 5c 00 3e 00 00 |...\.>..|.@.\.>..|
|00000100| 00 c8 00 5c 00 3e 00 00 | 00 02 00 5c 0c 90 00 54 |...\.>..|...\...T|
|00000110| 14 46 00 54 0c fc 00 36 | 00 00 00 0a 00 5c 00 36 |.F.T...6|.....\.6|
|00000120| 00 00 0f ff 00 54 1d e0 | 00 00 05 01 06 52 00 02 |.....T..|.....R..|
|00000130| 20 20 00 00 13 01 06 52 | 00 1e 44 72 61 77 20 73 |  .....R|..Draw s|
|00000140| 6f 6d 65 20 73 6e 6f 77 | 20 6f 6e 20 74 68 65 20 |ome snow| on the |
|00000150| 67 72 6f 75 6e 64 21 20 | 00 00 26 01 06 52 00 44 |ground! |..&..R.D|
|00000160| 4e 6f 74 65 20 74 68 61 | 74 20 49 27 76 65 20 75 |Note tha|t I've u|
|00000170| 73 65 64 20 44 72 61 77 | 20 74 6f 20 64 72 61 77 |sed Draw| to draw|
|00000180| 20 74 68 65 20 73 6e 6f | 77 20 69 6e 73 74 65 61 | the sno|w instea|
|00000190| 64 20 6f 66 20 50 6c 6f | 74 2e 20 20 49 66 20 49 |d of Plo|t.  If I|
|000001a0| 20 75 73 65 00 00 26 01 | 06 52 00 44 50 6c 6f 74 | use..&.|.R.DPlot|
|000001b0| 2c 20 74 68 65 20 70 72 | 6f 67 72 61 6d 20 77 6f |, the pr|ogram wo|
|000001c0| 72 6b 73 20 66 69 6e 65 | 20 75 6e 63 6f 6d 70 69 |rks fine| uncompi|
|000001d0| 6c 65 64 20 62 75 74 20 | 77 6f 6e 27 74 20 77 6f |led but |won't wo|
|000001e0| 72 6b 20 70 72 6f 70 65 | 72 6c 79 20 77 68 65 6e |rk prope|rly when|
|000001f0| 00 00 29 01 06 52 00 4a | 63 6f 6d 70 69 6c 65 64 |..)..R.J|compiled|
|00000200| 21 20 20 4c 6f 6f 6b 73 | 20 6c 69 6b 65 20 61 6e |!  Looks| like an|
|00000210| 6f 74 68 65 72 20 63 6f | 6d 70 69 6c 65 72 20 62 |other co|mpiler b|
|00000220| 75 67 20 28 2d 2a 4e 4f | 54 2a 2d 20 61 20 43 6f |ug (-*NO|T*- a Co|
|00000230| 6f 6c 20 53 74 61 72 73 | 21 20 62 75 67 21 29 2e |ol Stars|! bug!).|
|00000240| 20 20 00 00 04 01 06 52 | 00 00 00 00 03 01 06 ca |  .....R|........|
|00000250| 00 00 10 01 02 3c 00 84 | 00 06 00 00 02 00 78 00 |.....<..|......x.|
|00000260| ff a2 00 3e 00 00 00 00 | 00 94 00 3e 00 00 01 3f |...>....|...>...?|
|00000270| 00 00 2d 04 00 06 00 06 | 02 00 79 00 ff a2 00 3e |..-.....|..y....>|
|00000280| 00 00 00 b4 ff c0 00 74 | 07 02 00 74 00 06 00 00 |.......t|...t....|
|00000290| 02 00 78 00 00 7c ff e2 | 00 3e 00 00 00 05 00 7c |..x..|..|.>.....||
|000002a0| 00 54 0e 74 00 06 00 00 | 02 00 78 00 00 5c 00 06 |.T.t....|..x..\..|
|000002b0| 00 06 02 00 79 00 00 94 | 00 06 00 00 02 00 78 00 |....y...|......x.|
|000002c0| 00 5c 00 06 00 06 02 00 | 79 00 00 00 07 01 02 46 |.\......|y......F|
|000002d0| 00 06 00 00 02 00 78 00 | 00 00 0a 01 0e e8 00 3e |......x.|.......>|
|000002e0| 00 00 00 00 00 5c 00 3e | 00 00 00 c7 00 00 08 01 |.....\.>|........|
|000002f0| 01 2c 00 54 0e 2c 00 3e | 00 00 00 00 00 00 04 01 |.,.T.,.>|........|
|00000300| 06 52 00 00 00 00 1f 01 | 00 4e 11 02 00 1c 00 3e |.R......|.N.....>|
|00000310| 00 00 00 c8 00 5c 12 48 | 00 54 06 4a 00 24 20 52 |.....\.H|.T.J.$ R|
|00000320| 65 73 65 72 76 65 20 32 | 30 30 20 73 69 6e 67 6c |eserve 2|00 singl|
|00000330| 65 20 63 6f 6c 6f 75 72 | 65 64 20 73 74 61 72 73 |e colour|ed stars|
|00000340| 21 20 00 00 04 01 06 52 | 00 00 00 00 28 01 06 52 |! .....R|....(..R|
|00000350| 00 48 53 65 74 20 75 70 | 20 69 6e 69 74 69 61 6c |.HSet up| initial|
|00000360| 20 70 6f 73 69 74 69 6f | 6e 73 20 6f 66 20 65 61 | positio|ns of ea|
|00000370| 63 68 20 73 74 61 72 20 | 28 77 65 6c 6c 2c 20 73 |ch star |(well, s|
|00000380| 6e 6f 77 66 6c 61 6b 65 | 20 69 6e 20 74 68 69 73 |nowflake| in this|
|00000390| 20 63 61 73 65 21 29 2e | 20 20 00 00 04 01 06 52 | case!).|  .....R|
|000003a0| 00 00 00 00 10 01 02 3c | 00 84 00 06 00 0c 02 00 |.......<|........|
|000003b0| 69 00 ff a2 00 3e 00 00 | 00 01 00 94 00 3e 00 00 |i....>..|.....>..|
|000003c0| 00 c8 00 00 2d 04 00 4e | 11 05 00 3c 00 06 00 0c |....-..N|...<....|
|000003d0| 02 00 69 00 00 5c 06 86 | 00 74 00 3e 00 00 01 3f |..i..\..|.t.>...?|
|000003e0| 00 7c 00 5c 06 86 00 74 | 00 3e 00 00 00 c7 00 7c |.|.\...t|.>.....||
|000003f0| 00 5c 00 3e 00 00 00 01 | ff c0 06 86 00 74 00 3e |.\.>....|.....t.>|
|00000400| 00 00 00 02 00 7c 00 5c | 00 3e 00 00 00 01 ff c0 |.....|.\|.>......|
|00000410| 06 86 00 74 00 3e 00 00 | 00 02 00 7c 00 00 07 01 |...t.>..|...|....|
|00000420| 02 46 00 06 00 0c 02 00 | 69 00 00 00 04 01 06 52 |.F......|i......R|
|00000430| 00 00 00 00 24 01 06 52 | 00 40 41 20 73 69 6d 70 |....$..R|.@A simp|
|00000440| 6c 65 20 6c 6f 6f 70 20 | 74 6f 20 63 6c 65 61 72 |le loop |to clear|
|00000450| 2c 20 64 72 61 77 20 61 | 6e 64 20 75 70 64 61 74 |, draw a|nd updat|
|00000460| 65 20 74 68 65 20 73 74 | 61 72 73 20 28 73 6e 6f |e the st|ars (sno|
|00000470| 77 66 6c 61 6b 65 73 29 | 21 20 00 00 27 01 06 52 |wflakes)|! ..'..R|
|00000480| 00 46 4e 6f 74 65 20 74 | 68 61 74 20 49 20 75 73 |.FNote t|hat I us|
|00000490| 65 20 43 73 74 61 72 73 | 20 42 63 6c 65 61 72 20 |e Cstars| Bclear |
|000004a0| 61 6e 64 20 43 73 74 61 | 72 73 20 42 64 72 61 77 |and Csta|rs Bdraw|
|000004b0| 20 74 6f 20 73 61 76 65 | 20 74 68 65 20 62 61 63 | to save| the bac|
|000004c0| 6b 67 72 6f 75 6e 64 2e | 00 00 1e 01 06 52 00 34 |kground.|.....R.4|
|000004d0| 49 66 20 6e 6f 74 2c 20 | 74 68 65 20 73 6e 6f 77 |If not, |the snow|
|000004e0| 20 6f 6e 20 74 68 65 20 | 67 72 6f 75 6e 64 20 77 | on the |ground w|
|000004f0| 6f 75 6c 64 20 67 65 74 | 20 63 6f 72 72 75 70 74 |ould get| corrupt|
|00000500| 65 64 21 20 00 00 04 01 | 06 52 00 00 00 00 04 01 |ed! ....|.R......|
|00000510| 02 50 00 2c 00 00 0d 04 | 00 4e 11 00 02 0e 00 54 |.P.,....|.N.....T|
|00000520| 00 4e 11 00 02 22 00 54 | 00 4e 11 00 02 48 00 00 |.N...".T|.N...H..|
|00000530| 05 04 0a e2 00 54 0c ca | 00 00 04 01 02 5c 1e 32 |.....T..|.....\.2|
|00000540| 00 00 41 6d 42 73 00 00 |                         |..AmBs..|        |
+--------+-------------------------+-------------------------+--------+--------+