Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Newer
Older
100644 49 lines (41 sloc) 1.278 kB
b8f3f0d *------------------*
David Parsons authored
1 /*
2 * LEVEE, or Captain Video; A vi clone
3 *
b7b7542 *------------------*
David Parsons authored
4 * Copyright (c) 1982-2007 David L Parsons
b8f3f0d *------------------*
David Parsons authored
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, without or
8 * without modification, are permitted provided that the above
9 * copyright notice and this paragraph are duplicated in all such
10 * forms and that any documentation, advertising materials, and
11 * other materials related to such distribution and use acknowledge
12 * that the software was developed by David L Parsons (orc@pell.chi.il.us).
13 * My name may not be used to endorse or promote products derived
14 * from this software without specific prior written permission.
15 * THIS SOFTWARE IS PROVIDED AS IS'' AND WITHOUT ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
17 * WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
18 * PURPOSE.
19 */
20 #include "levee.h"
21
b7b7542 *------------------*
David Parsons authored
22 #if OS_ATARI
b8f3f0d *------------------*
David Parsons authored
23 #include <atari\osbind.h>
24
25 char sound[] = {
26 0xA8,0x01,0xA9,0x01,0xAA,0x01,0x00,
27 0xF8,0x10,0x10,0x10,0x00,0x20,0x03
28 };
29
30 #define SADDR 0xFF8800L
31
32 typedef char srdef[4];
33
34 srdef *SOUND = (srdef *)SADDR;
35
36 main()
37 {
38 register i;
39 long ssp;
40
41 ssp = Super(0L);
42 for (i=0; i<sizeof(sound); i++) {
43 (*SOUND)[0] = i;
44 (*SOUND)[2] = sound[i];
45 }
46 Super(ssp);
47 }
b7b7542 *------------------*
David Parsons authored
48 #endif /*OS_ATARI*/
Something went wrong with that request. Please try again.