wxNotebook Problem - Full Source
OK here is the full surce. Perhaps now someone can help me.
without type_check
without warning
include wxeud.e
constant SAVE_ALL_FILES = new_id(),
FROST_OPTIONS = new_id(),
MAKE_EXE = new_id(),
EDIT_GAME = new_id(),
TEST_PLAY = new_id(),
DEBUG_GAME = new_id(),
GAME_OPTIONS = new_id(),
MUSIC_PLAYER = new_id(),
DRAWING_EDITOR = new_id(),
CODING_EDITOR = new_id(),
MAP_EDITOR = new_id(),
EVENT_EDITOR = new_id(),
FROST_HELP = new_id(),
FROST_TUTORIAL = new_id(),
FROST_WEBSITE = new_id(),
PLAY = new_id(),
STOP = new_id(),
PAUSE = new_id(),
REPEAT = new_id(),
MUSIC_HELP = new_id(),
PEN = new_id(),
AIRBRUSH = new_id(),
LINE = new_id(),
CIRCLE = new_id(),
FILL = new_id(),
EYEDROPPER = new_id(),
ERASER = new_id(),
BOX = new_id(),
BLUR = new_id(),
TEXTURIZE = new_id(),
LIGHTNING = new_id(),
SHAWDOW = new_id(),
ROTATE90 = new_id(),
ROTATE180 = new_id(),
ROTATE360 = new_id(),
SKEW = new_id(),
TRANSPARENT = new_id(),
TRANSLUCENT = new_id(),
FLIPHORT = new_id(),
FLIPVERT = new_id(),
DRAWHELP = new_id(),
CREATEPALETTE = new_id(),
EDITPALETTE = new_id(),
SELECTPALETTE = new_id(),
IMPORTPALETTE = new_id(),
EXPORTPALETTE = new_id(),
RUNPROGRAM = new_id(),
DEBUGPROGRAM = new_id(),
AUTOCOMPLETE = new_id(),
SYNTAXCOLORING = new_id(),
EDITOROPTIONS = new_id(),
CODEHELP = new_id(),
MAPHELP = new_id(),
MAPOPTIONS = new_id()
constant Win = create(wxFrame,{0,-1,"Frost Editor - DarkScar
Games",-1,-1,640,480}),
Win2 = create(wxFrame,{0,-1,"New Project",-1,-1,640,480}),
Win3 = create(wxFrame,{0,-1,"Edit Project",-1,-1,640,480}),
Win4 = create(wxFrame,{0,-1,"Music Player",-1,-1,640,480}),
Win5 = create(wxFrame,{0,-1,"Drawing Editor",-1,-1,640,480}),
Win6 = create(wxFrame,{0,-1,"Coding Editor",-1,-1,640,480}),
Win7 = create(wxFrame,{0,-1,"Map Editor",-1,-1,640,480}),
Win8 = create(wxFrame,{0,-1,"Frost Options",-1,-1,640,480}),
Win9 = create(wxFrame,{0,-1,"Map Options",-1,-1,640,480}),
Win10 = create(wxFrame,{0,-1,"Test Play",-1,-1,640,480}),
Win11 = create(wxFrame,{0,-1,"Debug",-1,-1,320,200}),
Win12 = create(wxFrame,{0,-1,"Event",-1,-1,500,500}),
Win13 = create(wxFrame,{0,-1,"Event Editor",-1,-1,640,480}),
win = create(wxPanel,{Win}),
win2 = create(wxPanel,{Win3,-1,-1,-1,-1,-1,wxSUNKEN_BORDER + wxTAB_TRAVERSAL}),
win3 = create(wxPanel,{Win2}),
win4 = create(wxPanel,{Win8,-1,-1,-1,-1,-1,wxSUNKEN_BORDER + wxTAB_TRAVERSAL}),
win5 = create(wxPanel,{Win9,-1,-1,-1,-1,-1,wxSUNKEN_BORDER + wxTAB_TRAVERSAL}),
win6 = create(wxPanel,{Win4}),
win7 = create(wxPanel,{Win5}),
win8 = create(wxPanel,{Win6}),
win9 = create(wxPanel,{Win7}),
win10 = create(wxPanel,{Win10}),
win11 = create(wxPanel,{Win11}),
win12 = create(wxPanel,{Win12,-1,-1,-1,-1,-1,wxSUNKEN_BORDER +
wxTAB_TRAVERSAL}),
win13 = create(wxPanel,{Win13})
constant MenuBar = create(wxMenuBar,{Win}),
File = create(wxMenu,{MenuBar,"&File"}),
File_New_Project = create(wxMenuItem,{File,wxID_NEW,"New Project"}),
File_Open_Project = create(wxMenuItem,{File,wxID_OPEN,"Open Project"}),
File_Close_Project = create(wxMenuItem,{File,wxID_CLOSE,"Close Project"}),
File_Sep = create(wxMenuItem,{File,wxID_SEPARATOR,"-"}),
File_Save = create(wxMenuItem,{File,wxID_SAVE,"Save Project"}),
File_Save_As = create(wxMenuItem,{File,wxID_SAVEAS,"Save As Project"}),
File_Save_All_Files = create(wxMenuItem,{File,SAVE_ALL_FILES,"Save All Files"}),
File_Sep2 = create(wxMenuItem,{File,wxID_SEPARATOR,"-"}),
File_Frost = create(wxMenuItem,{File,FROST_OPTIONS,"Frost Options"}),
File_Sep3 = create(wxMenuItem,{File,wxID_SEPARATOR,"-"}),
File_Make = create(wxMenuItem,{File,MAKE_EXE,"Make Exe"}),
File_Sep4 = create(wxMenuItem,{File,wxID_SEPARATOR,"-"}),
File_Exit = create(wxMenuItem,{File,wxID_EXIT,"Exit"})
constant Frost = create(wxMenu,{MenuBar,"&Frost"}),
Edit_Game = create(wxMenuItem,{Frost,EDIT_GAME,"Edit Game"})
constant TestPlay = create(wxMenu,{MenuBar,"&TestPlay"}),
Test_Play = create(wxMenuItem,{TestPlay,TEST_PLAY,"Play Game"}),
Test_Debug = create(wxMenuItem,{TestPlay,DEBUG_GAME,"Debug Game"}),
Test_Option = create(wxMenuItem,{TestPlay,GAME_OPTIONS,"Game Options"})
constant Tools = create(wxMenu,{MenuBar,"&Tools"}),
Tool_Music = create(wxMenuItem,{Tools,MUSIC_PLAYER,"Music Player"}),
Tool_Draw = create(wxMenuItem,{Tools,DRAWING_EDITOR,"Drawing Editor"}),
Tool_Code = create(wxMenuItem,{Tools,CODING_EDITOR,"Coding Editor"}),
Tool_Map = create(wxMenuItem,{Tools,MAP_EDITOR,"Map Editor"}),
Tool_Event = create(wxMenuItem,{Tools,EVENT_EDITOR,"Event Editor"})
constant Help = create(wxMenu,{MenuBar,"&Help"}),
Help_Frost = create(wxMenuItem,{Help,FROST_HELP,"Frost Help"}),
Help_Tut = create(wxMenuItem,{Help,FROST_TUTORIAL,"Frost Tutorial"}),
Help_Web = create(wxMenuItem,{Help,FROST_WEBSITE,"Frost Website"}),
Help_Sep = create(wxMenuItem,{Help,wxID_SEPARATOR,"-"}),
Help_About = create(wxMenuItem,{Help,wxID_ABOUT,"About Frost"})
constant MusicMenu = create(wxMenuBar,{Win4}),
File_Music = create(wxMenu,{MusicMenu,"&File"}),
File_Music_Open = create(wxMenuItem,{File_Music,wxID_OPEN,"Open"}),
File_Music_Close = create(wxMenuItem,{File_Music,wxID_CLOSE,"Close"}),
File_Music_Sep = create(wxMenuItem,{File_Music,wxID_SEPARATOR,"-"}),
File_Music_Play = create(wxMenuItem,{File_Music,PLAY,"Play"}),
File_Music_Stop = create(wxMenuItem,{File_Music,STOP,"Stop"}),
File_Music_Pause = create(wxMenuItem,{File_Music,PAUSE,"Pause"}),
File_Music_Repeat = create(wxMenuItem,{File_Music,REPEAT,"Repeat"}),
File_Music_Sep2 = create(wxMenuItem,{File_Music,wxID_SEPARATOR,"-"}),
File_Music_Exit = create(wxMenuItem,{File_Music,wxID_EXIT,"Exit"})
constant Help_Music = create(wxMenu,{MusicMenu,"&Help"}),
Help_Music_Now = create(wxMenuItem,{Help_Music,MUSIC_HELP,"Music Help"})
constant DrawMenu = create(wxMenuBar,{Win5}),
File_Draw = create(wxMenu,{DrawMenu,"&File"}),
File_Draw_New = create(wxMenuItem,{File_Draw,wxID_NEW,"New"}),
File_Draw_Open = create(wxMenuItem,{File_Draw,wxID_OPEN,"Open"}),
File_Draw_Close = create(wxMenuItem,{File_Draw,wxID_CLOSE,"Close"}),
File_Draw_Sep = create(wxMenuItem,{File_Draw,wxID_SEPARATOR,"-"}),
File_Draw_Save = create(wxMenuItem,{File_Draw,wxID_SAVE,"Save"}),
File_Draw_SaveAs = create(wxMenuItem,{File_Draw,wxID_SAVEAS,"Save As"}),
File_Draw_Sep2 = create(wxMenuItem,{File_Draw,wxID_SEPARATOR,"-"}),
File_Draw_Exit = create(wxMenuItem,{File_Draw,wxID_EXIT,"Exit"})
constant Edit_Draw = create(wxMenu,{DrawMenu,"&Edit"}),
Edit_Draw_Undo = create(wxMenuItem,{Edit_Draw,wxID_UNDO,"Undo"}),
Edit_Draw_Redo = create(wxMenuItem,{Edit_Draw,wxID_REDO,"Redo"}),
Edit_Draw_Sep = create(wxMenuItem,{Edit_Draw,wxID_SEPARATOR,"-"}),
Edit_Draw_Cut = create(wxMenuItem,{Edit_Draw,wxID_CUT,"Cut"}),
Edit_Draw_Copy = create(wxMenuItem,{Edit_Draw,wxID_COPY,"Copy"}),
Edit_Draw_Paste = create(wxMenuItem,{Edit_Draw,wxID_PASTE,"Paste"}),
Edit_Draw_Clear = create(wxMenuItem,{Edit_Draw,wxID_CLEAR,"Clear"}),
Edit_Draw_Sep2 = create(wxMenuItem,{Edit_Draw,wxID_SEPARATOR,"-"}),
Edit_Draw_Select = create(wxMenuItem,{Edit_Draw,wxID_SELECTALL,"Select All"})
constant Tool_Draw2 = create(wxMenu,{DrawMenu,"&Tools"}),
Tool_Draw_Pen = create(wxMenuItem,{Tool_Draw2,PEN,"Pen"}),
Tool_Draw_Air = create(wxMenuItem,{Tool_Draw2,AIRBRUSH,"Airbrush"}),
Tool_Draw_Lin = create(wxMenuItem,{Tool_Draw2,LINE,"Line"}),
Tool_Draw_Cir = create(wxMenuItem,{Tool_Draw2,CIRCLE,"Circle"}),
Tool_Draw_Fil = create(wxMenuItem,{Tool_Draw2,FILL,"Fill"}),
Tool_Draw_Era = create(wxMenuItem,{Tool_Draw2,ERASER,"Eraser"}),
Tool_Draw_Eye = create(wxMenuItem,{Tool_Draw2,EYEDROPPER,"Eyedropper"}),
Tool_Draw_Box = create(wxMenuItem,{Tool_Draw2,BOX,"Box"})
constant Color_Draw = create(wxMenu,{DrawMenu,"&Color"}),
Color_Draw_Create = create(wxMenuItem,{Color_Draw,CREATEPALETTE,"Create
Palette"}),
Color_Draw_Edit = create(wxMenuItem,{Color_Draw,EDITPALETTE,"Edit Palette"}),
Color_Draw_Sel = create(wxMenuItem,{Color_Draw,SELECTPALETTE,"Select Palette"}),
Color_Draw_Imp = create(wxMenuItem,{Color_Draw,IMPORTPALETTE,"Import Palette"}),
Color_Draw_Exp = create(wxMenuItem,{Color_Draw,EXPORTPALETTE,"Export Palette"})
constant Advance_Draw = create(wxMenu,{DrawMenu,"&Advance"}),
Advance_Draw_Blur = create(wxMenuItem,{Advance_Draw,BLUR,"Blur"}),
Advance_Draw_Text = create(wxMenuItem,{Advance_Draw,TEXTURIZE,"Texturize"}),
Advance_Draw_Shaw = create(wxMenuItem,{Advance_Draw,SHAWDOW,"Shadow"}),
Advance_Draw_Ligh = create(wxMenuItem,{Advance_Draw,LIGHTNING,"Lightning"}),
Advance_Draw_Skew = create(wxMenuItem,{Advance_Draw,SKEW,"Skew"}),
Advance_Draw_Rot = create(wxMenuItem,{Advance_Draw,ROTATE90,"Rotate 90"}),
Advance_Draw_Rot2 = create(wxMenuItem,{Advance_Draw,ROTATE180,"Rotate 180"}),
Advance_Draw_Rot3 = create(wxMenuItem,{Advance_Draw,ROTATE360,"Rotate 360"}),
Advance_Draw_Trans =
create(wxMenuItem,{Advance_Draw,TRANSPARENT,"Transparent"}),
Advance_Draw_Trans2 =
create(wxMenuItem,{Advance_Draw,TRANSLUCENT,"Translucent"}),
Advance_Draw_Flip = create(wxMenuItem,{Advance_Draw,FLIPVERT,"Flip Vertical"}),
Advance_Draw_Flip2 = create(wxMenuItem,{Advance_Draw,FLIPHORT,"Flip
Horizontal"})
constant Help_Draw = create(wxMenu,{DrawMenu,"&Help"}),
Help_Draw_Now = create(wxMenuItem,{Help_Draw,DRAWHELP,"Draw Help"})
constant CodeMenu = create(wxMenuBar,{Win6}),
Code_File = create(wxMenu,{CodeMenu,"&File"}),
Code_File_New = create(wxMenuItem,{Code_File,wxID_NEW,"New"}),
Code_File_Open = create(wxMenuItem,{Code_File,wxID_OPEN,"Open"}),
Code_File_Close = create(wxMenuItem,{Code_File,wxID_CLOSE,"Close"}),
Code_File_Sep = create(wxMenuItem,{Code_File,wxID_SEPARATOR,"-"}),
Code_File_Save = create(wxMenuItem,{Code_File,wxID_SAVE,"Save"}),
Code_File_SaveAs = create(wxMenuItem,{Code_File,wxID_SAVEAS,"Save As"}),
Code_File_Sep2 = create(wxMenuItem,{Code_File,wxID_SEPARATOR,"-"}),
Code_File_Exit = create(wxMenuItem,{Code_File,wxID_EXIT,"Exit"})
constant Edit_Code = create(wxMenu,{CodeMenu,"&Edit"}),
Edit_Code_Undo = create(wxMenuItem,{Edit_Code,wxID_UNDO,"Undo"}),
Edit_Code_Redo = create(wxMenuItem,{Edit_Code,wxID_REDO,"Redo"}),
Edit_Code_Sep = create(wxMenuItem,{Edit_Code,wxID_SEPARATOR,"-"}),
Edit_Code_Cut = create(wxMenuItem,{Edit_Code,wxID_CUT,"Cut"}),
Edit_Code_Copy = create(wxMenuItem,{Edit_Code,wxID_COPY,"Copy"}),
Edit_Code_Paste = create(wxMenuItem,{Edit_Code,wxID_PASTE,"Paste"}),
Edit_Code_Clear = create(wxMenuItem,{Edit_Code,wxID_CLEAR,"Clear"}),
Edit_Code_Sep2 = create(wxMenuItem,{Edit_Code,wxID_SEPARATOR,"-"}),
Edit_Code_Select = create(wxMenuItem,{Edit_Code,wxID_SELECTALL,"Select All"})
constant Run_Code = create(wxMenu,{CodeMenu,"&Run"}),
Run_Code_Program = create(wxMenuItem,{Run_Code,RUNPROGRAM,"Run"}),
Run_Code_Debug = create(wxMenuItem,{Run_Code,DEBUGPROGRAM,"Debug"})
constant Option_Code = create(wxMenu,{CodeMenu,"&Options"}),
Option_Code_Auto = create(wxMenuItem,{Option_Code,AUTOCOMPLETE,"Auto
Complete"}),
Option_Code_Syntax = create(wxMenuItem,{Option_Code,SYNTAXCOLORING,"Syntax
Coloring"}),
Option_Code_Editor = create(wxMenuItem,{Option_Code,EDITOROPTIONS,"Editor
Options"})
constant Help_Code = create(wxMenu,{CodeMenu,"&Help"}),
Help_Code_Now = create(wxMenuItem,{Help_Code,CODEHELP,"Code Help"})
constant MapMenu = create(wxMenuBar,{Win7}),
Map_File = create(wxMenu,{MapMenu,"&File"}),
Map_File_New = create(wxMenuItem,{Map_File,wxID_NEW,"New"}),
Map_File_Open = create(wxMenuItem,{Map_File,wxID_OPEN,"Open"}),
Map_File_Close = create(wxMenuItem,{Map_File,wxID_CLOSE,"Close"}),
Map_File_Sep = create(wxMenuItem,{Map_File,wxID_SEPARATOR,"-"}),
Map_File_Save = create(wxMenuItem,{Map_File,wxID_SAVE,"Save"}),
Map_File_SaveAs = create(wxMenuItem,{Map_File,wxID_SAVEAS,"Save As"}),
Map_File_Sep2 = create(wxMenuItem,{Map_File,wxID_SEPARATOR,"-"}),
Map_File_Exit = create(wxMenuItem,{Map_File,wxID_EXIT,"Exit"})
constant Map_Edit = create(wxMenu,{MapMenu,"&Edit"}),
Map_Edit_Undo = create(wxMenuItem,{Map_Edit,wxID_UNDO,"Undo"}),
Map_Edit_Redo = create(wxMenuItem,{Map_Edit,wxID_REDO,"Redo"}),
Map_Edit_Sep = create(wxMenuItem,{Map_Edit,wxID_SEPARATOR,"-"}),
Map_Edit_Cut = create(wxMenuItem,{Map_Edit,wxID_CUT,"Cut"}),
Map_Edit_Copy = create(wxMenuItem,{Map_Edit,wxID_COPY,"Copy"}),
Map_Edit_Paste = create(wxMenuItem,{Map_Edit,wxID_PASTE,"Paste"}),
Map_Edit_Clear = create(wxMenuItem,{Map_Edit,wxID_CLEAR,"Clear"}),
Map_Edit_Sep2 = create(wxMenuItem,{Map_Edit,wxID_SEPARATOR,"-"}),
Map_Edit_Select = create(wxMenuItem,{Map_Edit,wxID_SELECTALL,"Select All"})
constant Map_Tool = create(wxMenu,{MapMenu,"&Tools"}),
Map_Tool_Pen = create(wxMenuItem,{Map_Tool,PEN,"Pen"}),
Map_Tool_Air = create(wxMenuItem,{Map_Tool,AIRBRUSH,"Airbrush"}),
Map_Tool_Lin = create(wxMenuItem,{Map_Tool,LINE,"Line"}),
Map_Tool_Cir = create(wxMenuItem,{Map_Tool,CIRCLE,"Circle"}),
Map_Tool_Fil = create(wxMenuItem,{Map_Tool,FILL,"Fill"}),
Map_Tool_Box = create(wxMenuItem,{Map_Tool,BOX,"Box"}),
Map_Tool_Era = create(wxMenuItem,{Map_Tool,ERASER,"Eraser"}),
Map_Tool_Eye = create(wxMenuItem,{Map_Tool,EYEDROPPER,"Eyedropper"})
constant Map_Color = create(wxMenu,{MapMenu,"&Color"}),
Map_Color_Create = create(wxMenuItem,{Map_Color,CREATEPALETTE,"Create
Palette"}),
Map_Color_Edit = create(wxMenuItem,{Map_Color,EDITPALETTE,"Edit Palette"}),
Map_Color_Select = create(wxMenuItem,{Map_Color,SELECTPALETTE,"Select
Palette"}),
Map_Color_Import = create(wxMenuItem,{Map_Color,IMPORTPALETTE,"Import
Palette"}),
Map_Color_Export = create(wxMenuItem,{Map_Color,EXPORTPALETTE,"Export Palette"})
constant Map_Advance = create(wxMenu,{MapMenu,"&Advance"}),
Map_Advance_Blur = create(wxMenuItem,{Map_Advance,BLUR,"Blur"}),
Map_Advance_Text = create(wxMenuItem,{Map_Advance,TEXTURIZE,"Texturize"}),
Map_Advance_Shao = create(wxMenuItem,{Map_Advance,SHAWDOW,"Shadow"}),
Map_Advance_Ligh = create(wxMenuItem,{Map_Advance,LIGHTNING,"Lightning"}),
Map_Advance_Skew = create(wxMenuItem,{Map_Advance,SKEW,"Skew"}),
Map_Advance_Rot = create(wxMenuItem,{Map_Advance,ROTATE90,"Rotate 90"}),
Map_Advance_Rot2 = create(wxMenuItem,{Map_Advance,ROTATE180,"Rotate 180"}),
Map_Advance_Rot3 = create(wxMenuItem,{Map_Advance,ROTATE360,"Rotate 360"}),
Map_Advance_Trans = create(wxMenuItem,{Map_Advance,TRANSPARENT,"Transparent"}),
Map_Advance_Trans2 = create(wxMenuItem,{Map_Advance,TRANSLUCENT,"Translucent"}),
Map_Advance_Flip = create(wxMenuItem,{Map_Advance,FLIPVERT,"Flip Vertical"}),
Map_Advance_Flip2 = create(wxMenuItem,{Map_Advance,FLIPHORT,"Flip Horizontal"})
constant Map_Option = create(wxMenu,{MapMenu,"&Options"}),
Map_Option_Now = create(wxMenuItem,{Map_Option,MAPOPTIONS,"Map Options"})
constant Map_Help = create(wxMenu,{MapMenu,"&Help"}),
Map_Help_Now = create(wxMenuItem,{Map_Help,MAPHELP,"Map Help"})
constant Sizer = create(wxBoxSizer,{wxHORIZONTAL}),
Tab = create(wxNotebook,{win4,-1,-1,-1,-1,-1, wxCLIP_CHILDREN+wxNB_TOP}),
Tab_Pan = create(wxPanel,{Tab}),
Tab_Pan2 = create(wxPanel,{Tab}),
Tab_Pan3 = create(wxPanel,{Tab}),
Tab_Pan4 = create(wxPanel,{Tab}),
Tab_Pan5 = create(wxPanel,{Tab}),
Tab_Pan6 = create(wxPanel,{Tab}),
Tab_Pan_Box = create(wxBoxSizer,{wxHORIZONTAL}),
Tab_Pan_Box2 = create(wxBoxSizer,{wxHORIZONTAL}),
Tab_Pan_Box3 = create(wxBoxSizer,{wxHORIZONTAL}),
Tab_Pan_Box4 = create(wxBoxSizer,{wxHORIZONTAL}),
Tab_Pan_Box5 = create(wxBoxSizer,{wxHORIZONTAL}),
Tab_Pan_Box6 = create(wxBoxSizer,{wxHORIZONTAL})
constant Edit_Sizer = create(wxBoxSizer,{wxHORIZONTAL}),
Edit_Tab = create(wxNotebook,{win2,-1,-1,-1,-1,-1, wxCLIP_CHILDREN+wxNB_TOP}),
Edit_Tab_Pan = create(wxPanel,{Edit_Tab}),
Edit_Tab_Box = create(wxBoxSizer,{wxHORIZONTAL})
constant Map_Sizer = create(wxBoxSizer,{wxHORIZONTAL}),
Map_Tab = create(wxNotebook,{win5,-1,-1,-1,-1,-1, wxCLIP_CHILDREN+wxNB_TOP}),
Map_Tab_Pan = create(wxPanel,{Map_Tab}),
Map_Tab_Box = create(wxBoxSizer,{wxHORIZONTAL})
constant Event_Sizer = create(wxBoxSizer,{wxHORIZONTAL}),
Event_Tab = create(wxNotebook,{win12,-1,-1,-1,-1,-1, wxCLIP_CHILDREN+wxNB_TOP}),
Event_Tab_Pan = create(wxPanel,{Event_Tab}),
Event_Tab_Box = create(wxBoxSizer,{wxHORIZONTAL})
add_page(Event_Tab,Event_Tab_Pan,"Page 1",0,0)
add_page(Event_Tab,Event_Tab_Pan,"Page 2",0,0)
add_page(Event_Tab,Event_Tab_Pan,"Page 3",0,0)
add_page(Event_Tab,Event_Tab_Pan,"Page 4",0,0)
add_page(Map_Tab,Map_Tab_Pan,"Map Options",0,0)
add_page(Map_Tab,Map_Tab_Pan,"Map Battle Options",0,0)
add_page(Map_Tab,Map_Tab_Pan,"Saving Options",0,0)
add_page(Map_Tab,Map_Tab_Pan,"Map Music",0,0)
add_page(Map_Tab,Map_Tab_Pan,"Map Size",0,0)
add_page(Map_Tab,Map_Tab_Pan,"Map Code",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Heroes",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Enemies",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Bosses",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Rigs",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Items",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Elements",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Attributes",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Weapons/Armor",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Npcs",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Attacks",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Spells",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Skills",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Menu System",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Battle System",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Dungeons",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Mini Games",0,0)
add_page(Edit_Tab,Edit_Tab_Pan,"Classes",0,0)
add_page(Tab,Tab_Pan,"Frost Options",0,0)
add_page(Tab,Tab_Pan2,"Game Options",0,0)
add_page(Tab,Tab_Pan3,"Day&&Night",0,0)
add_page(Tab,Tab_Pan4,"Frost Coder",0,0)
add_page(Tab,Tab_Pan5,"Plugins",0,0)
add_page(Tab,Tab_Pan6,"Misc",0,0)
add_window_to_sizer(Sizer,Tab,1,wxGROW+wxTOP,0)
set_sizer(Tab_Pan,Tab_Pan_Box)
set_sizer(Tab_Pan2,Tab_Pan_Box2)
set_sizer(Tab_Pan3,Tab_Pan_Box3)
set_sizer(Tab_Pan4,Tab_Pan_Box4)
set_sizer(Tab_Pan5,Tab_Pan_Box5)
set_sizer(Tab_Pan6,Tab_Pan_Box6)
set_sizer(win4,Sizer)
set_sizer(Edit_Tab_Pan,Edit_Tab_Box)
add_window_to_sizer(Edit_Sizer,Edit_Tab,1,wxGROW+wxTOP,0)
set_sizer(win2,Edit_Sizer)
set_sizer(Map_Tab,Map_Tab_Box)
add_window_to_sizer(Map_Sizer,Map_Tab,1,wxGROW+wxTOP,0)
set_sizer(win5,Map_Sizer)
set_sizer(Event_Tab,Event_Tab_Box)
add_window_to_sizer(Event_Sizer,Event_Tab,1,wxGROW+wxTOP,0)
set_sizer(win12,Event_Sizer)
constant Auto_Save = create(wxCheckBox,{Tab,Tab_Pan,"Auto Save",10,30,80,30}),
Back_Up = create(wxCheckBox,{Tab,Tab_Pan,"Back-up Files",10,60,80,30}),
Enable_Joypads = create(wxCheckBox,{Tab,Tab_Pan,"Enable
Gamepad(s)",10,90,110,30})
constant Show_FPS = create(wxCheckBox,{Tab,Tab_Pan2,"Show FPS",10,30,80,30}),
Bit_8 = create(wxRadioButton,{Tab,Tab_Pan2,"8-Bit",10,60,80,30}),
Bit_16 = create(wxRadioButton,{Tab,Tab_Pan2,"16-Bit",10,90,80,30}),
Bit_32 = create(wxRadioButton,{Tab,Tab_Pan2,"32-Bit",10,120,80,30}),
Bit_64 = create(wxRadioButton,{Tab,Tab_Pan2,"64-Bit",10,150,80,30})
constant Message_Box = create(wxButton,{Event_Tab,Event_Tab_Pan,"Message
Box",10,30,100,30}),
Message_Box_Style = create(wxButton,{Event_Tab,Event_Tab_Pan,"Message Box
Style",10,60,100,30}),
Font_Type = create(wxButton,{Event_Tab,Event_Tab_Pan,"Font Type",10,90,100,30}),
Font_Size = create(wxButton,{Event_Tab,Event_Tab_Pan,"Font
Size",10,120,100,30}),
Font_Color = create(wxButton,{Event_Tab,Event_Tab_Pan,"Font
Color",10,150,100,30}),
Start_Battle = create(wxButton,{Event_Tab,Event_Tab_Pan,"Start
Battle",10,180,100,30}),
End_Battle = create(wxButton,{Event_Tab,Event_Tab_Pan,"End
Battle",10,210,100,30}),
Add_Hero = create(wxButton,{Event_Tab,Event_Tab_Pan,"Add Hero",10,240,100,30}),
Add_Enemy = create(wxButton,{Event_Tab,Event_Tab_Pan,"Add
Enemy",10,270,100,30}),
Add_Boss = create(wxButton,{Event_Tab,Event_Tab_Pan,"Add Boss",10,300,100,30}),
Remove_Hero = create(wxButton,{Event_Tab,Event_Tab_Pan,"Remove
Hero",10,330,100,30}),
Remove_Enemy = create(wxButton,{Event_Tab,Event_Tab_Pan,"Remove
Enemy",10,360,100,30}),
Remove_Boss = create(wxButton,{Event_Tab,Event_Tab_Pan,"Remove
Boss",10,390,100,30}),
Add_Shop = create(wxButton,{Event_Tab,Event_Tab_Pan,"Add Shop",10,420,100,30}),
Remove_Shop = create(wxButton,{Event_Tab,Event_Tab_Pan,"Remove
Shop",120,30,100,30}),
Give_Money = create(wxButton,{Event_Tab,Event_Tab_Pan,"Give
Money",120,60,100,30}),
Give_Item = create(wxButton,{Event_Tab,Event_Tab_Pan,"Give
Item",120,90,100,30}),
Set_Position = create(wxButton,{Event_Tab,Event_Tab_Pan,"Set
Position",120,120,100,30})
integer FPS,Max_FPS,Limit_FPS
FPS = 30
Max_FPS = 60
Limit_FPS = 120
if FPS > Max_FPS then
Limit_FPS = FPS
elsif FPS < Max_FPS then
FPS = Max_FPS
end if
procedure onMenu_File_Exit(atom this, atom event_type, atom id, atom event)
exit_main()
end procedure
set_event_handler({Win,File},wxID_EXIT,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_File_Exit"))
procedure onMenu_Edit_Game(atom this, atom event_type, atom id, atom event)
show_window(Win3,1)
end procedure
set_event_handler({Win,Frost},EDIT_GAME,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_Edit_Game"))
procedure onMenu_File_FrostOption(atom this, atom event_type, atom id, atom
event)
show_window(Win8,1)
end procedure
set_event_handler({Win,File},FROST_OPTIONS,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_File_FrostOption"))
procedure onMenu_Tool_Music(atom this, atom event_type, atom id, atom event)
show_window(Win4,1)
end procedure
set_event_handler({Win,Tools},MUSIC_PLAYER,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_Tool_Music"))
procedure onMenu_Tool_Draw(atom this, atom event_type, atom id, atom event)
show_window(Win5,1)
end procedure
set_event_handler({Win,Tools},DRAWING_EDITOR,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_Tool_Draw"))
procedure onMenu_Tool_Code(atom this, atom event_type, atom id, atom event)
show_window(Win6,1)
end procedure
set_event_handler({Win,Tools},CODING_EDITOR,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_Tool_Code"))
procedure onMenu_Tool_Map(atom this, atom event_type, atom id, atom event)
show_window(Win7,1)
end procedure
set_event_handler({Win,Tools},MAP_EDITOR,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_Tool_Map"))
procedure onMenu_Event_Map(atom this, atom event_type, atom id, atom event)
show_window(Win12,1)
end procedure
set_event_handler({Win,Tools},EVENT_EDITOR,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_Event_Map"))
procedure onMenu_File_Music_Exit(atom this, atom event_type, atom id, atom
event)
exit_main()
end procedure
set_event_handler({Win4,File_Music},wxID_EXIT,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_File_Music_Exit"))
procedure onMenu_File_Draw_Exit(atom this, atom event_type, atom id, atom event)
exit_main()
end procedure
set_event_handler({Win5,File_Draw},wxID_EXIT,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_File_Draw_Exit"))
procedure onMenu_File_Code_Exit(atom this, atom event_type, atom id, atom event)
exit_main()
end procedure
set_event_handler({Win6,Code_File},wxID_EXIT,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_File_Code_Exit"))
procedure onMenu_File_Map_Exit(atom this, atom event_type, atom id, atom event)
exit_main()
end procedure
set_event_handler({Win7,Map_File},wxID_EXIT,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_File_Map_Exit"))
procedure onMenu_Help_About(atom this, atom event_type, atom id, atom event)
integer m
m = message_box("Frost Editor\n"
&"Written By Andy\n"
&"Freeware\n"
&"Open Source\n"
&"Version 0.0.0.1\n"
&"Written In Euphoria\n"
&"Uses wxEuphoria\n"
&"DarkScar Games\n",
"About Frost",
wxICON_INFORMATION)
end procedure
set_event_handler({Win,Help},wxID_ABOUT,wxEVT_COMMAND_MENU_SELECTED,
routine_id("onMenu_Help_About"))
wxMain(Win)
Thanks for trying to help.
|
Not Categorized, Please Help
|
|
