mirror of
https://github.com/TTimo/doom3.gpl.git
synced 2026-03-20 00:49:30 +01:00
hello world
This commit is contained in:
Timothee 'TTimo' Besset
363
neo/tools/guied/GEItemScriptsDlg.cpp
Normal file
363
neo/tools/guied/GEItemScriptsDlg.cpp
Normal file
@@ -0,0 +1,363 @@
|
||||
/*
|
||||
===========================================================================
|
||||
|
||||
Doom 3 GPL Source Code
|
||||
Copyright (C) 1999-2011 id Software LLC, a ZeniMax Media company.
|
||||
|
||||
This file is part of the Doom 3 GPL Source Code (?Doom 3 Source Code?).
|
||||
|
||||
Doom 3 Source Code is free software: you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation, either version 3 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
Doom 3 Source Code is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with Doom 3 Source Code. If not, see <http://www.gnu.org/licenses/>.
|
||||
|
||||
In addition, the Doom 3 Source Code is also subject to certain additional terms. You should have received a copy of these additional terms immediately following the terms and conditions of the GNU General Public License which accompanied the Doom 3 Source Code. If not, please request a copy in writing from id Software at the address below.
|
||||
|
||||
If you have questions concerning this license or the applicable additional terms, you may contact in writing id Software LLC, c/o ZeniMax Media Inc., Suite 120, Rockville, Maryland 20850 USA.
|
||||
|
||||
===========================================================================
|
||||
*/
|
||||
|
||||
#include "../../idlib/precompiled.h"
|
||||
#pragma hdrstop
|
||||
|
||||
#include "../../sys/win32/rc/guied_resource.h"
|
||||
|
||||
#include "GEApp.h"
|
||||
#include "GEPropertyPage.h"
|
||||
|
||||
LRESULT CALLBACK GEScriptEdit_WndProc ( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam )
|
||||
{
|
||||
WNDPROC wndproc = (WNDPROC) GetWindowLong ( hwnd, GWL_USERDATA );
|
||||
|
||||
switch ( msg )
|
||||
{
|
||||
case WM_CHAR:
|
||||
if ( wParam == VK_ESCAPE )
|
||||
{
|
||||
SendMessage ( GetParent ( hwnd ), WM_CLOSE, 0, 0 );
|
||||
}
|
||||
break;
|
||||
|
||||
case WM_GETDLGCODE:
|
||||
return DLGC_WANTALLKEYS;
|
||||
}
|
||||
|
||||
return CallWindowProc ( wndproc, hwnd, msg, wParam, lParam );
|
||||
}
|
||||
|
||||
bool GEItescriptsDlg_Init ( HWND hwnd )
|
||||
{
|
||||
idWindow* window;
|
||||
rvGEWindowWrapper* wrapper;
|
||||
HWND script;
|
||||
|
||||
// Extract the window pointer from the win32 windows user data long
|
||||
window = (idWindow*)GetWindowLong ( hwnd, GWL_USERDATA );
|
||||
assert ( window );
|
||||
|
||||
// Get the window wrapper of the script window
|
||||
wrapper = rvGEWindowWrapper::GetWrapper ( window );
|
||||
assert ( wrapper );
|
||||
|
||||
// Get the edit box used to edit the script
|
||||
script = GetDlgItem ( hwnd, IDC_GUIED_SCRIPT );
|
||||
|
||||
UINT tabsize = 16;
|
||||
SendMessage ( script, EM_SETTABSTOPS, 1, (LPARAM)&tabsize );
|
||||
SetWindowLong ( script, GWL_USERDATA, GetWindowLong ( script, GWL_WNDPROC ) );
|
||||
SetWindowLong ( script, GWL_WNDPROC, (LONG) GEScriptEdit_WndProc );
|
||||
|
||||
TEXTMETRIC tm;
|
||||
HDC dc;
|
||||
dc = GetDC ( script );
|
||||
GetTextMetrics ( dc, &tm );
|
||||
ReleaseDC ( script, dc );
|
||||
|
||||
LOGFONT lf;
|
||||
ZeroMemory ( &lf, sizeof(lf) );
|
||||
lf.lfHeight = tm.tmHeight;
|
||||
strcpy ( lf.lfFaceName, "Courier New" );
|
||||
|
||||
SendMessage ( script, WM_SETFONT, (WPARAM)CreateFontIndirect ( &lf ), 0 );
|
||||
|
||||
SendMessage ( script, EM_SETMARGINS, EC_LEFTMARGIN|EC_RIGHTMARGIN, MAKELONG(10,10) );
|
||||
|
||||
int i;
|
||||
|
||||
for ( i = 0; i < wrapper->GetVariableDict().GetNumKeyVals ( ); i ++ )
|
||||
{
|
||||
const idKeyValue* key = wrapper->GetVariableDict().GetKeyVal ( i );
|
||||
|
||||
SendMessage ( script, EM_SETSEL, -1, -1 );
|
||||
SendMessage ( script, EM_REPLACESEL, FALSE, (LPARAM)key->GetKey().c_str() );
|
||||
SendMessage ( script, EM_SETSEL, -1, -1 );
|
||||
SendMessage ( script, EM_REPLACESEL, FALSE, (LPARAM)"\t" );
|
||||
SendMessage ( script, EM_SETSEL, -1, -1 );
|
||||
SendMessage ( script, EM_REPLACESEL, FALSE, (LPARAM)key->GetValue().c_str() );
|
||||
SendMessage ( script, EM_SETSEL, -1, -1 );
|
||||
SendMessage ( script, EM_REPLACESEL, FALSE, (LPARAM)"\r\n" );
|
||||
}
|
||||
|
||||
if ( i )
|
||||
{
|
||||
SendMessage ( script, EM_SETSEL, -1, -1 );
|
||||
SendMessage ( script, EM_REPLACESEL, FALSE, (LPARAM)"\r\n" );
|
||||
}
|
||||
|
||||
for ( i = 0; i < wrapper->GetScriptDict().GetNumKeyVals ( ); i ++ )
|
||||
{
|
||||
const idKeyValue* key = wrapper->GetScriptDict().GetKeyVal ( i );
|
||||
|
||||
SendMessage ( script, EM_SETSEL, -1, -1 );
|
||||
SendMessage ( script, EM_REPLACESEL, FALSE, (LPARAM)va("%s\r\n", key->GetKey().c_str() ) );
|
||||
SendMessage ( script, EM_SETSEL, -1, -1 );
|
||||
SendMessage ( script, EM_REPLACESEL, FALSE, (LPARAM)key->GetValue().c_str() );
|
||||
SendMessage ( script, EM_SETSEL, -1, -1 );
|
||||
SendMessage ( script, EM_REPLACESEL, FALSE, (LPARAM)"\r\n\r\n" );
|
||||
}
|
||||
|
||||
SendMessage ( script, EM_SETSEL, 0, 0 );
|
||||
SendMessage ( script, EM_SCROLLCARET, 0, 0 );
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
bool GEItescriptsDlg_Apply ( HWND hwnd )
|
||||
{
|
||||
idWindow* window;
|
||||
rvGEWindowWrapper* wrapper;
|
||||
HWND script;
|
||||
|
||||
// Extract the window pointer from the win32 windows user data long
|
||||
window = (idWindow*)GetWindowLong ( hwnd, GWL_USERDATA );
|
||||
assert ( window );
|
||||
|
||||
// Get the window wrapper of the script window
|
||||
wrapper = rvGEWindowWrapper::GetWrapper ( window );
|
||||
assert ( wrapper );
|
||||
|
||||
// Get the edit box used to edit the script
|
||||
script = GetDlgItem ( hwnd, IDC_GUIED_SCRIPT );
|
||||
|
||||
GETTEXTLENGTHEX textLen;
|
||||
int chars;
|
||||
textLen.flags = GTL_DEFAULT|GTL_USECRLF;
|
||||
textLen.codepage = CP_ACP;
|
||||
chars = SendMessage ( script, EM_GETTEXTLENGTHEX, (WPARAM)&textLen, 0 );
|
||||
|
||||
char* text = new char[chars+1];
|
||||
|
||||
GETTEXTEX getText;
|
||||
getText.cb = chars+1;
|
||||
getText.codepage = CP_ACP;
|
||||
getText.flags = GT_DEFAULT|GT_USECRLF;
|
||||
getText.lpDefaultChar = NULL;
|
||||
getText.lpUsedDefChar = NULL;
|
||||
SendMessage ( script, EM_GETTEXTEX, (WPARAM)&getText, (LPARAM)text );
|
||||
|
||||
idStr parse = text;
|
||||
delete[] text;
|
||||
|
||||
try
|
||||
{
|
||||
idParser src ( parse, parse.Length(), "", LEXFL_ALLOWMULTICHARLITERALS | LEXFL_NOSTRINGCONCAT | LEXFL_ALLOWBACKSLASHSTRINGCONCAT );
|
||||
idToken token;
|
||||
|
||||
wrapper->GetVariableDict().Clear ( );
|
||||
wrapper->GetScriptDict().Clear ( );
|
||||
|
||||
while ( src.ReadToken ( &token ) )
|
||||
{
|
||||
idStr scriptName;
|
||||
idStr out;
|
||||
|
||||
if ( !token.Icmp ("definevec4") )
|
||||
{
|
||||
idToken token2;
|
||||
idStr result;
|
||||
|
||||
if ( !src.ReadToken ( &token2 ) )
|
||||
{
|
||||
src.Error ( "expected define name" );
|
||||
return false;
|
||||
}
|
||||
|
||||
idWinVec4 var;
|
||||
idUserInterfaceLocal ui;
|
||||
idWindow tempwin ( &ui );
|
||||
idStr out;
|
||||
int i;
|
||||
|
||||
src.SetMarker ( );
|
||||
for ( i = 0; i < 3; i ++ )
|
||||
{
|
||||
tempwin.ParseExpression ( &src, &var );
|
||||
src.ExpectTokenString(",");
|
||||
}
|
||||
|
||||
tempwin.ParseExpression ( &src, &var );
|
||||
src.GetStringFromMarker ( out, true );
|
||||
|
||||
wrapper->GetVariableDict().Set ( token + "\t\"" + token2 + "\"", out );
|
||||
|
||||
continue;
|
||||
}
|
||||
else if ( !token.Icmp ( "definefloat" ) || !token.Icmp ( "float" ) )
|
||||
{
|
||||
idToken token2;
|
||||
idStr result;
|
||||
|
||||
if ( !src.ReadToken ( &token2 ) )
|
||||
{
|
||||
src.Error ( "expected define name" );
|
||||
return false;
|
||||
}
|
||||
|
||||
idWinFloat var;
|
||||
idUserInterfaceLocal ui;
|
||||
idWindow tempwin ( &ui );
|
||||
idStr out;
|
||||
|
||||
src.SetMarker ( );
|
||||
tempwin.ParseExpression ( &src, &var );
|
||||
src.GetStringFromMarker ( out, true );
|
||||
|
||||
wrapper->GetVariableDict().Set ( token + "\t\"" + token2 + "\"", out );
|
||||
|
||||
continue;
|
||||
}
|
||||
// If the token is a scriptdef then just parse out the
|
||||
// braced section and add it to the list. Right now only
|
||||
// one scriptdef per window is supported
|
||||
else if ( !token.Icmp ( "scriptdef" ) )
|
||||
{
|
||||
scriptName = "scriptDef";
|
||||
}
|
||||
else if ( !token.Icmp ( "ontime" ) )
|
||||
{
|
||||
if ( !src.ReadToken ( &token ) )
|
||||
{
|
||||
src.Error ( "expected time" );
|
||||
return false;
|
||||
}
|
||||
|
||||
scriptName = "onTime ";
|
||||
scriptName.Append ( token );
|
||||
}
|
||||
else if ( !token.Icmp ( "onevent" ) )
|
||||
{
|
||||
if ( !src.ReadToken ( &token ) )
|
||||
{
|
||||
src.Error ( "expected time" );
|
||||
return false;
|
||||
}
|
||||
|
||||
scriptName = "onEvent ";
|
||||
scriptName.Append ( token );
|
||||
}
|
||||
else
|
||||
{
|
||||
int i;
|
||||
|
||||
for( i = 0; i < idWindow::SCRIPT_COUNT; i ++ )
|
||||
{
|
||||
if ( idStr::Icmp ( idWindow::ScriptNames[i], token ) == 0 )
|
||||
{
|
||||
scriptName = idWindow::ScriptNames[i];
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
if ( i >= idWindow::SCRIPT_COUNT )
|
||||
{
|
||||
src.Error ( "expected script name" );
|
||||
return false;
|
||||
}
|
||||
}
|
||||
|
||||
if ( !src.ParseBracedSectionExact ( out, 1) )
|
||||
{
|
||||
return false;
|
||||
}
|
||||
|
||||
wrapper->GetScriptDict().Set ( scriptName, out );
|
||||
}
|
||||
}
|
||||
catch ( idException &e )
|
||||
{
|
||||
MessageBox ( hwnd, e.error, "Script Error", MB_OK|MB_ICONERROR);
|
||||
return false;
|
||||
}
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
INT_PTR CALLBACK GEItescriptsDlg_WndProc ( HWND hwnd, UINT msg, WPARAM wParam, LPARAM lParam )
|
||||
{
|
||||
switch ( msg )
|
||||
{
|
||||
case WM_INITDIALOG:
|
||||
SetWindowLong ( hwnd, GWL_USERDATA, lParam );
|
||||
GEItescriptsDlg_Init ( hwnd );
|
||||
|
||||
gApp.GetOptions().GetWindowPlacement ( "scripts", hwnd );
|
||||
|
||||
// Let it fall through so the scripts window gets resized.
|
||||
|
||||
case WM_SIZE:
|
||||
{
|
||||
RECT rClient;
|
||||
GetClientRect ( hwnd, &rClient );
|
||||
MoveWindow ( GetDlgItem ( hwnd, IDC_GUIED_SCRIPT ),
|
||||
rClient.left, rClient.top,
|
||||
rClient.right - rClient.left,
|
||||
rClient.bottom - rClient.top,
|
||||
FALSE );
|
||||
break;
|
||||
}
|
||||
|
||||
case WM_ERASEBKGND:
|
||||
return TRUE;
|
||||
|
||||
|
||||
case WM_CLOSE:
|
||||
if ( !GEItescriptsDlg_Apply ( hwnd ) )
|
||||
{
|
||||
return TRUE;
|
||||
}
|
||||
gApp.GetOptions().SetWindowPlacement ( "scripts", hwnd );
|
||||
EndDialog ( hwnd, 1 );
|
||||
break;
|
||||
}
|
||||
|
||||
return FALSE;
|
||||
}
|
||||
|
||||
/*
|
||||
================
|
||||
GEItemScriptsDlg_DoModal
|
||||
|
||||
Starts the item properties dialog
|
||||
================
|
||||
*/
|
||||
bool GEItemScriptsDlg_DoModal ( HWND parent, idWindow* window )
|
||||
{
|
||||
LoadLibrary ( "Riched20.dll" );
|
||||
|
||||
if ( DialogBoxParam ( gApp.GetInstance(), MAKEINTRESOURCE(IDD_GUIED_SCRIPTS), parent, GEItescriptsDlg_WndProc, (LPARAM) window ) )
|
||||
{
|
||||
return true;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user