Subversion Repositories Shiroi

Rev

Rev 9 | Rev 12 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 9 Rev 10
Line 1... Line 1...
1 
/* $Id: shiroi.c 9 2024-08-28 16:35:27Z nishi $ */
 1 
/* $Id: shiroi.c 10 2024-08-29 01:39:27Z nishi $ */
2 
 
 2 
 
3 
#include "io.h"
 3 
#include "io.h"
4 
#include "math.h"
 4 
#include "math.h"
5 
#include "sound.h"
 5 
#include "sound.h"
6 
#include "video.h"
 6 
#include "video.h"
Line 110... Line 110...
110 
	video_init();
 110 
	video_init();
111 
	text_init();
 111 
	text_init();
112 
 
 112 
 
113 
	clear();
 113 
	clear();
114 
 
 114 
 
115 
//	beep();
 115 
	beep();
116 
 
 116 
 
117 
	if(text_kbd_data == -1){
 117 
	if(text_kbd_data == -1){
118 
		putstr("Text  Card Mark I not present\r\n");
 118 
		putstr("Text  Card Mark I not present\r\n");
119 
		putstr("Text  Card Mark I is required to use the BASIC\r\n");
 119 
		putstr("Text  Card Mark I is required to use the BASIC\r\n");
120 
		putstr("Halted. Get one.\r\n");
 120 
		putstr("Halted. Get one.\r\n");