#include <avr/io.h>
#include <avr/interrupt.h>
#include <util/delay.h>
#include "mytypes.h"
#include "pins.h"
#include "main.h"
#include "ps2.h"
#include "rs232.h"
#include "zx.h"
#include "spi.h"
#include "atx.h"
#include "rtc.h"
#include "joystick.h"
ISR(TIMER0_COMP_vect){
static BYTE scankbd=12;
switch(scankbd){
case 13:
scankbd=0;
jkey_state = 0;
jkey_state |= (~JOYSTICK_PIN) & 0b00011111; // arrows
if( ( gamepad_type & JOY_WITH_KBD ) == 0 )
{
jkey_state |= (~PINA) & 0b00100000; // EJOY_C
}
TCCR0 = 0b00111100;
SEGA_SYNC_DOWN();
OCR0=TCNT0+1;
break;
case 1:
jkey_state |= ((~JOYSTICK_PIN) & 0b00010000) << 2; // EJOY_A
if( ( gamepad_type & JOY_WITH_KBD ) == 0 )
{
jkey_state |= ((~PINA) & 0b00100000) << 2; // EJOY_START
}
SEGA_SYNC_UP();
if(gamepad_type & JOY_SEGA_8KEY)
{//пропускаем опрос дополнительных кнопок
scankbd = 6;
}
OCR0=TCNT0+1;
break;
case 2:
SEGA_SYNC_DOWN();
OCR0=TCNT0+1;
break;
case 3:
SEGA_SYNC_UP();
OCR0=TCNT0+1;
break;
case 4:
SEGA_SYNC_DOWN();
OCR0=TCNT0+1;
break;
case 5:
SEGA_SYNC_UP();
OCR0=TCNT0+1;
break;
case 6:
jkey_state |= ((UWORD)((~JOYSTICK_PIN) & 0b00001111)) << 8;
SEGA_SYNC_DOWN();
OCR0=TCNT0+1;
break;
case 7:
zx_realkbd[10] = 4;
SEGA_SYNC_UP();
TCCR0 = 0b00111101;
default:
OCR0=TCNT0+255;
break;
}
scankbd++;
}
ISR(TIMER2_OVF_vect)
{
static BYTE dir=0x01;
static BYTE ocr=0x00;
static BYTE scankbd=0;
static BYTE cskey=0xff;
// counter++; // just fucking shit to fadein-fadeout LED :-)))
// if( counter & 8 )
{
// counter=0;
ocr += dir;
if( (ocr==(-1)) && (dir==(-1)) )
{
dir = -dir;
ocr = 1;
} else if( (ocr==0) && (dir==1) )
{
dir = -dir;
ocr = 0xFF;
}
OCR2 = ocr;
}
// PS/2 keyboard timeout tracking
if( (ps2keyboard_count<12) && (ps2keyboard_count!=0) )
{
if( ( (flags_register&FLAG_PS2KEYBOARD_DIRECTION)!=0 ) && ( ps2keyboard_count==11 ) && ( ps2keyboard_timeout<PS2KEYBOARD_TIMEOUT ) )
{
//release clock after first programmed interrupt
PS2KBCLK_PORT |= (1<<PS2KBCLK); //release ps2keyboard clk pin
PS2KBCLK_DDR &= ~(1<<PS2KBCLK);
}
if( ps2keyboard_timeout ) ps2keyboard_timeout--;
}
// pause for keyboard CS|SS
if( shift_pause )
shift_pause--;
// PS/2 mouse timeout tracking
if( (ps2mouse_count<12) && (ps2mouse_count!=0) )
{
if( ( (flags_register&FLAG_PS2MOUSE_DIRECTION)!=0 ) && ( ps2mouse_count==11 ) && ( ps2mouse_timeout<PS2MOUSE_TIMEOUT ) )
{
//release clock after first programmed interrupt
PS2MSCLK_PORT |= (1<<PS2MSCLK); //release ps2mouse clk pin
PS2MSCLK_DDR &= ~(1<<PS2MSCLK);
}
if( ps2mouse_timeout ) ps2mouse_timeout--;
}
//check soft reset and F12 key
if ( !( SOFTRES_PIN & (1<<SOFTRES)) ||
(kb_ctrl_status & KB_F12_MASK) )
{
//pressed
atx_counter++;
}
else
{
//not pressed
atx_counter = 0;
}
if( gamepad_type != JOY_SWITCHS )// JOY_SWITCHS )
{
return;
}
if ( scankbd==0 )
{
UBYTE tmp;
tmp = PINA;
zx_realkbd[5] = tmp & cskey;
cskey = tmp | 0xfe;
DDRC = 0b00010000;
PORTC = 0b11001111;
zx_realkbd[10] = 4;
scankbd=4;
}
else if ( scankbd==1 )
{
zx_realkbd[6] = PINA;
DDRC = 0b00000001;
PORTC = 0b11011110;
scankbd=0;
}
else if ( scankbd==2 )
{
zx_realkbd[7] = PINA;
DDRC = 0b00000010;
PORTC = 0b11011101;
scankbd=1;
}
else if ( scankbd==3 )
{
zx_realkbd[8] = PINA;
DDRC = 0b00000100;
PORTC = 0b11011011;
scankbd=2;
}
else if ( scankbd==4 )
{
zx_realkbd[9] = PINA;
DDRC = 0b00001000;
PORTC = 0b11010111;
scankbd=3;
}
}
// receive/send PS/2 keyboard data
ISR(INT4_vect)
{
if( (flags_register&FLAG_PS2KEYBOARD_DIRECTION) != 0 )
{
//send mode
if( --ps2keyboard_count )
{
if ( ps2keyboard_shifter&1 ) PS2KBDAT_PORT |= (1<<PS2KBDAT);
else PS2KBDAT_PORT &= ~(1<<PS2KBDAT);
ps2keyboard_shifter >>= 1;
if( ps2keyboard_count == 11 )
{
//first interrupt is programmed
PS2KBDAT_DDR |= (1<<PS2KBDAT); //ps2keyboard data pin to output mode
//_delay_us(250); //hold ps2keyboard clk pin ~250us
//PS2KBCLK_PORT |= (1<<PS2KBCLK); //release ps2keyboard clk pin
//PS2KBCLK_DDR &= ~(1<<PS2KBCLK);
}
else if( ps2keyboard_count == 1)
{
PS2KBDAT_DDR &= ~(1<<PS2KBDAT); //ps2keyboard data pin to input mode
}
}
else
{
//ack received
PS2KBCLK_PORT &= ~(1<<PS2KBCLK);
PS2KBCLK_DDR |= (1<<PS2KBCLK);
}
}
else
{
//receive mode
ps2keyboard_shifter >>= 1;
if( (PS2KBDAT_PIN&(1<<PS2KBDAT)) ) ps2keyboard_shifter |= 0x8000;
if( (--ps2keyboard_count) == 1 )
{
PS2KBCLK_PORT &= ~(1<<PS2KBCLK);
PS2KBCLK_DDR |= (1<<PS2KBCLK);
ps2keyboard_count = 0;
}
}
EIFR = (1<<INTF4);
//set timeout
ps2keyboard_timeout = PS2KEYBOARD_TIMEOUT;
}
// receive/send PS/2 mouse data
ISR(INT5_vect)
{
if( (flags_register&FLAG_PS2MOUSE_DIRECTION) != 0 )
{
//send mode
if( --ps2mouse_count )
{
if ( ps2mouse_shifter&1 ) PS2MSDAT_PORT |= (1<<PS2MSDAT);
else PS2MSDAT_PORT &= ~(1<<PS2MSDAT);
ps2mouse_shifter >>= 1;
if( ps2mouse_count == 11 )
{
//first interrupt is programmed
//must hold pin >250us
PS2MSDAT_DDR |= (1<<PS2MSDAT); //ps2mouse data pin to output mode
//_delay_us(250); //hold ps2mouse clk pin ~250us
//PS2MSCLK_PORT |= (1<<PS2MSCLK); //release ps2mouse clk pin
//PS2MSCLK_DDR &= ~(1<<PS2MSCLK);
}
else if( ps2mouse_count == 1)
{
PS2MSDAT_DDR &= ~(1<<PS2MSDAT); //ps2mouse data pin to input mode
}
}
else
{
//ack received
PS2MSCLK_PORT &= ~(1<<PS2MSCLK);
PS2MSCLK_DDR |= (1<<PS2MSCLK);
}
}
else
{
//receive mode
ps2mouse_shifter >>= 1;
if( (PS2MSDAT_PIN&(1<<PS2MSDAT)) ) ps2mouse_shifter |= 0x8000;
if( (--ps2mouse_count) == 1 )
{
PS2MSCLK_PORT &= ~(1<<PS2MSCLK);
PS2MSCLK_DDR |= (1<<PS2MSCLK);
ps2mouse_count = 0;
}
}
EIFR = (1<<INTF5);
//set timeout
ps2mouse_timeout = PS2MOUSE_TIMEOUT;
}
// SPI_INT
ISR(INT6_vect)
{
flags_register |= FLAG_SPI_INT;
EIFR = (1<<INTF6);
}
// RTC up data
ISR(INT7_vect)
{
gluk_inc();
EIFR = (1<<INTF7);
}