Subversion Repositories Shiroi

Rev

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

Rev 18 Rev 20
Line 1... Line 1...
1 
/* $Id: shiroi.c 18 2024-08-29 06:56:23Z nishi $ */
 1 
/* $Id: shiroi.c 20 2024-08-31 06:50:57Z nishi $ */
2 
 
 2 
 
3 
#include "io.h"
 3 
#include "io.h"
4 
 
 4 
 
5 
#include "dri/math.h"
 5 
#include "dri/math.h"
6 
#include "dri/sound.h"
 6 
#include "dri/sound.h"
Line 43... Line 43...
43 
/*
 43 
/*
44 
 * / 1 2 3 4 5 6 7 8 9 10 11 12 13
 44 
 * / 1 2 3 4 5 6 7 8 9 10 11 12 13
45 
 * 1 1 2 3 4 5 6 7 8 9 0  -  =  bs
 45 
 * 1 1 2 3 4 5 6 7 8 9 0  -  =  bs
46 
 * 2 q w e r t y u i o p  [  ]  rt
 46 
 * 2 q w e r t y u i o p  [  ]  rt
47 
 * 3 a s d f g h j k l ;  '  \  cl
 47 
 * 3 a s d f g h j k l ;  '  \  cl
48 
 * 4 z x c v b n m , . /  sp
 48 
 * 4 z x c v b n m , . /  sp bk
49 
 *
 49 
 *
50 
 * When Caps Lock
 50 
 * When Caps Lock
51 
 *
 51 
 *
52 
 * / 1 2 3 4 5 6 7 8 9 10 11 12 13
 52 
 * / 1 2 3 4 5 6 7 8 9 10 11 12 13
53 
 * 1 ! @ # $ % ^ & * ( )  _  +  bs
 53 
 * 1 ! @ # $ % ^ & * ( )  _  +  bs
54 
 * 2 Q W E R T Y U I O P  {  }  rt
 54 
 * 2 Q W E R T Y U I O P  {  }  rt
55 
 * 3 A S D F G H J K L :  "  |  cl
 55 
 * 3 A S D F G H J K L :  "  |  cl
56 
 * 4 Z X C V B N M < > ?  sp
 56 
 * 4 Z X C V B N M < > ?  sp bk
57 
 */
 57 
 */
58 
	const char* keys;
 58 
	const char* keys;
59 
 
 59 
 
60 
	keys = "1234567890-=\x08";
 60 
	keys = "1234567890-=\x08";
61 
	for(i = 0; i < 13; i++){
 61 
	for(i = 0; i < 13; i++){
Line 67... Line 67...
67 
	}
 67 
	}
68 
	keys = "asdfghjkl;'\\!";
 68 
	keys = "asdfghjkl;'\\!";
69 
	for(i = 0; i < 13; i++){
 69 
	for(i = 0; i < 13; i++){
70 
		keylist[26 + i] = keys[i];
 70 
		keylist[26 + i] = keys[i];
71 
	}
 71 
	}
72 
	keys = "zxcvbnm,./    ";
 72 
	keys = "zxcvbnm,./ ?  ";
73 
	for(i = 0; i < 13; i++){
 73 
	for(i = 0; i < 13; i++){
74 
		keylist[39 + i] = keys[i];
 74 
		keylist[39 + i] = keys[i];
75 
	}
 75 
	}
76 
 
 76 
 
77 
	keys = "!@#$%^&*()_+\x08";
 77 
	keys = "!@#$%^&*()_+\x08";
Line 84... Line 84...
84 
	}
 84 
	}
85 
	keys = "ASDFGHJKL:\"|!";
 85 
	keys = "ASDFGHJKL:\"|!";
86 
	for(i = 0; i < 13; i++){
 86 
	for(i = 0; i < 13; i++){
87 
		keylist_caps[26 + i] = keys[i];
 87 
		keylist_caps[26 + i] = keys[i];
88 
	}
 88 
	}
89 
	keys = "ZXCVBNM<>?    ";
 89 
	keys = "ZXCVBNM<>? ?  ";
90 
	for(i = 0; i < 13; i++){
 90 
	for(i = 0; i < 13; i++){
91 
		keylist_caps[39 + i] = keys[i];
 91 
		keylist_caps[39 + i] = keys[i];
92 
	}
 92 
	}
93 
 
 93 
 
94 
	vdp_addr = -1;
 94 
	vdp_addr = -1;