home *** CD-ROM | disk | FTP | other *** search
- /*** peek/poke header 12/5/88 by the Little Green Man
- These are for convience sake you need to be
- in supervisor mode to use these.
- *****************************************************/
-
-
-
- /*>>>> PEEKS SECTION <<<<*/
-
- /* int peekb(bp) char *bp; (peek at a byte) */
- #define peekb(cp) (*((char *)cp))
- /*-----------------------------------------------*/
-
- /* long peekl(lp) long *lp; (peek at a long, 4 bytes) */
- #define peekl(lp) (*((long *)lp))
- /*----------------------------------------------------------*/
-
- /* int peekw(wp) int *wp; (peek at a word, 2 bytes) */
- #define peekw(wp) (*((int *)wp))
- /*----------------------------------------------------------*/
-
-
-
- /*>>>> POKES SECTION <<<<*/
-
-
- /* int pokeb(bp,b) char *bp; int b; */
- #define pokeb(cp,c) (*((char *)cp) = c)
- /*----------------------------------------------------------*/
-
-
- /* long pokel(lp,l) long *lp, l; */
- #define pokel(lp,l) (*((long *)lp) = l)
- /*----------------------------------------------------------*/
-
-
- /* int pokew(wp,w) int *wp, w; */
- #define pokew(wp,w) (*((int *)wp) = w)
- /*-----------------------------------------------------------*/
-
-