FORM ID formMainID AT (0 0 160 160)
NOFRAME
USABLE
MENUID menuMainID
BEGIN
TITLE "PCal"
FIELD ID fieldMainAnswID AT (4 41 152 16) USABLE RIGHTALIGN FONT 7
NONEDITABLE SINGLELINE MAXCHARS 32 DISABLED
FIELD ID fieldMainExprID AT (0 15 152 30) USABLE LEFTALIGN FONT 1 EDITABLE
MULTIPLELINES MAXCHARS 128
SCROLLBAR scrollbarMainExprID AT (153 15 7 23)
POPUPTRIGGER "C" ID poptrigMainConstID
AT (28 1 AUTO AUTO) LEFTANCHOR FONT 1 USABLE
LIST "" ID listMainConstID
AT (PREVLEFT PREVBOTTOM 130 AUTO) NONUSABLE FONT 0
POPUPLIST ID poptrigMainConstID listMainConstID
POPUPTRIGGER "M" ID poptrigMainMemID
AT (52 1 AUTO AUTO) LEFTANCHOR FONT 1 USABLE
LIST "" ID listMainMemID
AT (PREVLEFT PREVBOTTOM 128 AUTO) NONUSABLE FONT 0
POPUPLIST ID poptrigMainMemID listMainMemID
POPUPTRIGGER "P" ID poptrigMainProgID
AT (80 1 AUTO AUTO) LEFTANCHOR FONT 1 USABLE
LIST "" ID listMainProgID
AT (PREVLEFT PREVBOTTOM 120 AUTO) NONUSABLE VISIBLEITEMS 11 FONT 0
POPUPLIST ID poptrigMainProgID listMainProgID
PUSHBUTTON "P" ID pushbtnMainProgModeID AT (107 2 AUTO 9)
PUSHBUTTON "" ID pushbtnMainAngID AT (PREVRIGHT+3 PREVTOP 17 PREVHEIGHT)
PUSHBUTTON "" ID pushbtnMainNotatID AT (PREVRIGHT+3 PREVTOP 16 PREVHEIGHT)
PUSHBUTTON "Arc" ID pushbtnMainArcID
AT (BUTTON_LEFT BUTTON_TOP BUTTON_WIDTH BUTTON_HEIGHT_S) USABLE FONT 0
PUSHBUTTON "Hyp" ID pushbtnMainHypID
AT (PREVRIGHT+1 PREVTOP PREVWIDTH PREVHEIGHT) USABLE FONT 0
BUTTON "sin" ID buttonMainSinID
AT (BUTTON_LEFT BUTTON_TOP+17 BUTTON_WIDTH BUTTON_HEIGHT_L) USABLE FONT 0
BUTTON "cos" ID buttonMainCosID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 0
BUTTON "tan" ID buttonMainTanID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 0
BUTTON "pi" ID buttonMainPiID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 0
BUTTON "sqrt" ID buttonMainSqrtID
AT (PREVRIGHT+1 BUTTON_TOP+17 PREVWIDTH BUTTON_HEIGHT_L) USABLE FONT 0
BUTTON "ln" ID buttonMainLnID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 0
BUTTON "log" ID buttonMainLogID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 0
BUTTON "exp" ID buttonMainExpID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 0
BUTTON "STO" ID buttonMainStoID
AT (PREVRIGHT+3 BUTTON_TOP BUTTON_WIDTH BUTTON_HEIGHT_S) USABLE FONT 0
BUTTON "7" ID buttonMain7ID
AT (PREVLEFT PREVBOTTOM+3 PREVWIDTH BUTTON_HEIGHT_L) USABLE FONT 1
BUTTON "4" ID buttonMain4ID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON "1" ID buttonMain1ID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON "0" ID buttonMain0ID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON " ( " ID buttonMainLprnID
AT (PREVRIGHT+1 BUTTON_TOP BUTTON_WIDTH BUTTON_HEIGHT_S) USABLE FONT 1
BUTTON "8" ID buttonMain8ID
AT (PREVLEFT PREVBOTTOM+3 PREVWIDTH BUTTON_HEIGHT_L) USABLE FONT 1
BUTTON "5" ID buttonMain5ID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON "2" ID buttonMain2ID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON "." ID buttonMainPntID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON " ) " ID buttonMainRprnID
AT (PREVRIGHT+1 BUTTON_TOP BUTTON_WIDTH BUTTON_HEIGHT_S) USABLE FONT 1
BUTTON "9" ID buttonMain9ID
AT (PREVLEFT PREVBOTTOM+3 PREVWIDTH BUTTON_HEIGHT_L) USABLE FONT 1
BUTTON "6" ID buttonMain6ID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON "3" ID buttonMain3ID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON "E" ID buttonMainEID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON "^" ID buttonMainPowID
AT (PREVRIGHT+1 BUTTON_TOP BUTTON_WIDTH BUTTON_HEIGHT_S) USABLE FONT 1
BUTTON "/" ID buttonMainDivID
AT (PREVLEFT PREVBOTTOM+3 PREVWIDTH BUTTON_HEIGHT_L) USABLE FONT 1
BUTTON "*" ID buttonMainMulID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON "-" ID buttonMainSubID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON "+" ID buttonMainAddID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT) USABLE FONT 1
BUTTON "CLR" ID buttonMainClrID
AT (PREVRIGHT+4 BUTTON_TOP BUTTON_WIDTH BUTTON_HEIGHT_S) USABLE FONT 0
BUTTON "\003" ID buttonMainBsID
AT (PREVLEFT PREVBOTTOM+3 PREVWIDTH BUTTON_HEIGHT_L) USABLE FONT 3
BUTTON "ANS" ID buttonMainAnsID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH BUTTON_HEIGHT_L) USABLE FONT 0
BUTTON "ENT" ID buttonMainEntID
AT (PREVLEFT PREVBOTTOM+1 PREVWIDTH PREVHEIGHT*2+1) USABLE FONT 0
END
MENU ID menuMainID
BEGIN
PULLDOWN "Set"
BEGIN
MENUITEM "Constant" menuitemMainConstID "N"
MENUITEM "Program" menuitemMainProgID "O"
MENUITEM "Prefs" menuitemMainPrefsID "R"
END
PULLDOWN "Edit"
BEGIN
MENUITEM "Copy answer" menuitemMainCopyID "W"
END
PULLDOWN "Info"
BEGIN
MENUITEM "About" menuitemMainAboutID
END
END
FORM ID formPrefID AT (2 2 156 156)
FRAME
MODAL
USABLE
BEGIN
TITLE "Preferences"
LABEL "Number of digits :" AUTOID AT (10 20)
LABEL "Display :" AUTOID AT (60 35)
POPUPTRIGGER "" ID poptrigPrefDispdigitID
AT (100 PREVTOP+2 AUTO AUTO) LEFTANCHOR
LIST "4 digits" "5 digits" "6 digits" "7 digits" "8 digits" "9 digits"
"10 digits" "11 digits" "12 digits" "13 digits" "14 digits" "15 digits"
ID listPrefDispdigitID
AT (PREVLEFT PREVBOTTOM 45 AUTO)
NONUSABLE
VISIBLEITEMS 12
POPUPLIST ID poptrigPrefDispdigitID listPrefDispdigitID
LABEL "Insert :" AUTOID AT (60 50)
POPUPTRIGGER "" ID poptrigPrefInsdigitID
AT (100 PREVTOP+2 AUTO AUTO) LEFTANCHOR
LIST "4 digits" "5 digits" "6 digits" "7 digits" "8 digits" "9 digits"
"10 digits" "11 digits" "12 digits" "13 digits" "14 digits" "15 digits"
ID listPrefInsdigitID
AT (PREVLEFT PREVBOTTOM 45 AUTO)
NONUSABLE VISIBLEITEMS 12
POPUPLIST ID poptrigPrefInsdigitID listPrefInsdigitID
LABEL "Thousand separator:" AUTOID AT (10 65)
CHECKBOX "Integer part" ID checkboxPrefSepintID AT (60 80 AUTO AUTO)
CHECKBOX "Fraction part" ID checkboxPrefSepfracID AT (60 95 AUTO AUTO)
LABEL "F/E boundary :" AUTOID AT (10 110)
POPUPTRIGGER "" ID poptrigPrefFEboundID
AT (70 PREVTOP+2 AUTO AUTO)
LEFTANCHOR
LIST "3rd digit" "4th digit" "5th digit" "6th digit" "7th digit"
"8th digit" "9th digit" "10th digit"
ID listPrefFEboundID
AT (PREVLEFT PREVBOTTOM 45 AUTO)
NONUSABLE VISIBLEITEMS 8
POPUPLIST ID poptrigPrefFEboundID listPrefFEboundID
BUTTON "cancel" ID buttonPrefCancelID AT (70 140 AUTO AUTO)
BUTTON "O.K." ID buttonPrefOkID AT (PREVRIGHT+4 140 PREVWIDTH AUTO)
END
FORM ID formEditProgID AT (0 0 160 160)
NOFRAME
USABLE
MENUID menuEditProgID
HELPID helpEditProgID
BEGIN
TITLE "PCal - Edit Program"
LABEL "Title:" AUTOID AT (10 17) FONT 1
FIELD ID fieldEditProgTitleID AT (PREVLEFT PREVBOTTOM+3 130 12)
USABLE EDITABLE UNDERLINED MAXCHARS 32-1
LABEL "Code:" AUTOID AT (PREVLEFT PREVBOTTOM+5) FONT 1
FIELD ID fieldEditProgCodeID AT (PREVLEFT PREVBOTTOM+3 130 69)
USABLE EDITABLE MULTIPLELINES UNDERLINED MAXCHARS 512-1
SCROLLBAR scrollbarEditProgCodeID AT (140 PREVTOP 7 PREVHEIGHT)
BUTTON "Cancel" ID buttonEditProgCancelID AT (70 140 AUTO AUTO)
BUTTON "O.K." ID buttonEditProgOkID AT (PREVRIGHT+4 PREVTOP PREVWIDTH AUTO)
GRAFFITISTATEINDICATOR AT (5 144)
END
MENU ID menuEditProgID
BEGIN
PULLDOWN "Insert"
BEGIN
MENUITEM "@INPEXPR" menuitemEditProgInsInpexprID "1"
MENUITEM "@DISP" menuitemEditProgInsDispID "2"
MENUITEM "@SETEXPR" menuitemEditProgInsSetexprID "3"
MENUITEM "@EVAL" menuitemEditProgInsEvalID "4"
MENUITEM "@STMEM" menuitemEditProgInsStmemID "5"
END
PULLDOWN "Edit"
BEGIN
MENUITEM "Undo" menuitemCommonEditUndoID "U"
MENUITEM "Cut" menuitemCommonEditCutID "X"
MENUITEM "Copy" menuitemCommonEditCopyID "C"
MENUITEM "Paste" menuitemCommonEditPasteID "P"
MENUITEM "Select all" menuitemCommonEditSelAllID "S"
END
PULLDOWN "Help"
BEGIN
MENUITEM "Command" menuitemEditProgHelpID "H"
END
END
STRING helpEditProgID
" *** COMMAND LIST ***\n" \
"\n" \
"@SETEXPR \"...\"\n" \
" Set the expression to the expression field.\n" \
"\n" \
"@EVAL\n" \
" Evaluate the expression and store its answer to $ANS.\n" \
"\n" \
"@DISP \"...\"\n" \
" Display the string in the answer field.\n" \
"\n" \
"@INPEXPR\n" \
" Prompt a user to input a value.\n" \
"\n" \
"@STMEM n (n=1-9)\n" \
" Store $ANS to $MEMn."
FORM ID formEditConstID AT (0 0 160 160)
NOFRAME
USABLE
MENUID menuEditConstID
BEGIN
TITLE "PCal - Edit constant"
LABEL "Symbol:" AUTOID AT (20 20) FONT 1
FIELD ID fieldEditConstSymbolID AT (PREVLEFT PREVBOTTOM+3 120 12)
USABLE EDITABLE UNDERLINED MAXCHARS 16-1
LABEL "Description:" AUTOID AT (PREVLEFT PREVBOTTOM+10) FONT 1
FIELD ID fieldEditConstDescID AT (PREVLEFT PREVBOTTOM+3 120 12)
USABLE EDITABLE UNDERLINED MAXCHARS 32-1
LABEL "Value:" AUTOID AT (PREVLEFT PREVBOTTOM+10) FONT 1
FIELD ID fieldEditConstValueID AT (PREVLEFT PREVBOTTOM+3 120 12)
USABLE EDITABLE UNDERLINED MAXCHARS 32-1
BUTTON "Cancel" ID buttonEditConstCancelID AT (70 140 AUTO AUTO)
BUTTON "O.K." ID buttonEditConstOkID AT (PREVRIGHT+4 PREVTOP PREVWIDTH AUTO)
GRAFFITISTATEINDICATOR AT (5 144)
END
MENU ID menuEditConstID
BEGIN
PULLDOWN "Edit"
BEGIN
MENUITEM "Undo" menuitemCommonEditUndoID "U"
MENUITEM "Cut" menuitemCommonEditCutID "X"
MENUITEM "Copy" menuitemCommonEditCopyID "C"
MENUITEM "Paste" menuitemCommonEditPasteID "P"
MENUITEM "Select all" menuitemCommonEditSelAllID "S"
END
END
FORM ID formSelectProgID AT (0 0 160 160)
NOFRAME
USABLE
BEGIN
TITLE "PCal - Select Program"
LIST "" ID listSelectProgTitleID AT (15 25 125 99)
BUTTON "Add" ID buttonSelectProgAddID AT (8 142 AUTO AUTO)
BUTTON "Del." ID buttonSelectProgDelID AT (PREVRIGHT+4 PREVTOP AUTO AUTO)
BUTTON "Edit" ID buttonSelectProgEditID AT (PREVRIGHT+4 PREVTOP AUTO AUTO)
BUTTON "O.K." ID buttonSelectProgOkID AT (121 PREVTOP AUTO AUTO)
END
FORM ID formSelectConstID AT (0 0 160 160)
NOFRAME
USABLE
BEGIN
TITLE "PCal - Select Constant"
LIST "" ID listSelectConstDescID AT (15 25 125 99)
BUTTON "Add" ID buttonSelectConstAddID AT (8 142 AUTO AUTO)
BUTTON "Del." ID buttonSelectConstDelID AT (PREVRIGHT+4 PREVTOP AUTO AUTO)
BUTTON "Edit" ID buttonSelectConstEditID AT (PREVRIGHT+4 PREVTOP AUTO AUTO)
BUTTON "O.K." ID buttonSelectConstOkID AT (121 PREVTOP AUTO AUTO)
END
VERSION ID 1 "2.01"
ICON "PCalc.bmp"
SMALLICON "PCalc_s.bmp"
ALERT ID alertAboutID
INFORMATION
BEGIN
TITLE "About PrettyCalc"
MESSAGE "Pretty Calculator.\n\n" \
" - Yoichi KAZAMA\n" \
" - v2.01\n" \
" - 20 Mar., 2001\n\n"
BUTTONS "O.K."
END
ALERT ID alertInformID
INFORMATION
BEGIN
TITLE "Information"
MESSAGE "^1\n^2\n^3\n"
BUTTONS "O.K."
END
ALERT ID alertConfirmID
CONFIRMATION
BEGIN
TITLE "Confirmation"
MESSAGE "^1\n^2\n^3\n"
BUTTONS "Cancel" "O.K."
END