Subversion Repositories Shiroi

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
8 nishi 1
/* $Id: basic.c 12 2024-08-29 04:19:08Z nishi $ */
2
 
3
#include "text.h"
4
 
5
unsigned char basicbuffer[1024 * 30];
6
 
7
void basic(void){
8
	clear();
9
 
10
	putstr("Shiroi Microcomputer BASIC\r\n");
11
	cursor();
12
	while(1){
12 nishi 13
		char c = agetch();
8 nishi 14
		if(c == '\n'){
12 nishi 15
			killcursor();
8 nishi 16
			putstr("\r\n");
12 nishi 17
		}else if(c != 0){
18
			killcursor();
8 nishi 19
			putchar(c);
20
		}
21
		cursor();
22
	}
23
}