#include "mex.h"
#include <windows.h>
// Forwar algorithm 
//
void send_input(WORD vk, int updown);
int send_char(char ch, int shift_down);

void mexFunction (int nlhs, mxArray *plhs[],int nrhs, const mxArray *prhs[])
{
    HWND hWndID;    int cnt;
	char str[] = "hogehoge";
    int shift_state = GetAsyncKeyState(VK_SHIFT)==0 ? 0 : 1; // befor change focus
	int sfs = 0; // save shift down state
    int i;
    
	hWndID = FindWindow("Notepad", NULL);
    SetForegroundWindow(hWndID);
    Sleep(100);
    send_input( VK_SHIFT, 0);
	for(i=0;i<sizeof(str);i++)
		sfs = send_char( str[i], sfs);

    send_input( VK_SHIFT, 0); // restore shift state
    send_input( VK_F1, 2);
	return 0;
}

// send character
int send_char(char ch, int shift_down)
{
    int sft = shift_down;
    if(isupper(ch) && shift_down == 0)  //Cap, and no shift
    { send_input(VK_SHIFT,1);  sft = 1;  }
    if( !isupper(ch) && shift_down == 1)
    { send_input(VK_SHIFT,0);  sft = 0;  }
	send_input( toupper(ch), 2);
    return sft;
}

// 1 for down, 0 for up, otherwise down and up; 
void send_input(WORD vk, int updown)
{
	INPUT inp;

	inp.type = INPUT_KEYBOARD;
    inp.ki.wVk = vk;
    inp.ki.wScan = MapVirtualKey(vk, 0);
    if(updown == 1){
        inp.ki.dwFlags = 0;   // KeyDown
    }else if(updown == 0){
        inp.ki.dwFlags = KEYEVENTF_KEYUP; // KeyUp
    }else{
        send_input(vk, 1);
        send_input(vk, 0);
		return;
    }
    inp.ki.dwExtraInfo = 0;
    inp.ki.time = 0;
    SendInput(1, &inp, sizeof(INPUT));
}