//======================>>> OscCalibDialog::OscCalibAction <<<======================
int OscCalibDialog::OscCalibAction(long &cLoc, bool &cMemType, BYTE &cVal)
{
cLoc = (cLoc < 0) ? 0 : cLoc;
char str1[MAXNUMDIGIT];
char str3[MAXNUMDIGIT];
sprintf(str1, "0x%04lX", cLoc);
sprintf(str3, "%d", cVal);
SetCommandLabel(txiLoc, str1, OscCalibCmds);
SetCommandLabel(txiVal, str3, OscCalibCmds);
SetCommandObject(chkMemOffset, cMemType, OscCalibCmds);
AddDialogCmds(OscCalibCmds); // add the predefined commands
ItemVal ans,rval;
ans = ShowModalDialog("",rval);
if (ans == M_Cancel)
return 0;
char str[MAXNUMDIGIT];
GetTextIn(txiLoc, str, 10);
cLoc = strtol(str,NULL,0);
GetTextIn(txiVal, str, 10);
cVal = (BYTE)strtol(str,NULL,0);
cMemType = GetValue(chkMemOffset) ? true : false;
return (ans == M_OK);
}
int SerNumDialog::SerNumAction(long &cLoc, bool &cMemType, bool &cAutoInc, FmtEndian &cFmt, int &cLen, DWORD &cVal)
{
cLoc = (cLoc < 0) ? 0 : cLoc;
cLen = (cLen < 0 || cLen > 4) ? 4 : cLen;
cMemType = (cMemType == 0 || cMemType == 1) ? cMemType : 0;
char str1[MAXNUMDIGIT];
char str2[MAXNUMDIGIT];
char str3[MAXNUMDIGIT];
snprintf(str1, MAXNUMDIGIT, "0x%04lX", cLoc);
snprintf(str2, MAXNUMDIGIT, "%d", cLen);
snprintf(str3, MAXNUMDIGIT, "%ld", cVal);
SetCommandLabel(txiLoc, str1, DefaultCmds);
SetCommandLabel(txiLen, str2, DefaultCmds);
SetCommandLabel(txiVal, str3, DefaultCmds);
SetCommandObject(chkMemOffset, cMemType, DefaultCmds);
SetCommandObject(chkAutoInc, cAutoInc, DefaultCmds);
if (cFmt == FMT_LITTLE_ENDIAN)
{
SetCommandObject(rdbLittleEnd, 1, DefaultCmds);
SetCommandObject(rdbBigEnd, 0, DefaultCmds);
}
else
{
SetCommandObject(rdbLittleEnd, 0, DefaultCmds);
SetCommandObject(rdbBigEnd, 1, DefaultCmds);
}
AddDialogCmds(DefaultCmds); // add the predefined commands
ItemVal ans,rval;
ans = ShowModalDialog("",rval);
if (ans == M_Cancel)
return 0;
char str[MAXNUMDIGIT];
GetTextIn(txiLoc, str, 10);
cLoc = strtol(str,NULL,0);
GetTextIn(txiLen, str, 10);
cLen = strtol(str,NULL,0);
GetTextIn(txiVal, str, 10);
cVal = strtol(str,NULL,0);
if ( GetValue(rdbLittleEnd) )
cFmt = FMT_LITTLE_ENDIAN;
else
cFmt = FMT_BIG_ENDIAN;
cMemType = GetValue(chkMemOffset) ? true : false;
cAutoInc = GetValue(chkAutoInc) ? true : false;
return ans == M_OK;
}
//====================>>> JavaProjectDialog::editProject <<<====================
int JavaProjectDialog::editProject()
{
ItemVal dans, rval;
dans = ShowModalDialog("Java Project Editor",rval);
if (dans == M_Cancel)
return Cancel;
// have to retrieve values now...
GetTextIn(txiTopFile, vj->mainFile, 255);
GetTextIn(txiHTML, vj->appletHTML, 255);
GetTextIn(txiCPath, vj->classPath, 255);
GetTextIn(txiCName, vj->compilerName, 255);
GetTextIn(txiIName, vj->interpName, 255);
GetTextIn(txiDName, vj->debugName, 255);
GetTextIn(txiSrcDir, vj->srcDir, 255);
return NoBuild;
}
//====================>>> CNewProjMDlg::setBorlandValues <<<====================
void CNewProjMDlg::setBorlandValues()
{
// set up values used for Borland BCC 5.5
strcpy(mm->cc,"BCC32");
strcpy(mm->cFlags,""); // c only flag
strcpy(mm->Libs,""); // no libs for simple console
mm->libDirs.insert(-1,"$(BCCROOT)\\lib");
mm->libDirs.insert(-1,"$(BCCROOT)\\lib\\psdk");
mm->incDirs.insert(-1,"$(BCCROOT)\\include");
if (GetValue(rdbDbg)) // Debug version
{
strcat(mm->cFlags," -v"); // debug flag
strcpy(mm->Libs,"-v "); // linker, too
}
else // Releae version
{
strcat(mm->cFlags," -O1 -v-"); // optimize size flag
strcpy(mm->Libs,"-v- "); // linker, too
}
if (!GetValue(chkV) && !GetValue(chkVdll))
strcpy(mm->homeV,"");
GetTextIn(txiTgt,mm->exeName, 255);
mm->defsPool.insert(-1,"-D_RTLDLL");
mm->userTargets.insert(-1,"# BCC32 RT lib: cw32.lib static");
mm->userTargets.insert(-1,"BCC32RTLIB = cw32");
mm->userTargets.insert(-1,"# BCC32 Startup: c0x32.obj-console, c0w32.obj-winapi");
if (GetValue(rdbCon)) // Console app
{
mm->userTargets.insert(-1,"BCC32STARTUP = c0x32.obj");
strcat(mm->Libs,"-Tpe -ap -c -limport32 -l$(BCC32RTLIB)"); // win .exe, console, case
}
else if (GetValue(rdbGUI)) // GUI
{
mm->userTargets.insert(-1,"BCC32STARTUP = c0w32.obj");
strcat(mm->Libs,"-Tpe -aa -c -limport32 -l$(BCC32RTLIB)"); // win .exe, console, case
if (GetValue(chkV)) // stuff for V
{
strcat(mm->Libs," -lvguibcc -lcomctl32");
mm->libDirs.insert(-1,"$(HOMEV)/lib");
mm->incDirs.insert(-1,"$(HOMEV)/include");
}
if (GetValue(chkVdll)) // stuff for V
{
strcat(mm->Libs," -lvguidbcc -lcomctl32");
mm->libDirs.insert(-1,"$(HOMEV)/lib");
mm->incDirs.insert(-1,"$(HOMEV)/include");
mm->curDefs.insert(-1,"-DUSE_V_DLL");
mm->defsPool.insert(-1,"-DUSE_V_DLL");
}
if (GetValue(chkGL)) // use OpenGL
{
if (GetValue(chkV))
strcat(mm->Libs," -lVgl");
strcat(mm->Libs," -lglu32 -lopengl32");
}
}
else if (GetValue(rdbLib)) // Static Lib
{
}
else if (GetValue(rdbDLL)) // DLL
{
}
}
//====================>>> CNewProjMDlg::CNewProjWizard <<<====================
int CNewProjMDlg::CNewProjWizard(char* msg)
{
ItemVal ans,rval;
ans = ShowModalDialog(msg,rval);
if (ans == M_Cancel)
return 0;
int isMing = GetValue(rdbMing); // get if ming or cygwin
int isCygwin = GetValue(rdbCyg);
#ifdef V_VersionWindows
if (GetValue(rdbBorland))
{
setBorlandValues();
return ans == M_OK;
}
#endif
if (GetValue(rdbCPP)) // c++ project
strcpy(mm->cc,"g++");
else
strcpy(mm->cc,"gcc");
strcpy(mm->Libs,""); // no libs for simple console
if (GetValue(rdbDbg)) // Debug version
{
strcpy(mm->cFlags,"-g"); // debug flag
}
else // Releae version
{
strcpy(mm->cFlags,"-O"); // optimize flag
#ifdef V_VersionWindows
strcpy(mm->Libs,"-s ");
#endif
}
GetTextIn(txiTgt,mm->exeName, 255);
#ifdef V_VersionX // X X X X X X X
if (GetValue(chkVAthena)) // stuff for V Athena
{
strcat(mm->Libs,"-lVx -lXaw -lXmu -lXt -lXext -lX11 ");
mm->libDirs.insert(-1,"/usr/X11R6/lib");
mm->incDirs.insert(-1,"/usr/X11R6/include");
mm->curDefs.insert(-1,"-DAthena");
mm->defsPool.insert(-1,"-DAthena");
}
if (GetValue(chkVMotif)) // stuff for V Motif
{
strcat(mm->Libs,"-lV -lXm -lXmu -lXt -lXext -lX11 ");
mm->libDirs.insert(-1,"/usr/X11R6/lib");
mm->incDirs.insert(-1,"/usr/X11R6/include");
}
#endif // X X X X X X X
#ifdef V_VersionWindows // WINDOWS WINDOWS WINDOWS WINDOWS WINDOWS
if (GetValue(rdbCyg))
{
if (GetValue(chkNoCyg))
strcat(mm->Libs,"-mno-cygwin ");
}
if (!GetValue(chkV) && !GetValue(chkVdll))
strcpy(mm->homeV,"");
if (GetValue(rdbCon)) // Console app
{
// nothing to do!
}
else if (GetValue(rdbGUI)) // GUI
{
strcat(mm->Libs,"-mwindows");
if (GetValue(rdbCyg)) // cygwin?
{
strcat(mm->Libs," -e _mainCRTStartup");
}
if (GetValue(chkV)) // stuff for V
{
strcat(mm->Libs," -lV -lcomctl32");
mm->libDirs.insert(-1,"$(HOMEV)/lib");
mm->incDirs.insert(-1,"$(HOMEV)/include");
}
if (GetValue(chkVdll)) // stuff for V
{
strcat(mm->Libs," -lVDLL");
mm->libDirs.insert(-1,"$(HOMEV)/lib");
mm->incDirs.insert(-1,"$(HOMEV)/include");
mm->curDefs.insert(-1,"-DUSE_V_DLL");
mm->defsPool.insert(-1,"-DUSE_V_DLL");
}
if (GetValue(chkGL)) // use OpenGL
{
if (GetValue(chkV))
strcat(mm->Libs," -Vgl");
strcat(mm->Libs," -lglu32 -lopengl32");
}
}
else if (GetValue(rdbLib)) // Static Lib
{
// force mmaker to not generate the default all: target. We do it here.
}
else if (GetValue(rdbDLL)) // DLL
{
}
#endif // WINDOWS WINDOWS WINDOWS
return ans == M_OK;
}
