#include <stdio.h>

#define CASH1  0x01
#define CASH2  0x02
#define NCASH1  0xFE
#define NCASH2  0xFD
#define TEST 0
#if TEST
#define CASHPORT 0x378
#define STATUSPORT 0x379
#define MODEMPORT 0X37A
#else
#define CASHPORT 0x278
#define STATUSPORT 0x279
#define MODEMPORT 0X27A
#endif
#define CASHOPEN 0x80
#define TRUE 1
#define FALSE 0
#define WAIT 20

is_keypress()
{
  if ( kbhit() != 0 )
        return TRUE;
return FALSE;
}

is_CashOpen()
{
unsigned int data;
  data = inportb(STATUSPORT);
  if (( data & CASHOPEN ) != 0 )
                {
                return TRUE;
                }
return FALSE;
}


Open_Cash1()
{
unsigned int data;
int i;
        data = inportb(CASHPORT);    /* trigger the Cashdraw */
        data = data ^ CASH1;   /* xor this bit */
        outportb(CASHPORT,data);
        for (i=0;i<WAIT;i++)
                {
                delay(1000);   /* wait few mini secord to way cash draw open */
                data = inportb(STATUSPORT);
                if ( is_CashOpen() )
                        {
                        data = inportb(CASHPORT);   /* release the trigger */
                        data = data & NCASH1;
                        outportb(CASHPORT,data);
#if TEST
        printf(" data = %x ",data);
#endif
                        data = inportb(MODEMPORT);   /* release the trigger */
#if TEST
        printf(" data = %x ",data);
#endif
                        data = data & ( NCASH1 & NCASH2 );
                        data = data | CASH1;
                        outportb(MODEMPORT,data);
#if TEST
        printf(" data = %x ",data);
#endif
                        return TRUE;
                        }
                if (is_keypress())
                        break;
                }
        data = inportb(CASHPORT);   /* release the trigger */
        data = data | CASH1 ;
        outportb(CASHPORT,data);
#if TEST
        printf(" data = %x ",data);
#endif

        data = inportb(MODEMPORT);   /* release the trigger */
        data = data & NCASH1 ;
        outportb(MODEMPORT,data);
#if TEST
        printf(" data = %x ",data);
#endif
return FALSE;
}
Open_Cash2()
{
unsigned int data;
int i;
        data = inportb(CASHPORT);    /* trigger the Cashdraw */
        data = data ^ CASH2;   /* xor this bit */
        outportb(CASHPORT,data);
        for (i=0;i<WAIT;i++)
                {
                delay(1000);   /* wait few mini secord to way cash draw open */
                data = inportb(STATUSPORT);
                if ( is_CashOpen() )
                        {
                        data = inportb(CASHPORT);   /* release the trigger */
                        data = data & NCASH2;
                        outportb(CASHPORT,data);
#if TEST
        printf(" data = %x ",data);
#endif

                        data = inportb(MODEMPORT);   /* release the trigger */
                        data = data & ( NCASH1 & NCASH2 );
                        data = data | CASH2;
                        outportb(MODEMPORT,data);
#if TEST
        printf(" data = %x ",data);
#endif
                        return TRUE;
                        }
                if (is_keypress())
                        break;
                }
        data = inportb(CASHPORT);   /* release the trigger */
        data = data | CASH2 ;
        outportb(CASHPORT,data);

#if TEST
        printf(" data = %x ",data);
#endif
        data = inportb(MODEMPORT);   /* release the trigger */
        data = data & NCASH2 ;
        outportb(MODEMPORT,data);
#if TEST
        printf(" data = %x ",data);
#endif

return FALSE;
}
Open_Cash1Cash2()
{
unsigned int data;
int i;
        data = inportb(CASHPORT);    /* trigger the Cashdraw */
        data = data ^ (CASH1 + CASH2);   /* xor this bit */
        outportb(CASHPORT,data);
        for (i=0;i<WAIT;i++)
                {
                delay(1000);   /* wait few mini secord to way cash draw open */
                data = inportb(STATUSPORT);
                if ( is_CashOpen() )
                        {
                        data = inportb(CASHPORT);   /* release the trigger */
                        data = data & (NCASH1 & NCASH2);
                        outportb(CASHPORT,data);
#if TEST
        printf(" data = %x ",data);
#endif

                        data = inportb(MODEMPORT);   /* release the trigger */
                        data = data | ( CASH1 | CASH2);
                        outportb(MODEMPORT,data);

#if TEST
        printf(" data = %x ",data);
#endif
                        return TRUE;
                        }
                if (is_keypress())
                        break;
                }
        data = inportb(CASHPORT);   /* release the trigger */
        data = data | (CASH1 + CASH2);
        outportb(CASHPORT,data);
#if TEST
        printf(" data = %x ",data);
#endif

        data = inportb(MODEMPORT);   /* release the trigger */
        data = data & (NCASH1 & NCASH2);
        outportb(MODEMPORT,data);
#if TEST
        printf(" data = %x ",data);
#endif

return FALSE;
}
init_cash()
{
        outportb(0x250,0x89);
        outportb(0x251,0x09);
        outportb(0x252,0x0c);
        outportb(0x251,0x04);
        outportb(0x252,0x00);
        outportb(0x251,0x23);
        outportb(0x252,0x9e);
        outportb(0x250,0xaa);
}
main(argc,argv)
int argc;
char *argv[];
{
int which,answer;

        printf("Cash Drawer Version 2.00\n");
init_cash();
        if ( argc == 2 )
                {
                which = atoi(argv[1]);
                switch(which)
                        {
                        case 1:
                                answer = Open_Cash1();
                                break;
                        case 2:
                                answer = Open_Cash2();
                                break;
                        case 3:
                                answer = Open_Cash1Cash2();
                                break;
                        case 5:
                                outportb(CASHPORT,0xff);
                                outportb(MODEMPORT,0xFC);
                                break;
                        case 4:
                                answer = is_CashOpen();
                                while ( answer == is_CashOpen() )
                                        {
                                        if ( answer == TRUE )
                                                printf("Cash Open\n");
                                        else    printf("Cash Close\n");
                                        }
                                answer = is_CashOpen();
                                while ( answer == is_CashOpen() )
                                        {
                                        if ( answer == TRUE )
                                                printf("Cash Open\n");
                                        else    printf("Cash Close\n");
                                        }
                                answer = is_CashOpen();
                                break;
                        }
                if ( answer == TRUE )
                        printf("Cashdraw is Opened\n");
                else
                        printf("Cashdraw is Closed\n");
                }
}