Subversion Repositories Shiroi

Rev

Rev 18 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 18 Rev 19
Line 1... Line 1...
1 
/* $Id: basic.c 18 2024-08-29 06:56:23Z nishi $ */
 1 
/* $Id: basic.c 19 2024-08-29 07:16:04Z nishi $ */
2 
 
 2 
 
3 
#include "dri/text.h"
 3 
#include "dri/text.h"
4 
 
 4 
 
5 
unsigned char basicbuffer[1024 * 30];
 5 
unsigned char basicbuffer[1024 * 30];
6 
 
 6 
 
7 
void basic(void){
 7 
void basic(void){
8 
	clear();
 8 
	clear();
9 
 
 9 
 
10 
	putstr("Shiroi Microcomputer BASIC\r\n");
 10 
	putstr("Shiroi Microcomputer BASIC\r\n");
- 
 
 11 
	putstr("Copyright 2024 by Nishi\r\n");
11 
	cursor();
 12 
	cursor();
12 
	while(1){
 13 
	while(1){
13 
		char c = agetch();
 14 
		char c = agetch();
14 
		if(c == '\n'){
 15 
		if(c == '\n'){
15 
			killcursor();
 16 
			killcursor();