clipswin.rc

NASA 开发使用的一个专家系统

#include "ids.h"
#include "windows.h"

MainMenu MENU 
{
 POPUP "&File"
 {
  MENUITEM "&Load Constructs...\tCtrl+L", IDM_FILE_LOAD
  MENUITEM "Load &Batch...", IDM_FILE_LBATCH
  MENUITEM "Load B&inary Image...", IDM_FILE_LBINARY
  MENUITEM "Turn Dribble On...", IDM_FILE_DRIBBLE
  MENUITEM SEPARATOR
  MENUITEM "Save Binary...", IDM_FILE_SBINARY
  MENUITEM "&Editor...\tCtrl+E", IDM_FILE_EDITOR
  MENUITEM SEPARATOR
  MENUITEM "&Quit CLIPS\tCtrl+Q", IDM_FILE_QUIT
 }

 POPUP "&Edit"
 {
  MENUITEM "&Paste\tCtrl+V", IDM_EDIT_PASTE
  MENUITEM SEPARATOR
  MENUITEM "&Complete...\tCtrl+J", IDM_HELP_COMPLETE
 }

 POPUP "E&xecution"
 {
  MENUITEM "R&eset\tCtrl+U", IDM_EXE_RESET
  MENUITEM "&Run\tCtrl+R", IDM_EXE_RUN
  MENUITEM "&Step\tCtrl+T", IDM_EXE_STEP
  MENUITEM SEPARATOR
  MENUITEM "&Watch...\tCtrl+W", IDM_EXE_WATCH
  MENUITEM "&Options...", IDM_EXE_OPTIONS
  MENUITEM "&Preferences...", IDM_EXE_PREFERENCES
  MENUITEM SEPARATOR
  MENUITEM "&Clear CLIPS", IDM_EXE_CLEAR
 }

 POPUP "B&rowse"
 {
  POPUP "&Module"
  {
   MENUITEM "Item", IDM_MODULE_ONE
  }

  MENUITEM SEPARATOR
  MENUITEM "Def&rule Manager...", IDM_BROWSE_RULE, GRAYED
  MENUITEM "Def&facts Manager...", IDM_BROWSE_FACTS, GRAYED
  MENUITEM "Def&template Manager...", IDM_BROWSE_TEMPLATE, GRAYED
  MENUITEM "Def&function Manager ...", IDM_BROWSE_FUNCTION, GRAYED
  MENUITEM "Defg&lobal Manager ...", IDM_BROWSE_GLOBAL, GRAYED
  MENUITEM "Def&generic Manager...", IDM_BROWSE_GENERIC, GRAYED
  MENUITEM "Def&class Manager...", IDM_BROWSE_CLASS, GRAYED
  MENUITEM "Def&instances Manager...", IDM_BROWSE_INSTANCES, GRAYED
  MENUITEM "&Agenda Manager...", IDM_BROWSE_AGENDA, GRAYED
 }

 POPUP "&Window"
 {
  MENUITEM "&Facts Window", IDM_WIN_FACTS, GRAYED
  MENUITEM "&Agenda Window", IDM_WIN_AGENDA, GRAYED
  MENUITEM "&Instances Window", IDM_WIN_INSTANCE, GRAYED
  MENUITEM "&Globals Window", IDM_WIN_GLOBALS, GRAYED
  MENUITEM "&Focus Window", IDM_WIN_FOCUS, GRAYED
  MENUITEM SEPARATOR
  MENUITEM "&All Above", IDM_WIN_ALL
  MENUITEM "&None", IDM_WIN_NONE
  MENUITEM SEPARATOR
  MENUITEM "&Clear Dialog Window", IDM_WIN_CLEAR
 }

 POPUP "\a&Help"
 {
  MENUITEM "&About CLIPS 6.05", IDM_HELP_ABOUT
  MENUITEM "&CLIPS Help", IDM_HELP_CLIPS
  MENUITEM SEPARATOR
  MENUITEM "&Command Complete...\tCtrl+J", IDM_HELP_COMPLETE
 }

}

Main_Accelerator ACCELERATORS 
BEGIN
	"^L", IDM_FILE_LOAD
	"^S", IDM_FILE_SAVE
	"^E", IDM_FILE_EDITOR
	"^Q", IDM_FILE_QUIT
	"^R", IDM_EXE_RUN
	"^T", IDM_EXE_STEP
	"^W", IDM_EXE_WATCH
	"^C", IDM_EXE_HALT
	"^C", IDM_EXE_HALT_NOW, VIRTKEY, SHIFT
	"^J", IDM_HELP_COMPLETE, ASCII, NOINVERT
	"^U", IDM_EXE_RESET
	"^V", IDM_EDIT_PASTE
/*        VK_CANCEL, IDM_EXE_HALT, VIRTKEY, CONTROL  */
END

OptionDlg DIALOG 18, 21, 142, 77
STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION
CAPTION "Preferences"
BEGIN
	CHECKBOX "&Enable Professor Joe Warnings", IDC_WARN_JOE, 11, 5, 121, 11, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Command Completion Dialog", IDC_PREF_COMPLETE, 11, 18, 121, 10, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	LTEXT "&Step Rule Firing Increment:", -1, 11, 38, 91, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
	CONTROL "1", IDC_EDIT, "EDIT", ES_LEFT | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_TABSTOP, 106, 37, 18, 12
	PUSHBUTTON "&Cancel", IDC_CANCEL, 23, 59, 37, 13, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	DEFPUSHBUTTON "&OK", IDC_OK, 82, 59, 37, 13, WS_CHILD | WS_VISIBLE | WS_TABSTOP
END

List_Manager DIALOG -121, -48, 243, 188
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION
CAPTION "List Manager"
BEGIN
	CONTROL "IDC_LISTBOX", IDC_LISTBOX, "LISTBOX", LBS_STANDARD | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_CHILD | WS_VISIBLE | WS_TABSTOP, 5, 13, 155, 167
	PUSHBUTTON "&Remove", IDC_PBUTTON1, 167, 12, 68, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "Refresh", IDC_PBUTTON2, 167, 32, 68, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "&Matches", IDC_PBUTTON3, 167, 52, 68, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "&Pprint", IDC_PBUTTON4, 167, 72, 68, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "Msg. Handlers...", IDC_PBUTTON5, 167, 92, 68, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Watch", IDC_CBOX1, 167, 113, 64, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "Watch &Activation", IDC_CBOX2, 167, 130, 72, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "Watch &Slot Changes", IDC_CBOX3, 167, 147, 74, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	DEFPUSHBUTTON "&Done", IDC_PBUTTON6, 167, 166, 68, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CTEXT "", IDC_TEXT, 5, 3, 155, 8, WS_CHILD | WS_VISIBLE | WS_GROUP
END

WatchDlg DIALOG 34, 22, 161, 145
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION
CAPTION "Watch Options"
BEGIN
	CHECKBOX "C&ompilations", IDC_WATCH_COMPILE, 8, 5, 56, 13, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Deffunctions", IDC_WATCH_DEFFUN, 82, 5, 60, 11, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Facts", IDC_WATCH_FACTS, 8, 18, 28, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Generic Functions", IDC_WATCH_GENERIC, 82, 18, 68, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Rules", IDC_WATCH_RULES, 8, 31, 28, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Methods", IDC_WATCH_METHOD, 82, 31, 44, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Statistics", IDC_WATCH_STATS, 8, 44, 58, 11, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Instances", IDC_WATCH_INSTANCE, 82, 44, 47, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "A&ctivations", IDC_WATCH_ACTIVE, 8, 57, 51, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Slots", IDC_WATCH_SLOT, 82, 57, 31, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Focus", IDC_WATCH_FOCUS, 8, 70, 44, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "Message-&handlers", IDC_WATCH_MSGHANDLER, 82, 70, 70, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Globals", IDC_WATCH_GLOBAL, 8, 83, 44, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Messages", IDC_WATCH_MESSAGE, 82, 83, 47, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "&All", IDC_WATCH_ALL, 36, 103, 34, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "&None", IDC_WATCH_NONE, 92, 103, 34, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "&Cancel", IDC_CANCEL, 36, 127, 33, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	DEFPUSHBUTTON "&OK", IDC_OK, 92, 127, 34, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CONTROL "", -1, "static", SS_GRAYFRAME | WS_CHILD | WS_VISIBLE, 0, 121, 161, 1
END

Exec_Option DIALOG 13, 25, 206, 139
STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION
CAPTION "Execution Options"
BEGIN
	LTEXT "&Salience Evaluation:", -1, 26, 13, 67, 9, WS_CHILD | WS_VISIBLE | WS_GROUP
	LTEXT "S&trategy:", -1, 64, 29, 29, 9
	CONTROL "", IDC_EXE_SALIENCE, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_TABSTOP, 101, 11, 72, 44
	CONTROL "", IDC_EXE_STRATEGY, "COMBOBOX", CBS_DROPDOWNLIST | CBS_SORT | WS_CHILD | WS_VISIBLE | WS_VSCROLL | WS_TABSTOP, 101, 28, 72, 87
	CHECKBOX "&Static Constraint Checking", IDC_EXE_STATIC, 5, 51, 119, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Dynamic Constraint Checking", IDC_EXE_DYNAMIC, 5, 65, 107, 11, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "Reset &Global Variables", IDC_EXE_GLOBAL, 5, 79, 107, 11, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "Sequence &Expansion Operator Recognition", IDC_EXE_SEQUENCE, 5, 93, 148, 11, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Incremental Reset", IDC_EXE_RESET, 129, 51, 83, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Auto-Float Dividend", IDC_EXE_AUTO, 129, 65, 82, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	CHECKBOX "&Fact Duplication", IDC_EXE_FACT, 129, 79, 65, 12, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "&Cancel", IDC_CANCEL, 51, 118, 40, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "&OK", IDC_OK, 115, 118, 40, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
END

AboutBox DIALOG 18, 22, 118, 108
STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION
CAPTION "About CLIPS 6.0"
{
 CTEXT "CLIPS Version 6.05", -1, 39, 31, 40, 25, WS_CHILD | WS_VISIBLE | WS_GROUP
 CONTROL "10-28-97", -1, "STATIC", WS_CHILD | WS_VISIBLE | WS_GROUP, 45, 63, 28, 8
 PUSHBUTTON "&OK", IDC_OK, 45, 82, 28, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
 ICON "Clips_Icon", -1, 51, 5, 16, 16, WS_CHILD | WS_VISIBLE
}

NOMOJO DIALOG 32, 21, 157, 71
   STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION
   CAPTION "CLIPS Message"
   BEGIN
      PUSHBUTTON "&Yes, Joe", IDC_OK, 50, 55, 45, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
      DEFPUSHBUTTON "&No, Joe", IDC_CANCEL, 108, 55, 46, 14, WS_CHILD | WS_VISIBLE | WS_TABSTOP
      LTEXT "", IDC_EDIT, 50, 6, 102, 44
   END

Agenda_Manager DIALOG 23, 15, 211, 171
STYLE DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
CAPTION "Agenda Manager - 0 Items"
BEGIN
	CONTROL "IDC_LISTBOX", IDC_LISTBOX, "LISTBOX", LBS_NOTIFY | LBS_HASSTRINGS | LBS_DISABLENOSCROLL | WS_CHILD | WS_VISIBLE | WS_BORDER | WS_VSCROLL | WS_TABSTOP, 3, 3, 155, 163
	PUSHBUTTON "&Remove", IDC_PBUTTON1, 166, 5, 42, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "&Fire", IDC_PBUTTON4, 166, 80, 42, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
	PUSHBUTTON "&Done", IDC_PBUTTON6, 166, 149, 42, 15, WS_CHILD | WS_VISIBLE | WS_TABSTOP
END

STRINGTABLE 
BEGIN
	IDS_RULES, "CLIPS Files(*.CLP)|*.CLP|All Files(*.*)|*.*|"
	IDS_BATCH, "Batch Files (*.BAT)|*.BAT|All Files (*.*)|*.*|"
	IDS_BINARY, "Binary Files (*.BIN)|*.BIN|All Files (*.*)|*.*|"
	IDS_DRIBBLE, "Dribble Files (*.OUT)|*.OUT|All Files (*.*)|*.*|"
END

Clips_Icon ICON clipswin.ico
Joe_Bitmap BITMAP joe.bmp

CLIPS_WAIT CURSOR "wait.cur"
CLIPS_QUERY CURSOR "query.cur"
CURSOR0 CURSOR "1.cur"
CURSOR1 CURSOR "2.cur"
CURSOR2 CURSOR "3.cur"
CURSOR3 CURSOR "4.cur"
CURSOR4 CURSOR "5.cur"
CURSOR5 CURSOR "6.cur"
CURSOR6 CURSOR "7.cur"
CURSOR7 CURSOR "8.cur"
CURSOR8 CURSOR "9.cur"