Download Pelles C here: http://www.smorgasbordet.com/pellesc/
#include <stdlib.h>
int pop(void) { return rand()&3; }
int tos=0x123456;
typedef int (*PZ)();
typedef int (*PN)(int, ...);
PZ pz;
PN pn;
void runproc(void) { // RUNPROC ( .. fa n -- ret )
int p1, p2;
switch (pop()) {
case 0: pz=(PZ)tos;
tos=pz();
break;
case 1: pn=(PN)pop(), p1=tos;
tos=pn(p1);
break;
case 2: pn=(PN)pop(), p2=pop(), p1=tos;
tos=pn(p1,p2);
break;
default: tos=-21; }
}
int main(void) {
runproc();
return tos;
}
WndProc PROC hWnd:DWORD,uMsg:DWORD,wParam:DWORD,lParam:DWORD
.IF uMsg==WM_DESTROY
invoke PostQuitMessage,NULL
.ELSEIF uMsg==WM_CREATE
invoke CreateWindowEx,0,ADDR SysClass,ADDR text,\
WS_CHILD or WS_VISIBLE or WS_CLIPSIBLINGS or WS_CLIPCHILDREN,\
20,20,200,40,hWnd,9999,hInstance,0
mov hSyslink,eax
invoke GetDlgCtrlID,eax
mov SyslinkID,eax
.ELSEIF uMsg==WM_NOTIFY
mov eax,SyslinkID
.IF wParam==eax
mov edx,lParam
.IF NMHDR.code[edx]==NM_CLICK || NMHDR.code[edx]==NM_RETURN
invoke ShellExecute,0,ADDR verb,ADDR url,NULL,NULL,SW_SHOWNORMAL
.ENDIF
.ENDIF
Quote from: pkparchure on June 01, 2025, 08:03:58 AMAs suggested I have extracted main code pertaining to statistical analysis and a complete project is attached as a zip file.
Page created in 4.746 seconds with 15 queries.