Subversion Repositories Shiroi

Rev

Details | Last modification | View Log | RSS feed

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