forked from MirrorRepos/RomWBW
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
114 lines
1.5 KiB
114 lines
1.5 KiB
#include "zx.h"
|
|
#include "zxbdos.h"
|
|
#include "zxcbdos.h"
|
|
#include <sys/ioctl.h>
|
|
#ifdef WIN32
|
|
#include <conio.h>
|
|
#endif
|
|
|
|
/* Line input */
|
|
#ifdef USE_CPMIO
|
|
|
|
|
|
void bdos_rdline(word line, word *PC)
|
|
{
|
|
char *buf;
|
|
|
|
if (!line) line = cpm_dma;
|
|
else RAM[line + 1] = 0;
|
|
|
|
buf = (char *)&RAM[line];
|
|
|
|
if (cpm_bdos_10(buf)) *PC = 0;
|
|
}
|
|
|
|
#else /* def USE_CPMIO */
|
|
|
|
void bdos_rdline(word line, word *PC)
|
|
{
|
|
int maxlen;
|
|
|
|
if (!line) line = cpm_dma;
|
|
maxlen = RAM[line];
|
|
|
|
fgets((char *)(RAM + line + 2), maxlen, stdin);
|
|
RAM[line + 1] = strlen((char *)(RAM + line + 2)) - 1;
|
|
|
|
Msg("Input: [%d] %-*.*s\n", RAM[line + 1], RAM[line + 1], RAM[line +1], (char *)(RAM+line+2));
|
|
}
|
|
#endif /* ndef USE_CPMIO */
|
|
|
|
#ifndef USE_CPMIO
|
|
|
|
|
|
int cpm_bdos_6(byte e)
|
|
{
|
|
int c;
|
|
|
|
switch(e) {
|
|
case 0xFF:
|
|
if (cstat()) return cin();
|
|
return 0;
|
|
|
|
case 0xFE:
|
|
return cstat();
|
|
|
|
case 0xFD:
|
|
return cin();
|
|
|
|
default:
|
|
cout(e);
|
|
break;
|
|
}
|
|
return 0;
|
|
}
|
|
#endif
|
|
|
|
#if defined(__MINGW32__) || defined(_MSC_BUILD) || defined(__WATCOMC__)
|
|
|
|
byte cin()
|
|
{
|
|
if (_isatty(_fileno(stdin)))
|
|
return getch();
|
|
else
|
|
return getchar();
|
|
}
|
|
|
|
void cout(byte c)
|
|
{
|
|
if (_isatty(_fileno(stdout)))
|
|
putch(c);
|
|
else
|
|
putchar(c);
|
|
}
|
|
|
|
int cstat()
|
|
{
|
|
if (_isatty(_fileno(stdin)))
|
|
return _kbhit() ? 0xFF : 0;
|
|
else
|
|
return 0xFF;
|
|
}
|
|
|
|
#else /* defined(__MINGW32__) || defined(_MSC_BUILD) */
|
|
|
|
byte cin()
|
|
{
|
|
return getchar();
|
|
}
|
|
|
|
void cout(byte c)
|
|
{
|
|
putchar(c);
|
|
}
|
|
|
|
int cstat()
|
|
{
|
|
int i;
|
|
|
|
ioctl(_fileno(stdin), FIONREAD, &i);
|
|
if (i > 0) return 0xff;
|
|
return 0;
|
|
}
|
|
|
|
#endif
|
|
|