Home » Archimedes archive » Acorn User » AU 1996-12 B.adf » Features » Arcade/!Popcorn/h/Popcorn

Arcade/!Popcorn/h/Popcorn

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 » Acorn User » AU 1996-12 B.adf » Features
Filename: Arcade/!Popcorn/h/Popcorn
Read OK:
File size: 013C bytes
Load address: 0000
Exec address: 0000
File contents
/* Popcorn library */

#include "DeskLib:h.Core"

struct window {
  int x0, y0, x1, y1;
};

extern struct window       plot_window;

void     Popcorn_ReadScreenDetails(void);

void	 Popcorn_SwapBanks(void);

void	 Popcorn_ClearScreen(int colour);

void	 Popcorn_PlotSprite(char *sprite, signed int x, signed int y);
00000000  2f 2a 20 50 6f 70 63 6f  72 6e 20 6c 69 62 72 61  |/* Popcorn libra|
00000010  72 79 20 2a 2f 0a 0a 23  69 6e 63 6c 75 64 65 20  |ry */..#include |
00000020  22 44 65 73 6b 4c 69 62  3a 68 2e 43 6f 72 65 22  |"DeskLib:h.Core"|
00000030  0a 0a 73 74 72 75 63 74  20 77 69 6e 64 6f 77 20  |..struct window |
00000040  7b 0a 20 20 69 6e 74 20  78 30 2c 20 79 30 2c 20  |{.  int x0, y0, |
00000050  78 31 2c 20 79 31 3b 0a  7d 3b 0a 0a 65 78 74 65  |x1, y1;.};..exte|
00000060  72 6e 20 73 74 72 75 63  74 20 77 69 6e 64 6f 77  |rn struct window|
00000070  20 20 20 20 20 20 20 70  6c 6f 74 5f 77 69 6e 64  |       plot_wind|
00000080  6f 77 3b 0a 0a 76 6f 69  64 20 20 20 20 20 50 6f  |ow;..void     Po|
00000090  70 63 6f 72 6e 5f 52 65  61 64 53 63 72 65 65 6e  |pcorn_ReadScreen|
000000a0  44 65 74 61 69 6c 73 28  76 6f 69 64 29 3b 0a 0a  |Details(void);..|
000000b0  76 6f 69 64 09 20 50 6f  70 63 6f 72 6e 5f 53 77  |void. Popcorn_Sw|
000000c0  61 70 42 61 6e 6b 73 28  76 6f 69 64 29 3b 0a 0a  |apBanks(void);..|
000000d0  76 6f 69 64 09 20 50 6f  70 63 6f 72 6e 5f 43 6c  |void. Popcorn_Cl|
000000e0  65 61 72 53 63 72 65 65  6e 28 69 6e 74 20 63 6f  |earScreen(int co|
000000f0  6c 6f 75 72 29 3b 0a 0a  76 6f 69 64 09 20 50 6f  |lour);..void. Po|
00000100  70 63 6f 72 6e 5f 50 6c  6f 74 53 70 72 69 74 65  |pcorn_PlotSprite|
00000110  28 63 68 61 72 20 2a 73  70 72 69 74 65 2c 20 73  |(char *sprite, s|
00000120  69 67 6e 65 64 20 69 6e  74 20 78 2c 20 73 69 67  |igned int x, sig|
00000130  6e 65 64 20 69 6e 74 20  79 29 3b 0a              |ned int y);.|
0000013c