本篇是游戲腳本的實現（4）的續篇。
add_script將行為列表框中選中的行為添加到腳本列表框中：
//-----------------------------------------------------------------------------------
// Add script.
//-----------------------------------------------------------------------------------
void add_script()
{
long sel;
// make sure an action is selected
if((sel = (long)get_listbox_selected(g_action_wnd)) == LB_ERR)
return;
// create a new script and add it
SCRIPT_PTR script = g_action_template.create_script(sel);
g_modify_script = script;
// call the modify script dialog
g_show_cancel = TRUE;
if(DialogBox(NULL, MAKEINTRESOURCE(IDD_MODIFY), g_hwnd, modify_dialog_proc))
{
// add script to link list
script->next = g_root_script;
if(g_root_script != NULL)
g_root_script->prev = script;
g_root_script = script;
// display script text
char text[2048];
ACTION_PTR act_ptr = g_action_template.get_action(sel);
g_action_template.expand_action_text(text, script);
add_string_to_listbox(g_script_wnd, text);
// add pointer to script address listbox
sprintf(text, "%lu", script);
add_string_to_listbox(g_script_addr_wnd, text);
// increase count
g_num_script++;
}
else
delete script;
}
insert_script將行為列表框中選中的行為腳本添加到腳本列表框中選中腳本的上方：
//-----------------------------------------------------------------------------------
// Insert script.
//-----------------------------------------------------------------------------------
void insert_script()
{
int act_index, script_index;
// get location to insert action
if((script_index = (int)get_listbox_selected(g_script_wnd)) == LB_ERR)
return;
// make sure an action is selected
if((act_index = (int)get_listbox_selected(g_action_wnd)) == LB_ERR)
return;
// create a new script
SCRIPT_PTR script = g_action_template.create_script(act_index);
g_modify_script = script;
// call the modify script dialog
g_show_cancel = TRUE;
if(DialogBox(NULL, MAKEINTRESOURCE(IDD_MODIFY), g_hwnd, modify_dialog_proc))
{
// add the script to link list
script->prev = NULL;
script->next = g_root_script;
g_root_script->prev = script;
g_root_script = script;
char text[2048];
// display script action text
ACTION_PTR act_ptr = g_action_template.get_action(act_index);
g_action_template.expand_action_text(text, script);
insert_string_to_listbox(g_script_wnd, script_index, text);
// add pointer to script address listbox
sprintf(text, "%lu", script);
insert_string_to_listbox(g_script_addr_wnd, script_index, text);
g_num_script++;
}
else
delete script;
}
delete_script用于刪除腳本列表框中的一條腳本：
//-----------------------------------------------------------------------------------
// Delete script.
//-----------------------------------------------------------------------------------
void delete_script()
{
int sel;
// make sure there is a selection
if((sel = (int)get_listbox_selected(g_script_wnd)) == LB_ERR)
return;
char text[2048];
// get pointer to script entry
get_listbox_text(g_script_addr_wnd, sel, text);
SCRIPT_PTR script = (SCRIPT_PTR) atol(text);
// remove script from linked list
if(script->prev)
script->prev->next = script->next;
else
g_root_script = script->next;
if(script->next)
script->next->prev = script->prev;
script->next = NULL; // so whole list is not deleted
delete script;
// clear from script and script list
delete_listbox_string(g_script_wnd, sel);
delete_listbox_string(g_script_addr_wnd, sel);
g_num_script--;
}
move_up_script和move_down_script分別將腳本上移和下移一行：
//-----------------------------------------------------------------------------------
// Move up script.
//-----------------------------------------------------------------------------------
void move_up_script()
{
int sel;
// make sure there is a selection
if((sel = (int)get_listbox_selected(g_script_wnd)) == LB_ERR)
return;
// make sure it is not topmost selection
if(sel == 0)
return;
char text[2048];
get_listbox_text(g_script_wnd, sel, text);
delete_listbox_string(g_script_wnd, sel);
insert_string_to_listbox(g_script_wnd, sel-1, text);
get_listbox_text(g_script_addr_wnd, sel, text);
delete_listbox_string(g_script_addr_wnd, sel);
insert_string_to_listbox(g_script_addr_wnd, sel-1, text);
set_listbox_selected(g_script_wnd, sel-1);
}
//-----------------------------------------------------------------------------------
// Move down script.
//-----------------------------------------------------------------------------------
void move_down_script()
{
int sel;
// make sure there is a selection
if((sel = (int)get_listbox_selected(g_script_wnd)) == LB_ERR)
return;
// make sure it is not bottommost selection
if(sel >= count_listbox(g_script_wnd)-1)
return;
char text[2048];
get_listbox_text(g_script_wnd, sel, text);
delete_listbox_string(g_script_wnd, sel);
insert_string_to_listbox(g_script_wnd, sel+1, text);
get_listbox_text(g_script_addr_wnd, sel, text);
delete_listbox_string(g_script_addr_wnd, sel);
insert_string_to_listbox(g_script_addr_wnd, sel+1, text);
set_listbox_selected(g_script_wnd, sel+1);
}
修改腳本對話框的窗口處理過程通過modify_dialog_proc來實現：
//-----------------------------------------------------------------------------------
// The DialogProc function is an application-defined callback function used with the CreateDialog
// and DialogBox families of functions. It processes messages sent to a modal or modeless dialog box.
// The DLGPROC type defines a pointer to this callback function. DialogProc is a placeholder for
// the application-defined function name.
//
// INT_PTR CALLBACK DialogProc(HWND hwndDlg,
// UINT uMsg,
// WPARAM wParam,
// LPARAM lParam
// );
//
// hwndDlg:
// [in] Handle to the dialog box.
// uMsg:
// [in] Specifies the message.
// wParam:
// [in] Specifies additional message-specific information.
// lParam:
// [in] Specifies additional message-specific information.
//
// Return Value:
// Typically, the dialog box procedure should return TRUE if it processed the message,
// and FALSE if it did not. If the dialog box procedure returns FALSE, the dialog manager performs
// the default dialog operation in response to the message.
//
// If the dialog box procedure processes a message that requires a specific return value,
// the dialog box procedure should set the desired return value by calling
// SetWindowLong(hwndDlg, DWL_MSGRESULT, lResult) immediately before returning TRUE.
// Note that you must call SetWindowLong immediately before returning TRUE; doing so earlier may
// result in the DWL_MSGRESULT value being overwritten by a nested dialog box message.
//
// The following messages are exceptions to the general rules stated above. Consult the documentation
// for the specific message for details on the semantics of the return value.
//
// WM_CHARTOITEM
// WM_COMPAREITEM
// WM_CTLCOLORBTN
// WM_CTLCOLORDLG
// WM_CTLCOLOREDIT
// WM_CTLCOLORLISTBOX
// WM_CTLCOLORSCROLLBAR
// WM_CTLCOLORSTATIC
// WM_INITDIALOG
// WM_QUERYDRAGICON
// WM_VKEYTOITEM
//
// Remarks:
// You should use the dialog box procedure only if you use the dialog box class for the dialog box.
// This is the default class and is used when no explicit class is specified in the dialog box template.
// Although the dialog box procedure is similar to a window procedure, it must not call the DefWindowProc
// function to process unwanted messages. Unwanted messages are processed internally by the dialog box
// window procedure.
//-----------------------------------------------------------------------------------
BOOL CALLBACK modify_dialog_proc(HWND dlg, UINT msg_id, WPARAM word_param, LPARAM long_param)
{
static long entry_index = 0;
switch(msg_id)
{
case WM_INITDIALOG:
if(g_modify_script == NULL) // return an error if there is no script to modify
{
// The EndDialog function destroys a modal dialog box, causing the system to end any processing
// for the dialog box.
//
// BOOL EndDialog(HWND hDlg,
// INT_PTR nResult
// );
//
// hDlg:
// [in] Handle to the dialog box to be destroyed.
//
// nResult:
// [in] Specifies the value to be returned to the application from the function that created
// the dialog box.
//
// Return Value:
// If the function succeeds, the return value is nonzero.
//
// If the function fails, the return value is zero. To get extended error information,
// call GetLastError.
EndDialog(dlg, FALSE);
return FALSE;
}
// edit first entry
entry_index = 0;
// display entry text
set_modify_dialog(dlg, g_modify_script, entry_index);
// show or hide cancel button
ShowWindow(GetDlgItem(dlg, IDC_CANCEL), g_show_cancel);
if(g_show_cancel == FALSE)
{
ShowWindow(GetDlgItem(dlg, IDC_OK), false);
ShowWindow(GetDlgItem(dlg, IDC_OK2), true);
}
else
ShowWindow(GetDlgItem(dlg, IDC_OK2), false);
return TRUE;
case WM_COMMAND:
switch(LOWORD(word_param))
{
case IDC_OK:
case IDC_OK2:
update_entry(dlg, g_modify_script, entry_index);
EndDialog(dlg, TRUE);
return TRUE;
case IDC_CANCEL:
EndDialog(dlg, FALSE);
return TRUE;
case IDC_PREV:
// only bother if not first entry
if(entry_index > 0)
{
// apply changes
// go to previous entry
update_entry(dlg, g_modify_script, entry_index);
entry_index--;
set_modify_dialog(dlg, g_modify_script, entry_index);
}
break;
case IDC_NEXT:
// only bother if not last entry
if(entry_index < g_modify_script->num_entries-1)
{
// apply changes
// go to next entry
update_entry(dlg, g_modify_script, entry_index);
entry_index++;
set_modify_dialog(dlg, g_modify_script, entry_index);
}
break;
}
}
return FALSE;
}
不同的條目類型修改腳本的對話框外觀也不相同，這是通過set_modify_dialog函數來實現:
//-----------------------------------------------------------------------------------
// Set information for dialog to be modified.
//-----------------------------------------------------------------------------------
void set_modify_dialog(HWND dlg, SCRIPT_PTR script, long entry_index)
{
char text[2048];
// display full action text
g_action_template.expand_action_text(text, script);
SetWindowText(GetDlgItem(dlg, IDC_ACTIONTEXT), text);
// get control handle
HWND pre_wnd = GetDlgItem(dlg, IDC_PREV);
HWND next_wnd = GetDlgItem(dlg, IDC_NEXT);
HWND text_wnd = GetDlgItem(dlg, IDC_TEXT);
HWND choice_wnd = GetDlgItem(dlg, IDC_CHOICE);
HWND true_wnd = GetDlgItem(dlg, IDC_TRUE);
HWND false_wnd = GetDlgItem(dlg, IDC_FALSE);
HWND min_wnd = GetDlgItem(dlg, IDC_MIN);
HWND max_wnd = GetDlgItem(dlg, IDC_MAX);
HWND value_wnd = GetDlgItem(dlg, IDC_VALUE);
HWND static_min_wnd = GetDlgItem(dlg, IDC_STATIC_MIN);
HWND static_max_wnd = GetDlgItem(dlg, IDC_STATIC_MAX);
HWND static_value_wnd = GetDlgItem(dlg, IDC_STATIC_VALUE);
HWND num_wnd = GetDlgItem(dlg, IDC_NUM);
HWND frame_wnd = GetDlgItem(dlg, IDC_FRAME);
// hide all controls
ShowWindow(pre_wnd, FALSE);
ShowWindow(next_wnd, FALSE);
ShowWindow(text_wnd, FALSE);
ShowWindow(choice_wnd, FALSE);
ShowWindow(true_wnd, FALSE);
ShowWindow(false_wnd, FALSE);
ShowWindow(min_wnd, FALSE);
ShowWindow(max_wnd, FALSE);
ShowWindow(value_wnd, FALSE);
ShowWindow(static_min_wnd, FALSE);
ShowWindow(static_max_wnd, FALSE);
ShowWindow(static_value_wnd, FALSE);
// clear information
SetWindowText(num_wnd, "");
SetWindowText(frame_wnd, " No Entries ");
// get pointer to action
ACTION_PTR act_ptr = g_action_template.get_action(script->action_index);
// return if no entries to edit
if(act_ptr->num_entries_rule == 0)
return;
if(act_ptr->num_entries_rule > 1)
{
ShowWindow(pre_wnd, TRUE);
ShowWindow(next_wnd, TRUE);
}
sprintf(text, "%lu of %lu", entry_index+1, act_ptr->num_entries_rule);
SetWindowText(num_wnd, text);
EnableWindow(num_wnd, TRUE);
// enable and set specific fields based on entry type
switch(script->entries[entry_index].type)
{
case ENTRY_TEXT:
SetWindowText(frame_wnd, " Text entry ");
if(script->entries[entry_index].text)
SetWindowText(text_wnd, script->entries[entry_index].text);
ShowWindow(text_wnd, TRUE);
EnableWindow(text_wnd, TRUE);
break;
case ENTRY_BOOL:
SetWindowText(frame_wnd, " Boolean entry ");
if(script->entries[entry_index].bool_value)
{
set_button_state(true_wnd, BST_CHECKED);
set_button_state(false_wnd, BST_UNCHECKED);
}
else
{
set_button_state(true_wnd, BST_UNCHECKED);
set_button_state(false_wnd, BST_CHECKED);
}
ShowWindow(true_wnd, TRUE);
ShowWindow(false_wnd, TRUE);
break;
case ENTRY_INT:
SetWindowText(frame_wnd, " Integer entry ");
sprintf(text, "%lu", act_ptr->entries_rule[entry_index].long_min);
SetWindowText(min_wnd, text);
sprintf(text, "%lu", act_ptr->entries_rule[entry_index].long_max);
SetWindowText(max_wnd, text);
sprintf(text, "%lu", script->entries[entry_index].long_value);
SetWindowText(value_wnd, text);
ShowWindow(min_wnd, TRUE);
ShowWindow(max_wnd, TRUE);
ShowWindow(value_wnd, TRUE);
ShowWindow(static_min_wnd, TRUE);
ShowWindow(static_max_wnd, TRUE);
ShowWindow(static_value_wnd, TRUE);
break;
case ENTRY_FLOAT:
SetWindowText(frame_wnd, " Float entry ");
sprintf(text, "%lu", act_ptr->entries_rule[entry_index].float_min);
SetWindowText(min_wnd, text);
sprintf(text, "%lu", act_ptr->entries_rule[entry_index].float_max);
SetWindowText(max_wnd, text);
sprintf(text, "%lu", script->entries[entry_index].float_value);
SetWindowText(value_wnd, text);
ShowWindow(min_wnd, TRUE);
ShowWindow(max_wnd, TRUE);
ShowWindow(value_wnd, TRUE);
ShowWindow(static_min_wnd, TRUE);
ShowWindow(static_max_wnd, TRUE);
ShowWindow(static_value_wnd, TRUE);
break;
case ENTRY_CHOICE:
SetWindowText(frame_wnd, " Choice entry ");
reset_combo_content(choice_wnd);
if(act_ptr->entries_rule[entry_index].num_choices)
{
for(long i = 0; i < act_ptr->entries_rule[entry_index].num_choices; i++)
add_string_to_combo(choice_wnd, act_ptr->entries_rule[entry_index].choices[i]);
set_combo_cur_sel(choice_wnd, script->entries[entry_index].selection);
ShowWindow(choice_wnd, TRUE);
}
break;
}
}
布爾型：
整型或浮點型：
多重選項型：
文本型：
腳本信息的更新通過update_entry來實現：
//-----------------------------------------------------------------------------------
// Update script entries.
//-----------------------------------------------------------------------------------
void update_entry(HWND dlg, SCRIPT_PTR script, long entry_index)
{
// get pointer to action
ACTION_PTR act_ptr = g_action_template.get_action(script->action_index);
// return if no entries to update or incorrect entry index
if(act_ptr->num_entries_rule == 0 || entry_index >= script->num_entries)
return;
const int size = 2048;
char text[size];
ENTRY& r_entry = script->entries[entry_index];
ENTRY_RULE& r_entry_rule = act_ptr->entries_rule[entry_index];
// update fields based on type
switch(r_entry_rule.type)
{
case ENTRY_TEXT:
// delete old text
delete[] r_entry.text;
r_entry.text = NULL;
r_entry.length = 0;
GetWindowText(GetDlgItem(dlg, IDC_TEXT), text, size);
if(text)
{
r_entry.length = (long)strlen(text) + 1;
r_entry.text = new char[r_entry.length];
strcpy(r_entry.text, text);
}
break;
case ENTRY_BOOL:
// choose TRUE or FALSE from radio button
if(get_button_state(GetDlgItem(dlg, IDC_TRUE)) == BST_CHECKED)
r_entry.bool_value = TRUE;
else
r_entry.bool_value = FALSE;
break;
case ENTRY_INT:
// get int value and bounds check with min/max
GetWindowText(GetDlgItem(dlg, IDC_VALUE), text, size);
r_entry.long_value = atol(text);
if(r_entry.long_value < r_entry_rule.long_min)
r_entry.long_value = r_entry_rule.long_min;
if(r_entry.long_value > r_entry_rule.long_max)
r_entry.long_value = r_entry_rule.long_max;
break;
case ENTRY_FLOAT:
// get int value and bounds check with min/max
GetWindowText(GetDlgItem(dlg, IDC_VALUE), text, size);
r_entry.float_value = (float)atof(text);
if(r_entry.float_value < r_entry_rule.float_min)
r_entry.float_value = r_entry_rule.float_min;
if(r_entry.float_value > r_entry_rule.float_max)
r_entry.float_value = r_entry_rule.float_max;
break;
case ENTRY_CHOICE:
// store choice selection
r_entry.selection = (long)get_combo_cur_sel(GetDlgItem(dlg, IDC_CHOICE));
break;
}
}
截圖：
下載源碼與工程