// Audio CD
static Boolean AudioCDTabSave() {
ControlType *cck3P;
FieldType *fld2P, *fld3P;
ListType *list1P, *list2P;
UInt16 firstTrack;
FormPtr frmP;
frmP = FrmGetActiveForm();
cck3P = (ControlType *)GetObjectPtr(TabAudioCDMP3Checkbox);
fld2P = (FieldType *)GetObjectPtr(TabAudioCDLengthSecsField);
fld3P = (FieldType *)GetObjectPtr(TabAudioCDFirstTrackField);
list1P = (ListType *)GetObjectPtr(TabAudioCDDriverList);
list2P = (ListType *)GetObjectPtr(TabAudioCDFormatList);
firstTrack = StrAToI(FldGetTextPtr(fld3P));
if (firstTrack < 1 || firstTrack > 999) {
TabSetActive(frmP, myTabP, 2);
FrmSetFocus(frmP, FrmGetObjectIndex(frmP, TabAudioCDFirstTrackField));
FrmCustomAlert(FrmErrorAlert, "Invalid track value (1...999)", 0, 0);
return false;
}
gameInfoP->musicInfo.sound.CD = CtlGetValue(cck3P);
gameInfoP->musicInfo.sound.drvCD = LstGetSelection(list1P);
gameInfoP->musicInfo.sound.frtCD = LstGetSelection(list2P);
gameInfoP->musicInfo.sound.defaultTrackLength = StrAToI(FldGetTextPtr(fld2P));
gameInfoP->musicInfo.sound.firstTrack = firstTrack;
return true;
}
static Boolean
CourseListHandleSelection(void)
{
MemHandle m, mWebsite, mEmail, old;
CourseDBRecord c;
FieldType *fldWebsite, *fldEmail;
Char *buffer;
m = DmQueryRecord(DatabaseGetRefN(DB_MAIN), gCourseInd[LstGetSelection(GetObjectPtr(LIST_courses))]);
if (! m) return true;
UnpackCourse(&c, MemHandleLock(m));
fldWebsite = GetObjectPtr(FIELD_cl_website);
fldEmail = GetObjectPtr(FIELD_cl_email);
if (StrLen(c.website) == 0) {
mWebsite = MemHandleNew(4);
buffer=MemHandleLock(mWebsite);
MemSet(buffer, 4, 0);
StrCopy(buffer, "-?-");
} else {
mWebsite = MemHandleNew(StrLen(c.website)+1);
buffer = MemHandleLock(mWebsite);
MemSet(buffer, StrLen(c.website)+1, 0);
StrCopy(buffer, c.website);
}
MemHandleUnlock(mWebsite);
old = FldGetTextHandle(fldWebsite);
FldSetTextHandle(fldWebsite, mWebsite);
if (old != NULL) MemHandleFree(old);
FldDrawField(fldWebsite);
if (StrLen(c.teacherEmail) == 0) {
mEmail = MemHandleNew(4);
buffer = MemHandleLock(mEmail);
MemSet(buffer, 4, 0);
StrCopy(buffer, "-?-");
} else {
mEmail = MemHandleNew(StrLen(c.teacherEmail)+1);
buffer = MemHandleLock(mEmail);
MemSet(buffer, StrLen(c.teacherEmail)+1, 0);
StrCopy(buffer, c.teacherEmail);
}
MemHandleUnlock(mEmail);
old = FldGetTextHandle(fldEmail);
FldSetTextHandle(fldEmail, mEmail);
if (old != NULL) MemHandleFree(old);
FldDrawField(fldEmail);
MemHandleUnlock(m);
return false;
}
static void EditCurrentSelection()
{
FormPtr form = FrmGetActiveForm();
if (FormIsNot(form, FormGroupManagement)) return;
ListPtr list = (ListPtr) GetObjectPtr(form, ListGroups);
Int16 sel = LstGetSelection(list);
if (sel == noListSelection) {
ShowMsg("Select a group first.");
return;
}
EditGroup(g_PhoneGroups[sel]);
}
Err SendReply(DmOpenRef db, gb2312_table& table)
{
MethodLogger log("SendReply");
FormPtr form = FrmGetActiveForm();
if (FormIsNot(form, FormReply)) return frmErrNotTheForm;
FieldPtr fieldTo = (FieldPtr) GetObjectPtr(form, FieldTo);
FieldPtr fieldCompose = (FieldPtr) GetObjectPtr(form, FieldCompose);
ListPtr list = (ListPtr) GetObjectPtr(form, ListGroups);
Int16 sel = LstGetSelection(list);
char* pszTo = FldGetTextPtr(fieldTo);
char* pszCompose = FldGetTextPtr(fieldCompose);
Err err = -1;
Boolean emptyTo = false;
if ((pszTo == NULL) || (StrLen(pszTo) == 0)) {
emptyTo = true;
}
Boolean emptyGroup = false;
if ((sel == noListSelection) || (sel == 0)) {
emptyGroup = true;
}
if (emptyTo && emptyGroup) {
ShowMsg("Please set To or Group.");
goto exit;
}
if ((pszCompose == NULL) || (StrLen(pszCompose) == 0)) {
FrmCustomAlert(AlertCustom, "Alert", "No message composed.", "");
goto exit;
}
if (emptyGroup)
SendTheSMS(db, table, pszTo, pszCompose);
else {
PhoneGroupPtr group = LoadPhoneGroupByUniqId(g_PhoneGroups[sel - 1]->GetUniqId());
UInt32 count = group->GetPhoneGroupItemCount();
for (UInt32 i = 0; i < count; ++i) {
PhoneGroupItemPtr item = group->GetPhoneGroupItem(i);
SendTheSMS(db, table, item->GetPhone(), pszCompose);
}
delete group;
}
exit:
return err;
}
/*!
* \brief get the current city that is selected on the list
* \return the string containing the city or NULL if no city is selected
*/
static char *
GetCurrentCityOnList(void)
{
FormPtr form = FrmGetFormPtr(formID_files);
ListPtr listp;
Int16 index;
listp = (ListPtr)GetObjectPtr(form, listID_FilesList);
index = LstGetSelection(listp);
if (index != noListSelection)
return (LstGetSelectionText(listp, index));
else
return (NULL);
}
// Music
static Boolean MusicTabSave() {
ControlType *cck1P, *cck2P;
ListType *list1P, *list2P, *list3P;
FieldType *fld1P;
UInt16 tempo;
FormPtr frmP;
frmP = FrmGetActiveForm();
cck1P = (ControlType *)GetObjectPtr(TabMusicMusicCheckbox);
cck2P = (ControlType *)GetObjectPtr(TabMusicMultiMidiCheckbox);
list1P = (ListType *)GetObjectPtr(TabMusicDriverList);
list2P = (ListType *)GetObjectPtr(TabMusicRateList);
list3P = (ListType *)GetObjectPtr(TabMusicQualityList);
fld1P = (FieldType *)GetObjectPtr(TabMusicTempoField);
tempo = StrAToI(FldGetTextPtr(fld1P));
if (tempo < 50 || tempo > 200) {
TabSetActive(frmP, myTabP, 0);
FrmSetFocus(frmP, FrmGetObjectIndex(frmP, TabMusicTempoField));
FrmCustomAlert(FrmErrorAlert, "Invalid tempo value (50...200)", 0, 0);
return false;
}
gameInfoP->musicInfo.sound.music = CtlGetValue(cck1P);
gameInfoP->musicInfo.sound.multiMidi = CtlGetValue(cck2P);
gameInfoP->musicInfo.sound.drvMusic = LstGetSelection(list1P);
gameInfoP->musicInfo.sound.rate = LstGetSelection(list2P);
gameInfoP->fmQuality = LstGetSelection(list3P);
gameInfoP->musicInfo.sound.tempo = tempo;
return true;
}
static void SelectNextInList(Int16 step)
{
FormPtr frmP = FrmGetActiveForm();
if (FormIsNot(frmP, FormReply)) return;
ListPtr list = (ListPtr) GetObjectPtr(frmP, ListGroups);
Int16 sel = LstGetSelection(list);
if (sel == noListSelection) return;
sel += step;
if (sel < 0) sel = 0;
if (sel >= LstGetNumberOfItems(list)) sel = LstGetNumberOfItems(list) - 1;
LstSetSelection(list, sel);
}
void SavePrefsButtons(void) {
ListType* lst;
Int16 selection;
char* buf;
UInt32 i;
UInt32 lists[] = { LstCal, LstPho, LstDo, LstNt, LstUp, LstDn };
// Map each string in the boxes to a keymap and set
// the keymap settings (hd.button[1]...hd.button[6]) accordingly+
for (i=0;i<=5;i++) {
lst = (ListType*)GetObjectPtr(lists[i]);
selection = LstGetSelection(lst);
buf = LstGetSelectionText(lst, selection);
//FrmCustomAlert(Info, buf, 0, 0);
temphd.buttons[i+1] = map_string_to_keymap(buf);
}
}
static void RemoveCurrentSelection()
{
FormPtr form = FrmGetActiveForm();
if (FormIsNot(form, FormGroupManagement)) return;
ListPtr list = (ListPtr) GetObjectPtr(form, ListGroups);
Int16 sel = LstGetSelection(list);
if (sel == noListSelection) {
ShowMsg("Select a group first.");
return;
}
if (FrmCustomAlert(AlertQuestion, "Do you really wanna remove current selection ?", "", "") == 1) return;
RemovePhoneGroup(g_PhoneGroups[sel]);
PhoneGroupPtr group = *(g_PhoneGroups.begin() + sel);
g_PhoneGroups.erase(g_PhoneGroups.begin() + sel);
delete group;
DrawList();
}
static void ScrollBoundedList(const FormType* form, UInt16 listId, Int16 delta)
{
Assert(form);
UInt16 index=FrmGetObjectIndex(form, listId);
Assert(frmInvalidObjectId!=index);
ListType* list=static_cast<ListType*>(FrmGetObjectPtr(form, index));
Assert(list);
Int16 position=LstGetSelection(list);
if (noListSelection==position)
position=LstGetTopItem(list);
position+=delta;
if (position<0)
position=0;
else
{
UInt16 itemsCount=LstGetNumberOfItems(list);
if (position>itemsCount)
position=itemsCount-1;
}
LstSetSelection(list, position);
}
Word ChooseReader( Word itemNum )
{
FormPtr prevFrm = FrmGetActiveForm();
FormPtr frm = FrmInitForm( readerFormID );
ListPtr lst = FrmGetObjectPtr( frm, FrmGetObjectIndex( frm,
readerListID ) );
Word hitButton;
Word newSel;
FrmSetActiveForm( frm );
LstSetSelection( lst, itemNum );
hitButton = FrmDoDialog( frm );
newSel = LstGetSelection( lst );
if( newSel==noListSelection ) newSel=-1;
if( prevFrm ) FrmSetActiveForm( prevFrm );
FrmDeleteForm( frm );
if( hitButton==readerOkButtonID ) return( newSel );
else return( itemNum );
}
Boolean
CourseListHandleEvent(EventPtr event)
{
FormPtr frm=FrmGetActiveForm();
Boolean handled = false;
ListType *lstP=GetObjectPtr(LIST_courses);
Boolean categoryEdited, reDraw=false;
UInt16 category, numRecords;
ControlType *ctl;
UInt32 *recordList;
if (event->eType == ctlSelectEvent) {
// button handling
switch (event->data.ctlSelect.controlID) {
case BUTTON_courselist_back:
handled=true;
FrmGotoForm(FORM_main);
break;
case BUTTON_courselist_del:
handled=true;
if (LstGetSelection(lstP) == noListSelection) {
FrmAlert(ALERT_clist_noitem);
} else {
DeleteCourse(gCourseInd[LstGetSelection(lstP)]);
CleanupCourselist();
DrawCourses(lstP);
FrmDrawForm(FrmGetActiveForm());
}
break;
case BUTTON_courselist_add:
handled=true;
gMenuCurrentForm=FORM_courselist;
AddCourse();
break;
case BUTTON_courselist_edit:
handled=true;
if (LstGetSelection(lstP) == noListSelection) {
FrmAlert(ALERT_clist_noitem);
} else {
gMenuCurrentForm=FORM_courselist;
EditCourse(gCourseInd[LstGetSelection(lstP)]);
}
break;
case BUTTON_courselist_beam:
handled=true;
if (LstGetSelection(lstP) == noListSelection) {
FrmAlert(ALERT_clist_noitem);
} else {
BeamCourse(gCourseInd[LstGetSelection(lstP)]);
}
break;
case LIST_cl_cat_trigger:
handled=true;
category=DatabaseGetCat();
numRecords=DmNumRecordsInCategory(DatabaseGetRef(), DELETE_CATEGORY);
recordList=(UInt32 *)MemPtrNew(numRecords * sizeof(UInt32));
CatPreEdit(numRecords, recordList);
categoryEdited = CategorySelect(DatabaseGetRef(), frm,
LIST_cl_cat_trigger, LIST_cl_cat, false,
&category, gCategoryName, 0,
STRING_cat_edit); // categoryDefaultEditCategoryString
if (categoryEdited || (category != DatabaseGetCat())) {
reDraw=true;
DatabaseSetCat(category);
ctl = GetObjectPtr(LIST_cl_cat_trigger);
CategoryGetName(DatabaseGetRef(), category, gCategoryName);
CategorySetTriggerLabel(ctl, gCategoryName);
}
CatPostEdit(numRecords, recordList);
if (reDraw) {
CleanupCourselist();
DrawCourses(lstP);
FrmDrawForm(FrmGetActiveForm());
}
if (recordList != NULL) MemPtrFree((MemPtr)recordList);
break;
default:
break;
}
} else if (event->eType == keyDownEvent) {
// We have a hard button assigned and it was pressed
if (TxtCharIsHardKey(event->data.keyDown.modifiers, event->data.keyDown.chr)) {
if (! (event->data.keyDown.modifiers & poweredOnKeyMask)) {
FrmGotoForm(FORM_main);
handled = true;
}
} else if (EvtKeydownIsVirtual(event)) {
// Up or down keys pressed
ListType *lst=GetObjectPtr(LIST_courses);
switch (event->data.keyDown.chr) {
case vchrPageUp:
if (LstGetSelection(lst) == noListSelection) {
LstSetSelection(lst, gNumCourses-1);
CourseListHandleSelection();
} else if (LstGetSelection(lst) > 0) {
LstSetSelection(lst, LstGetSelection(lst)-1);
CourseListHandleSelection();
}
handled=true;
break;
case vchrPageDown:
if (LstGetSelection(lst) == noListSelection) {
LstSetSelection(lst, 0);
CourseListHandleSelection();
} else if (LstGetSelection(lst) < (gNumCourses-1)) {
LstSetSelection(lst, LstGetSelection(lst)+1);
CourseListHandleSelection();
}
handled=true;
break;
default:
break;
}
}
} else if (event->eType == lstSelectEvent) {
return CourseListHandleSelection();
} else if (event->eType == menuOpenEvent) {
return HandleMenuOpenEvent(event);
} else if (event->eType == menuEvent) {
// forwarding of menu events
return HandleMenuEvent(event->data.menu.itemID);
} else if (event->eType == frmOpenEvent) {
// initializes and draws the form
ControlType *ctl;
frm = FrmGetActiveForm();
lstP=GetObjectPtr(LIST_courses);
FrmDrawForm (frm);
DrawCourses(lstP);
FrmDrawForm (frm);
ctl = GetObjectPtr(LIST_cl_cat_trigger);
CategoryGetName (DatabaseGetRef(), DatabaseGetCat(), gCategoryName);
CategorySetTriggerLabel (ctl, gCategoryName);
WinDrawLine(1, 140, 158, 140);
handled = true;
} else if (event->eType == frmUpdateEvent) {
// redraws the form if needed
CleanupCourselist();
DrawCourses(GetObjectPtr(LIST_courses));
FrmDrawForm (frm);
WinDrawLine(1, 140, 158, 140);
handled = false;
} else if (event->eType == frmCloseEvent) {
// this is done if form is closed
CleanupCourselist();
}
return (handled);
}
/***********************************************************************
*
* FUNCTION: SelectTime
*
* DESCRIPTION: Display a form showing a start and end time.
* Allow the user to change the time and then
* return them.
* pTimeDiff.
*
* PARAMETERS: pStartTime - pointer to TimeType
* pEndTime - pointer to TimeType
* untimed - true if there isn't a time.
* title - string containing the title
* startOfDay - used when "All Day" button selected.
* endOfDay - our used when "All Day" button selected.
* startOfDisplay - first hour initially visible
*
* RETURNED: True if the time was changed by the user.
* The first three parameters may change.
*
* REVISION HISTORY:
* Name Date Description
* ---- ---- -----------
* roger 12/2/94 Initial Revision
* trev 08/12/97 made non modified passed variables constant
* css 06/08/99 added new parameter & "All Day" button for gromit change.
*
***********************************************************************/
Boolean SelectTime (TimeType * startTimeP, TimeType * endTimeP,
Boolean untimed, const Char * titleP, Int16 startOfDay, Int16 endOfDay,
Int16 startOfDisplay)
{
Int16 firstHour;
Char startTimeText [timeStringLength];
Char endTimeText [timeStringLength];
Char timeChars [timeStringLength];
TimePtr timeP;
FormType *originalForm, *frm;
ListPtr hoursLst, minutesLst;
ControlPtr startTimeCtl, endTimeCtl;
EventType event;
Boolean confirmed = false;
MemHandle hoursItems;
TimeType startTime, endTime, timeDiff;
TimeFormatType timeFormat;
ChangingTimeType changingTime;
// Get the time format from the system preerances;
timeFormat = (TimeFormatType)PrefGetPreference(prefTimeFormat);
// Because this routine only deals with minutes in five minute
// intervals we convert the proposed times from those passed.
startTime.hours = startTimeP->hours;
startTime.minutes = startTimeP->minutes;
endTime.hours = endTimeP->hours;
endTime.minutes = endTimeP->minutes;
TimeDifference (&endTime, &startTime, &timeDiff);
// Make sure the end time is displayable (clips at 11:55 pm)
AdjustTimes (&startTime, &endTime, &timeDiff, changingStartTime);
// Clear the buffer that holds written characters.
*timeChars = 0;
startOfDisplay = min (startOfDisplay, 12);
originalForm = FrmGetActiveForm();
frm = (FormType *) FrmInitForm (TimeSelectorForm);
FrmSetActiveForm (frm);
hoursLst = FrmGetObjectPtr (frm, FrmGetObjectIndex (frm, TimeSelectorHourList));
minutesLst = FrmGetObjectPtr (frm, FrmGetObjectIndex (frm, TimeSelectorMinuteList));
startTimeCtl = FrmGetObjectPtr (frm, FrmGetObjectIndex (frm, TimeSelectorStartTimeButton));
endTimeCtl = FrmGetObjectPtr (frm, FrmGetObjectIndex (frm, TimeSelectorEndTimeButton));
// Set list to use either 12 or 24 hour time
hoursItems = SysFormPointerArrayToStrings (
((timeFormat == tfColon24h) || (timeFormat == tfDot24h)) ?
(Char *) Hours24Array() : (Char *) Hours12Array(), 24);
LstSetListChoices (hoursLst, MemHandleLock(hoursItems), 24);
LstSetTopItem (hoursLst, startOfDisplay);
// Used to do LstMakeItemVisible (hoursLst, startTime.hours); no longer.
if (! untimed)
{
LstSetSelection (hoursLst, startTime.hours);
LstSetSelection (minutesLst, startTime.minutes / 5);
CtlSetValue (startTimeCtl, true);
changingTime = changingStartTime;
}
else
{
// The hour list is dynamically created and doesn't have a selection
LstSetSelection (minutesLst, noListSelection);
changingTime = changingNoTime;
}
// Set the start and end time buttons to the current times or blank them
// if No Time is selected.
SetTimeTriggers (startTime, endTime, startTimeText, endTimeText,
timeFormat, untimed);
// This needs to be taken out when SelectTimeV33 goes away. It allows for backward
// compatibility for this change of adding the end of day variable as a parameter.
if (endOfDay != noDisplayOfAllDay)
{
FrmShowObject (frm, FrmGetObjectIndex (frm, TimeSelectorAllDayButton));
}
FrmSetTitle (frm, (Char *) titleP);
FrmDrawForm (frm);
while (true)
{
EvtGetEvent (&event, evtWaitForever);
if (SysHandleEvent ((EventType *)&event))
continue;
if (event.eType == appStopEvent)
{
// Cancel the dialog and repost this event for the app
EvtAddEventToQueue(&event);
confirmed = false;
break;
}
// Handle these before the form does to overide the default behavior
if (changingTime == changingNoTime &&
event.eType == lstEnterEvent &&
event.data.lstEnter.listID == TimeSelectorMinuteList)
{
SndPlaySystemSound(sndError);
continue;
}
FrmHandleEvent (frm, &event);
// If the start or end time buttons are pressed then change
// the time displayed in the lists.
if (event.eType == ctlSelectEvent)
{
// "Ok" button pressed?
if (event.data.ctlSelect.controlID == TimeSelectorOKButton)
{
confirmed = true;
}
// "Cancel" button pressed?
else if (event.data.ctlSelect.controlID == TimeSelectorCancelButton)
{
break;
}
// Start time button pressed?
else if (event.data.ctlSelect.controlID == TimeSelectorStartTimeButton)
{
if (changingTime != changingStartTime)
{
if (changingTime == changingNoTime)
{
SetTimeTriggers (startTime, endTime, startTimeText,
endTimeText, timeFormat, false);
}
CtlSetValue (endTimeCtl, false);
LstSetSelection (hoursLst, startTime.hours);
LstSetSelection (minutesLst, startTime.minutes / 5);
changingTime = changingStartTime;
}
else
CtlSetValue(startTimeCtl, true);
}
// End time button pressed?
else if (event.data.ctlSelect.controlID == TimeSelectorEndTimeButton)
{
if (changingTime != changingEndTime)
{
if (changingTime == changingNoTime)
{
SetTimeTriggers (startTime, endTime, startTimeText,
endTimeText, timeFormat, false);
}
CtlSetValue(startTimeCtl, false);
LstSetSelection (hoursLst, endTime.hours);
LstSetSelection (minutesLst, endTime.minutes / 5);
changingTime = changingEndTime;
}
else
CtlSetValue(endTimeCtl, true);
}
// No time button pressed?
else if (event.data.ctlSelect.controlID == TimeSelectorNoTimeButton)
{
if (changingTime != changingNoTime)
{
if (changingTime == changingStartTime)
CtlSetValue(startTimeCtl, false);
else
CtlSetValue(endTimeCtl, false);
SetTimeTriggers (startTime, endTime, startTimeText,
endTimeText, timeFormat, true);
LstSetSelection (hoursLst, noListSelection);
LstSetSelection (minutesLst, noListSelection);
changingTime = changingNoTime;
}
// Get us out of this form display now.
confirmed = true;
}
// All day button pressed?
else if (event.data.ctlSelect.controlID == TimeSelectorAllDayButton)
{
if (changingTime != changingNoTime)
{
if (changingTime == changingStartTime)
CtlSetValue(startTimeCtl, false);
else
CtlSetValue(endTimeCtl, false);
LstSetSelection (hoursLst, noListSelection);
LstSetSelection (minutesLst, noListSelection);
changingTime = changingNoTime;
}
// No matter what, the minutes are 0 for both because only the hour is registered for start/end
// times.
startTime.minutes = 0;
endTime.minutes = 0;
startTime.hours = startOfDay;
endTime.hours = endOfDay;
// Set the times to the new times.
SetTimeTriggers (startTime, endTime, startTimeText,
endTimeText, timeFormat, true);
// Get us out of this form display now. First set the changing time to anything but the changingNoTime value
// so that the pointers at the end of this function get set correctly.
changingTime = changingStartTime;
confirmed = true;
}
// Clear the buffer that holds written characters.
*timeChars = 0;
}
// If either list is changed then get the new time. If the
// start time is changed then change the end time so that the
// the time difference remains the same. If the end time is
// changed then make sure the end time isn't before the start
// time. Also calculate a new time difference.
else if (event.eType == lstSelectEvent)
{
// First, get the info from the list which has changed.
if (event.data.lstSelect.listID == TimeSelectorHourList)
{
if (changingTime == changingStartTime)
startTime.hours = (UInt8) LstGetSelection (hoursLst);
else if (changingTime == changingEndTime)
endTime.hours = (UInt8) LstGetSelection (hoursLst);
else if (changingTime == changingNoTime)
{
startTime.hours = (UInt8) LstGetSelection (hoursLst);
SetTimeTriggers (startTime, endTime, startTimeText,
endTimeText, timeFormat, false);
CtlSetValue (endTimeCtl, false);
LstSetSelection (minutesLst, startTime.minutes / 5);
changingTime = changingStartTime;
}
}
else if (event.data.lstSelect.listID == TimeSelectorMinuteList)
{
if (changingTime == changingStartTime)
startTime.minutes = (UInt8) LstGetSelection (minutesLst) * 5;
else if (changingTime == changingEndTime)
endTime.minutes = (UInt8) LstGetSelection (minutesLst) * 5;
else if (changingTime == changingNoTime)
{
ErrNonFatalDisplay("lstEnterEvent not being filtered.");
}
}
if (AdjustTimes (&startTime, &endTime, &timeDiff, changingTime))
{
if (changingTime == changingStartTime)
{
TimeToAscii (startTime.hours, startTime.minutes, timeFormat,
startTimeText);
CtlSetLabel (startTimeCtl, startTimeText);
}
else if (changingTime == changingEndTime)
{
LstSetSelection (hoursLst, startTime.hours);
LstSetSelection (minutesLst, startTime.minutes / 5);
}
}
TimeToAscii(endTime.hours, endTime.minutes, timeFormat, endTimeText);
CtlSetLabel(endTimeCtl, endTimeText);
// Clear the buffer that holds written characters.
*timeChars = 0;
}
// Handle character written in the time picker.
else if (event.eType == keyDownEvent)
{
if (changingTime == changingEndTime)
{
timeP = &endTime;
firstHour = startTime.hours;
}
else
{
timeP = &startTime;
firstHour = startOfDisplay;
}
// If a backspace character was written, change the time picker's
// current setting to "no-time".
if (event.data.keyDown.chr == backspaceChr)
{
*timeChars = 0;
if (changingTime != changingNoTime)
{
if (changingTime == changingStartTime)
CtlSetValue (startTimeCtl, false);
else
CtlSetValue (endTimeCtl, false);
SetTimeTriggers (startTime, endTime, startTimeText,
endTimeText, timeFormat, true);
LstSetSelection (hoursLst, noListSelection);
LstSetSelection (minutesLst, noListSelection);
changingTime = changingNoTime;
}
}
// A linefeed character confirms the dialog box.
else if (event.data.keyDown.chr == linefeedChr)
{
confirmed = true;
}
// If next-field character toggle between start time in end
// time.
else if (event.data.keyDown.chr == nextFieldChr)
{
*timeChars = 0;
if (changingTime == changingStartTime)
{
CtlSetValue (startTimeCtl, false);
CtlSetValue (endTimeCtl, true);
changingTime = changingEndTime;
}
else
{
CtlSetValue (endTimeCtl, false);
CtlSetValue (startTimeCtl, true);
changingTime = changingStartTime;
}
}
// If a valid time character was written, translate the written
// character into a time and update the time picker's UI.
else if (TranslateTime (timeFormat, event.data.keyDown.chr,
firstHour, timeChars, timeP))
{
if (changingTime == changingNoTime)
{
changingTime = changingStartTime;
CtlSetValue (startTimeCtl, true);
}
AdjustTimes (&startTime, &endTime, &timeDiff, changingTime);
SetTimeTriggers (startTime, endTime, startTimeText,
endTimeText, timeFormat, false);
LstSetSelection (hoursLst, timeP->hours);
LstSetSelection (minutesLst, timeP->minutes / 5);
}
}
// Has the dialog been confirmed.
if (confirmed)
{
if (changingTime != changingNoTime)
{
*startTimeP = startTime;
*endTimeP = endTime;
}
else
{
TimeToInt(*startTimeP) = noTime;
TimeToInt(*endTimeP) = noTime;
}
break;
}
}
FrmEraseForm (frm);
FrmDeleteForm (frm);
MemHandleFree (hoursItems);
FrmSetActiveForm(originalForm);
return (confirmed);
}
static Boolean
ExamDetailsFormSave(void)
{
MemHandle newExam=NULL;
UInt16 index = dmMaxRecordIndex;
ListType *course;
ControlType *course_tr, *date_tr, *time_tr;
Char *room;
Char empty[1]={'\0'};
FieldType *fldRoom;
course = GetObjectPtr(LIST_exd_course);
course_tr = GetObjectPtr(LIST_exd_course_trigger);
date_tr = GetObjectPtr(SELECTOR_exd_date);
time_tr = GetObjectPtr(SELECTOR_exd_time);
fldRoom = GetObjectPtr(FIELD_exd_room);
room = FldGetTextPtr(fldRoom);
if (room == NULL) room=empty;
if (gExamsLastSelRowUID == 0) {
// New record
newExam = DmNewRecord(DatabaseGetRefN(DB_MAIN), &index, sizeof(ExamDBRecord));
} else {
// Load record
DmFindRecordByID(DatabaseGetRefN(DB_MAIN), gExamsLastSelRowUID, &index);
newExam = DmGetRecord(DatabaseGetRefN(DB_MAIN), index);
}
if (! newExam) {
// Could not create entry
FrmAlert(ALERT_nomem);
return false;
} else {
UInt16 attr=0;
ExamDBRecord ex, *ep;
ep = (ExamDBRecord *)MemHandleLock(newExam);
ex.type=TYPE_EXAM;
ex.course=gExamDetailsItemIDs[LstGetSelection(course)];
ex.note = (gExamsLastSelRowUID == 0) ? 0 : ep->note;
ex.date.year = gExamDetailsDate.year;
ex.date.month = gExamDetailsDate.month;
ex.date.day = gExamDetailsDate.day;
ex.begin.hours = gExamDetailsBegin.hours;
ex.begin.minutes = gExamDetailsBegin.minutes;
ex.end.hours = gExamDetailsEnd.hours;
ex.end.minutes = gExamDetailsEnd.minutes;
ex.flags = 0x0000;
StrNCopy(ex.room, room, sizeof(ex.room));
DmWrite(ep, 0, &ex, sizeof(ExamDBRecord));
MemHandleUnlock(newExam);
DmReleaseRecord(DatabaseGetRef(), index, false);
DmRecordInfo(DatabaseGetRef(), index, &attr, NULL, NULL);
attr |= DatabaseGetCat();
DmSetRecordInfo(DatabaseGetRef(), index, &attr, NULL);
DatabaseSort();
}
AlarmReset(DatabaseGetRef());
return true;
}
/* Event handler for the bookmark form */
Boolean BookmarksFormHandleEvent
(
EventType* event /* pointer to an EventType structure */
)
{
Boolean handled = false;
switch ( event->eType ) {
case winEnterEvent:
handled = ResizeHandleWinEnterEvent();
break;
case winDisplayChangedEvent:
handled = ResizeHandleWinDisplayChangedEvent();
break;
case winExitEvent:
handled = ResizeHandleWinExitEvent();
break;
case frmOpenEvent:
#ifdef HAVE_SILKSCREEN
ResizeHandleFrmOpenEvent();
#endif
BookmarksFormInit();
handled = true;
break;
case frmCloseEvent:
ReleaseBookmarkList();
#ifdef HAVE_SILKSCREEN
ResizeHandleFrmCloseEvent();
#endif
handled = false;
break;
case ctlSelectEvent:
if ( event->data.ctlEnter.controlID == frmBookmarksDelete ) {
ListType* list;
Int16 selection;
list = GetObjectPtr( frmBookmarksList );
selection = LstGetSelection( list );
if ( selection != noListSelection ) {
BookmarkListEntry* e;
e = GetBookmarkListEntry( selection );
if ( e->kind == BOOKMARK_ANNOTATION ||
e->kind == BOOKMARK_BOOKMARK ) {
UInt16 choice;
choice = FrmCustomAlert( confirmDelete,
LstGetSelectionText( list, selection ), NULL,
NULL );
if ( choice == DELETE_BOOKMARK ) {
ErrTry {
DeleteAnnotationByRecordNum( e->recordNum );
ReleaseBookmarkList();
CreateBookmarkList( list );
LstDrawList( list );
deleted = true;
}
ErrCatch( UNUSED_PARAM( err ) ) {
FrmCustomAlert( errCannotDeleteBookmark,
LstGetSelectionText( list, selection ), NULL,
NULL );
} ErrEndCatch
}
}
/* Event handler for the Control preference */
Boolean PrefsControlPalmEvent
(
EventType* event /* pointer to an EventType structure */
)
{
Boolean handled;
handled = false;
switch ( event->eType ) {
case ctlSelectEvent:
switch ( event->data.ctlEnter.controlID ) {
case frmPrefsControlMode1:
case frmPrefsControlMode2:
case frmPrefsControlMode3:
controlMode = event->data.ctlEnter.controlID -
frmPrefsControlMode1;
/* We need to hide then redraw our current section because
HandleControlPrefs() has the code to display the proper
objects to match our recently updated controlMode */
PrefsHideSection( objectList, prevControlMode );
PrefsOpenSection( GetCurrentSection() );
handled = true;
break;
default:
break;
}
break;
case popSelectEvent:
{
Int16 selection;
selection = event->data.popSelect.selection;
if ( selection != noListSelection ) {
ControlType* ctl;
ListType* list;
Char* label;
UInt16 controlID;
list = event->data.popSelect.listP;
controlID = event->data.popSelect.controlID;
ctl = GetObjectPtr( controlID );
label = LstGetSelectionText( list, selection );
CtlSetLabel( ctl, label );
LstSetSelection( list, selection );
switch ( controlID ) {
case frmPrefsControlPopup1:
case frmPrefsControlPopup2:
case frmPrefsControlPopup3:
case frmPrefsControlPopup4:
{
UInt8 area;
area = event->data.popSelect.listID -
frmPrefsControlList1;
controlSelect[ controlMode ][ area ] =
LstGetSelection( list );
handled = true;
break;
}
default:
handled = false;
break;
}
}
break;
}
default:
handled = false;
}
return handled;
}
Boolean StartScummVM() {
Char **argvP;
UInt8 lightspeed, argc = 0;
UInt32 stackSize;
Boolean toLauncher, direct, isARM;
UInt8 engine;
Char num[6];
UInt16 index = GamGetSelected();
argvP = ArgsInit();
direct = false;
// start command line (exec name)
ArgsAdd(&argvP[argc], "-", NULL, &argc);
// no game selected
if (index == dmMaxRecordIndex) {
ListPtr listP;
UInt16 whichButton;
// init form
FormPtr frmP = FrmInitForm(EngineForm);
listP = (ListType *)FrmGetObjectPtr(frmP, FrmGetObjectIndex(frmP, EngineListList));
itemsText = (Char **)MemPtrNew(ENGINE_COUNT * sizeof(Char *));
for (int i = 0; i < ENGINE_COUNT; i++)
itemsText[i] = (Char *)engines[i].nameP;
LstSetListChoices (listP, itemsText, ENGINE_COUNT);
LstSetSelection(listP, 0);
whichButton = FrmDoDialog(frmP);
engine = LstGetSelection(listP);
FrmDeleteForm(frmP);
MemPtrFree(itemsText);
itemsText = NULL;
if (whichButton == EngineCancelButton) {
if (bDirectMode) {
// and force exit if nothing selected
EventType event;
event.eType = keyDownEvent;
event.data.keyDown.chr = vchrLaunch;
event.data.keyDown.modifiers = commandKeyMask;
EvtAddUniqueEventToQueue(&event, 0, true);
}
// free args
ArgsFree(argvP);
return false;
}
// default values
if (bDirectMode)
gPrefs->card.volRefNum = parseCards(); // always use the first removable card available (?)
gVars->filter = true;
gVars->palmVolume = 50;
gVars->fmQuality = FM_QUALITY_INI;
direct = true;
// somthing selected
} else {
Char pathP[256];
MemHandle recordH;
GameInfoType *gameInfoP;
recordH = DmQueryRecord(gameDB,index);
gameInfoP = (GameInfoType *)MemHandleLock(recordH);
engine = gameInfoP->engine;
// build path
StrCopy(pathP,"/Palm/Programs/ScummVM/Games/");
if (gameInfoP->pathP[0] == '/')
StrCopy(pathP, gameInfoP->pathP);
else if (!(gameInfoP->pathP[0] == '.' && StrLen(gameInfoP->pathP) == 1))
StrCat(pathP, gameInfoP->pathP);
// path
ArgsAdd(&argvP[argc], "-p", pathP, &argc);
// language
if (gameInfoP->language > 0) {
const Char *lang = "zh\0cz\0gb\0en\0fr\0de\0hb\0it\0jp\0kr\0pl\0pt\0ru\0es\0se\0";
ArgsAdd(&argvP[argc], "-q", (lang + (gameInfoP->language - 1) * 3), &argc);
}
// fullscreen ?
if (gameInfoP->fullscreen)
ArgsAdd(&argvP[argc], "-f", NULL, &argc);
// aspect-ratio ?
ArgsAdd(&argvP[argc], (gameInfoP->aspectRatio ? "--aspect-ratio" : "--no-aspect-ratio"), NULL, &argc);
// gfx mode
gVars->filter = gameInfoP->filter;
switch (gameInfoP->renderMode) {
case 1:
ArgsAdd(&argvP[argc], "--render-mode=", "amiga", &argc);
break;
case 2:
ArgsAdd(&argvP[argc], "--render-mode=", "cga", &argc);
break;
case 3:
ArgsAdd(&argvP[argc], "--render-mode=", "ega", &argc);
break;
case 4:
ArgsAdd(&argvP[argc], "--render-mode=", "hercAmber", &argc);
break;
case 5:
ArgsAdd(&argvP[argc], "--render-mode=", "hercGreen", &argc);
break;
}
switch (gameInfoP->gfxMode) {
case 1:
ArgsAdd(&argvP[argc], "-g", "wide", &argc);
break;
default:
ArgsAdd(&argvP[argc], "-g", "1x", &argc);
break;
}
// load state
if (gameInfoP->autoLoad) {
StrIToA(num, gameInfoP->loadSlot);
ArgsAdd(&argvP[argc], "-x", num, &argc);
}
// boot script parameter
if (gameInfoP->bootParam) {
StrIToA(num, gameInfoP->bootValue);
ArgsAdd(&argvP[argc], "-b", num, &argc);
}
// not a PC version
if (gameInfoP->setPlatform) {
static const char *platform[] = {
"3do",
"acorn",
"amiga",
"atari",
"c64",
"pc",
"fmtowns",
"linux",
"mac",
"nes",
"segacd",
"windows"
};
ArgsAdd(&argvP[argc], "--platform=", platform[gameInfoP->platform], &argc);
}
// subtitles
if (gameInfoP->subtitles)
ArgsAdd(&argvP[argc], "-n", NULL, &argc);
// multi midi ?
if (gameInfoP->musicInfo.sound.multiMidi)
ArgsAdd(&argvP[argc], "--multi-midi", NULL, &argc);
if (engine == ENGINE_SCUMM) {
// music tempo
StrIToA(num, gameInfoP->musicInfo.sound.tempo);
ArgsAdd(&argvP[argc], "--tempo=", num, &argc);
}
// talk speed
if (gameInfoP->talkSpeed) {
StrIToA(num, gameInfoP->talkValue);
ArgsAdd(&argvP[argc], "--talkspeed=", num, &argc);
}
// music driver
if (gameInfoP->musicInfo.sound.music) {
static char *drv[] = {
"auto",
"null",
"adlib",
"towns",
"pcjr",
"native",
"pcspk"
};
if (StrCompare(drv[gameInfoP->musicInfo.sound.drvMusic], "native") == 0) {
if (OPTIONS_TST(kOptDeviceZodiac))
ArgsAdd(&argvP[argc], "-e", "zodiac", &argc); // Tapwave Zodiac
else if (OPTIONS_TST(kOptSonyPa1LibAPI))
ArgsAdd(&argvP[argc], "-e", "ypa1", &argc); // Pa1Lib devices
else
ArgsAdd(&argvP[argc], "-e", "auto", &argc); // no driver, switch to auto
} else {
ArgsAdd(&argvP[argc], "-e", drv[gameInfoP->musicInfo.sound.drvMusic], &argc);
}
// output rate
UInt32 rates[] = {4000, 8000, 11025, 22050, 44100};
StrIToA(num, rates[gameInfoP->musicInfo.sound.rate]);
ArgsAdd(&argvP[argc], "--output-rate=", num, &argc);
// FM quality
gVars->fmQuality = gameInfoP->fmQuality;
} else {
ArgsAdd(&argvP[argc], "-e", "null", &argc);
}
// volume control
StrIToA(num, gameInfoP->musicInfo.volume.sfx);
ArgsAdd(&argvP[argc], "-s", num, &argc);
StrIToA(num, gameInfoP->musicInfo.volume.music);
ArgsAdd(&argvP[argc], "-m", num, &argc);
StrIToA(num, gameInfoP->musicInfo.volume.speech);
ArgsAdd(&argvP[argc], "-r", num, &argc);
// game name
ArgsAdd(&argvP[argc], gameInfoP->gameP, NULL, &argc);
// others globals data
gVars->CD.enable = gameInfoP->musicInfo.sound.CD;
gVars->CD.driver = gameInfoP->musicInfo.sound.drvCD;
gVars->CD.format = gameInfoP->musicInfo.sound.frtCD;
gVars->CD.volume = gameInfoP->musicInfo.volume.audiocd;
gVars->CD.defaultTrackLength = gameInfoP->musicInfo.sound.defaultTrackLength;
gVars->CD.firstTrack = gameInfoP->musicInfo.sound.firstTrack;
gVars->palmVolume = gameInfoP->musicInfo.sound.music ? gameInfoP->musicInfo.volume.palm : 0;
MemHandleUnlock(recordH);
} // end no game / game selected
// common command line options
// debug level
if (gPrefs->debug) {
StrIToA(num, gPrefs->debugLevel);
ArgsAdd(&argvP[argc], "-d", num, &argc);
}
if (engine == ENGINE_QUEEN || engine == ENGINE_SKY) {
// alternative intro ?
if (gPrefs->altIntro)
ArgsAdd(&argvP[argc], "--alt-intro", NULL, &argc);
}
if (engine == ENGINE_SCUMM) {
// demo mode ?
if (gPrefs->demoMode)
ArgsAdd(&argvP[argc], "--demo-mode", NULL, &argc);
}
// copy protection ?
if (gPrefs->copyProtection)
ArgsAdd(&argvP[argc], "--copy-protection", NULL, &argc);
// exceed max args ?
if (argc > MAX_ARG)
FrmCustomAlert(FrmErrorAlert, "Too many parameters.",0,0);
// set some common options
stackSize = (gPrefs->setStack ? STACK_LARGER : STACK_DEFAULT);
lightspeed= (gPrefs->lightspeed.enable ? gPrefs->lightspeed.mode : 255);
toLauncher= (gPrefs->exitLauncher);
// gVars values
// (gVars->HRrefNum defined in checkHRmode on Clié)
gVars->VFS.volRefNum = gPrefs->card.volRefNum;
gVars->vibrator = gPrefs->vibrator;
gVars->stdPalette = gPrefs->stdPalette;
gVars->VFS.cacheSize = (gPrefs->card.useCache ? gPrefs->card.cacheSize : 0);
gVars->indicator.showLED= gPrefs->card.showLED;
gVars->stylusClick = gPrefs->stylusClick;
gVars->autoSave = (gPrefs->autoSave ? gPrefs->autoSavePeriod : -1);
gVars->advancedMode = gPrefs->advancedMode;
gVars->arrowKeys = gPrefs->arrowKeys;
// user params
HWR_RSTALL();
if (gPrefs->goLCD)
HWR_SET(INIT_GOLCD);
else
OPTIONS_RST(kOptGoLcdAPI);
if (!gPrefs->autoOff)
HWR_SET(INIT_AUTOOFF);
if (gVars->vibrator)
HWR_SET(INIT_VIBRATOR);
/* ????
if ( musicDriver == 1 ||
musicDriver == 3 ||
musicDriver == 4 ||
musicDriver == sysInvalidRefNum) {
HWR_SET(INIT_PA1LIB);
}
*/
if (ModImport(gVars->VFS.volRefNum, engine, &isARM) != errNone) {
if (bDirectMode) {
// and force exit if nothing selected
EventType event;
event.eType = keyDownEvent;
event.data.keyDown.chr = vchrLaunch;
event.data.keyDown.modifiers = commandKeyMask;
EvtAddUniqueEventToQueue(&event, 0, true);
}
ArgsFree(argvP);
return false;
}
// reset mode if screen rotation occured (DIA only)
if (!direct && OPTIONS_TST(kOptCollapsible)) {
UInt8 mode = PalmScreenSize(0,0, &(gVars->screenFullWidth), &(gVars->screenFullHeight));
OPTIONS_RST(kOptModeLandscape);
OPTIONS_SET((mode == PALM_LANDSCAPE) ? kOptModeLandscape : kOptNone);
}
// free and save globals pref memory
GamCloseDatabase(false);
FrmCloseAllForms();
SavePrefs();
{
UInt16 cardNo;
UInt32 dbID;
LaunchParamType *cmdPBP = (LaunchParamType *)MemPtrNew(sizeof(LaunchParamType));
MemPtrSetOwner(cmdPBP, 0);
MemPtrSetOwner(gVars, 0);
ArgsSetOwner(argvP, 0);
cardNo = 0;
dbID = DmFindDatabase(0, "ScummVM-Engine");
if (isARM)
FtrSet(appFileCreator, ftrStack , (stackSize * 4));
else
ModSetStack(stackSize, cardNo, dbID);
cmdPBP->args.argc = argc;
cmdPBP->args.argv = argvP;
cmdPBP->gVars = gVars;
cmdPBP->lightspeed = lightspeed;
cmdPBP->exitLauncher = toLauncher;
SysUIAppSwitch(cardNo, dbID, sysAppLaunchCmdNormalLaunch, cmdPBP);
bLaunched = true;
}
return false;
}
/********************************************************************************
* Description: this is the function responsible for checking the
* input password value of the authentication form.
* ******************************************************************************/
static void
checkPassword (void)
{
MemPtr pass1, scratch = NULL;
char *input;
UInt16 index = 0;
MemHandle rec;
mdKey in;
ListType *list;
// compact text and get a pointer.
FldCompactText (GetObjectFromActiveForm (PasswordField));
input = FldGetTextPtr (GetObjectFromActiveForm (PasswordField));
list = GetObjectFromActiveForm (selPopupList);
// if SysPass is defined, free it. this happens when Strip locks
// itself after the timeout.
if (SysPass)
MemPtrFree (SysPass);
// if its the first time the user has used the program we need
// to set some things up.
if (input && StrLen (input))
{
// read the password from the database, decrypt with the input text.
if ((rec = DmQueryRecord (PasswordDB, index)))
{
pass1 = MemHandleLock (rec);
if ((scratch = MemPtrNew (24)))
{
UInt16 chk = LstGetSelection (list);
//printf("%d\n", LstGetSelection(list));
switch (chk)
{
case 0:
UnpackPassword_old (pass1, scratch, input, 1);
break;
case 1:
UnpackPassword_old (pass1, scratch, input, 2);
break;
case 2:
UnpackPassword_old (pass1, scratch, input, 0);
break;
}
}
MemHandleUnlock (rec);
}
// the message digest of the password they provided should be exactly the
// same as the message digest that was just decrypted out of the password
// database. Do a MemCmp to make sure they are the same.
md5_string (input, in);
if ((!MemCmp (in, scratch, 16)) && input)
{
// if so, copy the password onto the system-password
if ((SysPass = MemPtrNew (StrLen (input) + 1)))
StrCopy (SysPass, input);
if (scratch)
MemPtrFree (scratch);
md_string(SysPass, NewSysPass);
cryptSwitch (LstGetSelection (list));
}
else
{
// FAILURE!!!!!!
// free the memory and tell the user they entered the wrong password.
FieldType *fld = GetObjectFromActiveForm (PasswordField);
FrmCustomAlert (GenericError,
"The password you entered is incorrect", NULL,
NULL);
FldSetSelection (fld, 0, FldGetTextLength (fld));
LstDrawList (list);
if (scratch)
{
MemPtrFree (scratch);
SysPass = NULL;
}
}
}
// null string is always wrong!!!
else
{
FrmCustomAlert (GenericError, "You forgot to enter a password!!",
NULL, NULL);
LstDrawList (list);
}
}
static void AudioCDTabInit() {
ControlType *cck3P;
FieldType *fld2P, *fld3P;
ListType *list1P, *list2P;
MemHandle lengthH, firstTrackH;
Char *lengthP, *firstTrackP;
cck3P = (ControlType *)GetObjectPtr(TabAudioCDMP3Checkbox);
fld2P = (FieldType *)GetObjectPtr(TabAudioCDLengthSecsField);
fld3P = (FieldType *)GetObjectPtr(TabAudioCDFirstTrackField);
list1P = (ListType *)GetObjectPtr(TabAudioCDDriverList);
list2P = (ListType *)GetObjectPtr(TabAudioCDFormatList);
LstSetSelection(list1P, gameInfoP->musicInfo.sound.drvCD);
CtlSetLabel((ControlType *)GetObjectPtr(TabAudioCDDriverPopTrigger), LstGetSelectionText(list1P, LstGetSelection(list1P)));
LstSetSelection(list2P, gameInfoP->musicInfo.sound.frtCD);
CtlSetLabel((ControlType *)GetObjectPtr(TabAudioCDFormatPopTrigger), LstGetSelectionText(list2P, LstGetSelection(list2P)));
CtlSetValue(cck3P, gameInfoP->musicInfo.sound.CD);
lengthH = MemHandleNew(FldGetMaxChars(fld2P)+1);
lengthP = (Char *)MemHandleLock(lengthH);
StrIToA(lengthP, gameInfoP->musicInfo.sound.defaultTrackLength);
MemHandleUnlock(lengthH);
FldSetTextHandle(fld2P, lengthH);
firstTrackH = MemHandleNew(FldGetMaxChars(fld3P)+1);
firstTrackP = (Char *)MemHandleLock(firstTrackH);
StrIToA(firstTrackP, gameInfoP->musicInfo.sound.firstTrack);
MemHandleUnlock(firstTrackH);
FldSetTextHandle(fld3P, firstTrackH);
}
Boolean MusicFormHandleEvent(EventPtr eventP) {
FormPtr frmP = FrmGetActiveForm();
Boolean handled = false;
switch (eventP->eType) {
case frmOpenEvent:
MusicFormInit(GamGetSelected());
handled = true;
break;
case frmCloseEvent:
MusicFormSave(dmMaxRecordIndex);
handled = true;
break;
case ctlSelectEvent:
switch (eventP->data.ctlSelect.controlID)
{
case (MusicForm + 1) :
case (MusicForm + 2) :
case (MusicForm + 3) :
lastTab = (eventP->data.ctlSelect.controlID - MusicForm - 1);
TabSetActive(frmP, myTabP, lastTab);
break;
case TabMusicDriverPopTrigger:
FrmList(eventP, TabMusicDriverList);
FrmHideObject(frmP, FrmGetObjectIndex(frmP, TabMusicDriverList));
if (!OPTIONS_TST(kOptDeviceZodiac) && !OPTIONS_TST(kOptSonyPa1LibAPI)) {
ListType *list1P = (ListType *)GetObjectPtr(TabMusicDriverList);
if (LstGetSelection(list1P) == 4) {
FrmCustomAlert(FrmInfoAlert, "There is no built-in MIDI support on your device.", 0, 0);
LstSetSelection(list1P, 0);
CtlSetLabel((ControlType *)GetObjectPtr(TabMusicDriverPopTrigger), LstGetSelectionText(list1P, LstGetSelection(list1P)));
}
}
break;
case TabMusicQualityPopTrigger:
FrmList(eventP, TabMusicQualityList);
FrmHideObject(frmP, FrmGetObjectIndex(frmP, TabMusicQualityList));
break;
case TabMusicRatePopTrigger:
FrmList(eventP, TabMusicRateList);
FrmHideObject(frmP, FrmGetObjectIndex(frmP, TabMusicRateList));
if (!OPTIONS_TST(kOptPalmSoundAPI)) {
ListType *list1P = (ListType *)GetObjectPtr(TabMusicRateList);
if (LstGetSelection(list1P) != 0) {
FrmCustomAlert(FrmInfoAlert, "You cannot use this rate on your device.", 0, 0);
LstSetSelection(list1P, 0);
CtlSetLabel((ControlType *)GetObjectPtr(TabMusicRatePopTrigger), LstGetSelectionText(list1P, LstGetSelection(list1P)));
}
}
break;
case TabAudioCDFormatPopTrigger:
FrmList(eventP, TabAudioCDFormatList);
FrmHideObject(frmP, FrmGetObjectIndex(frmP, TabAudioCDFormatList));
if (LstGetSelection((ListPtr)GetObjectPtr(TabAudioCDDriverList)) == 1) {
ListType *list1P = (ListType *)GetObjectPtr(TabAudioCDFormatList);
LstSetSelection(list1P, 0);
CtlSetLabel((ControlType *)GetObjectPtr(TabAudioCDFormatPopTrigger), LstGetSelectionText(list1P, LstGetSelection(list1P)));
}
break;
case TabAudioCDDriverPopTrigger:
FrmList(eventP, TabAudioCDDriverList);
FrmHideObject(frmP, FrmGetObjectIndex(frmP, TabAudioCDDriverList));
if (LstGetSelection((ListPtr)GetObjectPtr(TabAudioCDDriverList)) == 1) {
ListType *list1P = (ListType *)GetObjectPtr(TabAudioCDFormatList);
LstSetSelection(list1P, 0);
CtlSetLabel((ControlType *)GetObjectPtr(TabAudioCDFormatPopTrigger), LstGetSelectionText(list1P, LstGetSelection(list1P)));
}
break;
case MusicOKButton:
MusicFormSave(GamGetSelected());
break;
case MusicCancelButton:
MusicFormSave(dmMaxRecordIndex);
break;
}
handled = true;
break;
default:
break;
}
return handled;
}
static void MusicTabInit() {
ControlType *cck1P, *cck2P;
ListType *list1P, *list2P, *list3P;
FieldType *fld1P;
MemHandle tempoH;
Char *tempoP;
cck1P = (ControlType *)GetObjectPtr(TabMusicMusicCheckbox);
cck2P = (ControlType *)GetObjectPtr(TabMusicMultiMidiCheckbox);
list1P = (ListType *)GetObjectPtr(TabMusicDriverList);
list2P = (ListType *)GetObjectPtr(TabMusicRateList);
list3P = (ListType *)GetObjectPtr(TabMusicQualityList);
fld1P = (FieldType *)GetObjectPtr(TabMusicTempoField);
CtlSetValue(cck1P, gameInfoP->musicInfo.sound.music);
CtlSetValue(cck2P, gameInfoP->musicInfo.sound.multiMidi);
if (gameInfoP->musicInfo.sound.drvMusic > 5)
gameInfoP->musicInfo.sound.drvMusic = 0;
LstSetSelection(list1P, gameInfoP->musicInfo.sound.drvMusic);
LstSetTopItem(list1P, gameInfoP->musicInfo.sound.drvMusic);
CtlSetLabel((ControlType *)GetObjectPtr(TabMusicDriverPopTrigger), LstGetSelectionText(list1P, LstGetSelection(list1P)));
LstSetSelection(list2P, gameInfoP->musicInfo.sound.rate);
LstSetTopItem(list2P, gameInfoP->musicInfo.sound.rate);
CtlSetLabel((ControlType *)GetObjectPtr(TabMusicRatePopTrigger), LstGetSelectionText(list2P, LstGetSelection(list2P)));
LstSetSelection(list3P, gameInfoP->fmQuality);
CtlSetLabel((ControlType *)GetObjectPtr(TabMusicQualityPopTrigger), LstGetSelectionText(list3P, LstGetSelection(list3P)));
tempoH = MemHandleNew(FldGetMaxChars(fld1P)+1);
tempoP = (Char *)MemHandleLock(tempoH);
StrIToA(tempoP, gameInfoP->musicInfo.sound.tempo);
MemHandleUnlock(tempoH);
FldSetTextHandle(fld1P, tempoH);
}
Boolean ReplyFormHandleEvent(EventType * eventP)
{
Boolean handled = false;
FormType * frmP;
static Boolean listShown = false;
frmP = FrmGetActiveForm();
switch (eventP->eType)
{
case frmOpenEvent:
switch (g_ComposeMode) {
case COMPOSE_REPLY:
ReplyCurrentRecord(g_SmsDb);
SetupReplyForm(frmP);
break;
case COMPOSE_NEW:
SetupNewForm(frmP);
break;
case COMPOSE_FORWARD:
ForwardCurrentRecord(g_SmsDb);
SetupNewForm(frmP);
break;
case COMPOSE_FEATURE:
SetupFeatureNew();
SetupNewForm(frmP);
break;
case COMPOSE_RESTORE:
RestoreReplyForm();
break;
}
FrmDrawForm(frmP);
ListAllGroups();
SetTriggerText(0);
handled = true;
break;
case frmCloseEvent:
ClearPhoneGroups(g_PhoneGroups);
break;
case menuEvent:
switch(eventP->data.menu.itemID) {
case MenuItemQueue:
DoQueue();
break;
case MenuItemBack:
DoBack();
break;
case MenuItemDraft:
DoDraft();
break;
case MenuItemSend:
DoSend();
break;
case MenuItemSendAndBack:
DoSendAndBack();
break;
case MenuItemSelectTo:
SelectTo();
break;
case MenuItemSelectGroup:
CtlHitControl((ControlPtr) GetObjectPtr(frmP, TriggerGroup));
break;
}
break;
case ctlSelectEvent:
switch(eventP->data.ctlSelect.controlID) {
case ButtonSendAndBack:
DoSendAndBack();
break;
case ButtonBack:
DoBack();
break;
case ButtonGo:
DoSend();
break;
case ButtonSelectTo:
SelectTo();
break;
case TriggerGroup:
if (listShown) {
FrmHideObject(frmP, FrmGetObjectIndex(frmP, ListGroups));
FrmDrawForm(frmP);
listShown = false;
} else {
FrmShowObject(frmP, FrmGetObjectIndex(frmP, ListGroups));
listShown = true;
}
handled = true;
break;
}
break;
case penDownEvent:
if (IsEventInControl(frmP, eventP, TriggerGroup)) break;
if (IsEventInControl(frmP, eventP, ListGroups)) break;
FrmHideObject(frmP, FrmGetObjectIndex(frmP, ListGroups));
FrmDrawForm(frmP);
listShown = false;
break;
case lstSelectEvent:
if (eventP->data.lstSelect.listID == ListGroups) {
FrmHideObject(frmP, FrmGetObjectIndex(frmP, ListGroups));
FrmDrawForm(frmP);
listShown = false;
ListPtr list = (ListPtr) GetObjectPtr(frmP, ListGroups);
Int16 sel = LstGetSelection(list);
if (sel == noListSelection) {
ShowMsg("Select a group.");
break;
}
SetTriggerText(sel);
}
break;
case keyDownEvent:
WChar chr = eventP->data.keyDown.chr;
UInt16 keyCode = eventP->data.keyDown.keyCode;
switch(chr)
{
case vchrPageUp:
if (listShown)
SelectNextInList(-1);
else
ScrollFieldPage(frmP, FieldReference, ScrollbarReference, winUp);
break;
case vchrPageDown:
if (listShown)
SelectNextInList(1);
else
ScrollFieldPage(frmP, FieldReference, ScrollbarReference, winDown);
break;
case vchrNavChange:
if(keyCode & navBitSelect) {
FrmHideObject(frmP, FrmGetObjectIndex(frmP, ListGroups));
FrmDrawForm(frmP);
listShown = false;
ListPtr list = (ListPtr) GetObjectPtr(frmP, ListGroups);
Int16 sel = LstGetSelection(list);
if (sel == noListSelection) {
ShowMsg("Select a group.");
break;
}
SetTriggerText(sel);
}
break;
}
break;
case sclRepeatEvent:
ScrollFieldByEvent(frmP, eventP, FieldReference, ScrollbarReference);
break;
}
return handled;
}
