z88dk forums

Code: Select all

#include <stdlib.h>
#include <stdio.h>                
#include <string.h>
#include <zx81.h>
#include <im2.h>

// zcc +zx81 -create-app isr03.c

int x = 0; 
 
M_BEGIN_ISR(isr)                    
{
  ++x;
}
M_END_ISR
 
void main(void)
{
   #asm
   di
   #endasm
 
   im2_Init((void *)0xd300);                  // place z80 in im2 mode with interrupt vector table located at 0xd300
   memset((void *)0xd300, 0xd4, 257);  // initialize 257-byte im2 vector table with all 0xd4 bytes
   bpoke(0xd4d4, 195);                         // POKE jump instruction at address 0xd4d4 (interrupt service routine entry)
   wpoke(0xd4d5, (unsigned int) isr);     // POKE isr address following the jump instruction
 
   #asm
   ei
   #endasm
 
loop:

//do stuff

goto loop; 
}

Code: Select all

/* zcc +zx81 -create-app disp_isr.c */

/* Inspired by RELOGIO By K. Murta http://zx81.eu5.org/toddysofte.html,
   and the z88dk source of gmtime(). 

Also based on olofsen post https://www.sinclairzxworld.com/viewtopic.php?p=17265#p17265
*/

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <input.h>
#include <zx81.h>

extern int d_file @16396;
unsigned char i, isrText[32], *Display; 

void DisplayISR(void)
{
for(i = 0; i < 32; ++i)
        isrText[i] = rand()%64;

memcpy(Display,isrText,32);

#asm
jp 0x02a4  ; return to the main program
#endasm 
}

void hook()
{
#asm
          ld      hl,_DisplayISR
          ld      (0x41b4),hl        ; 0x41b4 I guess this address has changed in z88dk ?
          ld      a,0xc9                                                        
          ld      (0x412e),a         ; same here ?
#endasm
}

void main(void)
{
Display = (unsigned char *) d_file + 1; 

hook();

while(1);
}