6502.org

Code: Select all

// control codes including cr, lf, tab etc
#define K_NULL		0x00
#define K_CTL_A		0x01
<...> 
#define K_CTL_Z   	0x1a
#define K_ESC		0x1b
#define K_POUND		0x1f		// £ sign

// standard ascii 
#define K_SPACE		0x20
<...> 
#define K_DEL		0x7f

// alt letters
//					0x80
#define K_ALT_A		0x81
<...>
#define K_ALT_Z		0x9a

// control numbers
#define K_CTL_0		0xa0
<...>
#define K_CTL_9		0xa9

// alt numbers
#define K_ALT_0		0xb0
<...>
#define K_ALT_9		0xb9

// ctrl-alt letters
//					0xc0
#define K_CTRALT_A	0xc1
<...>
#define K_CTRALT_Z	0xda

// cursor keys
#define K_LEFT		0xe0
#define K_RIGHT		0xe1
#define K_UPARROW	0xe2
#define K_DOWN		0xe3
#define K_PAGEUP	0xe4
#define K_PAGEDOWN	0xe5
#define K_HOME		0xe6
#define K_END		0xe7
#define K_INSERT		0xe8
#define K_DELETE	0xe9

// function keys
//					0xf0
#define K_F1		0xf1
<...>
#define K_F12	0xfc

Code: Select all

					// shift affects all keys; shift lock only alpha
					if (shift)
					{
						if (!shiftlock)
						{
							ret = ukupper[scancode];
						}
						else
						{
							ret = uklower[scancode];
							if (!isalpha(ret))
							{
								ret = ukupper[scancode];
							}
						}
					}
					else
					{
						if (!shiftlock)
						{
							ret = uklower[scancode];
						}
						else
						{
							ret = ukupper[scancode];
							if (!isalpha(ret))
							{
								ret = uklower[scancode];
							}
						}
					}

Code: Select all

int ret = uklower[scancode];
ret = (isalpha(ret) && (shift ^ shiftlock)) | (!isalpha(ret) && shift) ? ukupper[scancode] : ret;