AkelPad

Code: Select all

var isMDI = AkelPad.IsMDI();
if(!isMDI) // We silently ignore SDI mode to allow use the same settings in any mode!
	WScript.Quit();

var hMainWnd = AkelPad.GetMainWnd();
var oSys = AkelPad.SystemFunction();

var hScript = AkelPad.ScriptHandle(WScript.ScriptName, 3 /*SH_FINDSCRIPT*/);
if(hScript && AkelPad.ScriptHandle(hScript, 13 /*SH_GETMESSAGELOOP*/)) {
	// Script is running, second call close it
	AkelPad.ScriptHandle(hScript, 33 /*SH_CLOSESCRIPT*/);
	WScript.Quit();
}

if(hMainWnd) {
	if(
		AkelPad.WindowSubClass(
			1 /*WSC_MAINPROC*/,
			mainCallback,
			0x4E /*WM_NOTIFY*/,
			0x416 /*AKDN_FRAME_ACTIVATE*/,
			0x418 /*AKDN_FRAME_DESTROY*/
			//0x436 /*AKDN_OPENDOCUMENT_FINISH*/
			//0x406 /*AKDN_MAIN_ONFINISH*/
		)
	) {
		if(
			isMDI != 1 /*WMD_MDI*/
			|| AkelPad.WindowSubClass(
				3 /*WSC_FRAMEPROC*/,
				mainCallback,
				0x4E /*WM_NOTIFY*/
			)
		) {
			AkelPad.ScriptNoMutex(); // Allow other scripts running
			AkelPad.WindowGetMessage(); // Message loop

			AkelPad.WindowUnsubClass(1 /*WSC_MAINPROC*/);
			AkelPad.WindowUnsubClass(3 /*WSC_FRAMEPROC*/);
		}
		else {
			AkelPad.WindowUnsubClass(1 /*WSC_MAINPROC*/);
			AkelPad.MessageBox(hMainWnd, "AkelPad.WindowSubClass(WSC_FRAMEPROC) failed!", WScript.ScriptName, 16 /*MB_ICONERROR*/);
		}
	}
	else {
		AkelPad.MessageBox(hMainWnd, "AkelPad.WindowSubClass(WSC_MAINPROC) failed!", WScript.ScriptName, 16 /*MB_ICONERROR*/);
	}
}

function mainCallback(hWnd, uMsg, wParam, lParam) {
}

Code: Select all

		AkelPad.WindowSubClass(
			1 /*WSC_MAINPROC*/,
			mainCallback,
			0x4E /*WM_NOTIFY*/
		)

Code: Select all

Unhandled exception at 0x003e8b4c in AkelPad.exe: 0xC0000005: Access violation reading location 0x00000182.

No symbols are loaded for any call stack frame. The source code cannot be displayed.

003E8B10  call        003E2C6A 
003E8B15  add         esp,14h 
003E8B18  mov         dword ptr [edi],eax 
003E8B1A  jmp         003E8B20 
003E8B1C  and         dword ptr [esi+28h],0 
003E8B20  xor         eax,eax 
003E8B22  inc         eax  
003E8B23  jmp         003E8B2A 
003E8B25  and         dword ptr [edi],0 
003E8B28  xor         eax,eax 
003E8B2A  pop         edi  
003E8B2B  pop         esi  
003E8B2C  pop         ebx  
003E8B2D  pop         ebp  
003E8B2E  ret         18h  
003E8B31  push        ebp  
003E8B32  mov         ebp,esp 
003E8B34  push        esi  
003E8B35  mov         esi,dword ptr [ebp+8] 
003E8B38  xor         eax,eax 
003E8B3A  test        esi,esi 
003E8B3C  push        edi  
003E8B3D  mov         edi,dword ptr [ebp+1Ch] 
003E8B40  jne         003E8B4C 
003E8B42  mov         esi,dword ptr ds:[3EEF40h] 
003E8B48  test        esi,esi 
003E8B4A  je          003E8BAA 
003E8B4C  cmp         dword ptr [esi+8],1 ; <-- падает вот тут