theguy0000 Posted August 28, 2005 Share Posted August 28, 2005 GUICreate ( "New Action", 170, 240, -1, -1, "", "", "phpBB MOD maker" ) $textInput = GUICtrlCreateEdit ( $actionInputText, 10, 10, 150, 150 ) $actionCloseWin = GUICtrlCreateButton ( "Close", 65, 170 ) GUISetState () ; Run the GUI until the dialog is closed While 1 If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg = $actionCloseWin Then ExitLoop WEnd when i click the close button, the child window still doesnt close. The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN Link to comment Share on other sites More sharing options...
GaryFrost Posted August 28, 2005 Share Posted August 28, 2005 $msg = GuiGetMsg() where is it? SciTE for AutoItDirections for Submitting Standard UDFs Don't argue with an idiot; people watching may not be able to tell the difference. Link to comment Share on other sites More sharing options...
theguy0000 Posted August 28, 2005 Author Share Posted August 28, 2005 oh, duh. lol thanks, that was a stupid mistake The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN Link to comment Share on other sites More sharing options...
theguy0000 Posted August 28, 2005 Author Share Posted August 28, 2005 GUICreate ( "New Action", 170, 240, -1, -1, "", "", "phpBB MOD maker" ) $textInput = GUICtrlCreateEdit ( $actionInputText, 10, 10, 150, 150 ) $actionCloseWin = GUICtrlCreateButton ( "Close", 65, 170 ) GUISetState () ; Run the GUI until the dialog is closed While 1 global $msg = GuiGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg = $actionCloseWin Then ExitLoop WEnd button still doesnt work The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted August 28, 2005 Moderators Share Posted August 28, 2005 (edited) GUICreate ( "New Action", 170, 240, -1, -1, "", "", "phpBB MOD maker" ) $textInput = GUICtrlCreateEdit ( $actionInputText, 10, 10, 150, 150 ) $actionCloseWin = GUICtrlCreateButton ( "Close", 65, 170 ) GUISetState () ; Run the GUI until the dialog is closed While 1 $msg = GuiGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg = $actionCloseWin Then ExitLoop WEndIN ADDITION: I hope your using #include <GUIConstants.au3> and you've at least Declared $actionInputText w/ Dim or Global. Edited August 28, 2005 by ronsrules Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
theguy0000 Posted August 28, 2005 Author Share Posted August 28, 2005 it still doesnt work The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted August 28, 2005 Moderators Share Posted August 28, 2005 Read my In Addition: #include <GUICONSTANTS.AU3> Dim $actionInputText GUICreate ( "New Action", 170, 240, -1, -1, "", "", "phpBB MOD maker" ) $textInput = GUICtrlCreateEdit ( $actionInputText, 10, 10, 150, 150 ) $actionCloseWin = GUICtrlCreateButton ( "Close", 65, 170 ) GUISetState () ; Run the GUI until the dialog is closed While 1 $msg = GuiGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg = $actionCloseWin Then ExitLoop WEnd Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
theguy0000 Posted August 28, 2005 Author Share Posted August 28, 2005 i didnt have $actionInputText declared, but now, i put it in a Dim at the beggining of the script, still doesnt work. and yes i have included GUIConstants.au3 The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted August 28, 2005 Moderators Share Posted August 28, 2005 Works for me just like I posted it. Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
theguy0000 Posted August 28, 2005 Author Share Posted August 28, 2005 here is the whole script: expandcollapse popup#comments-start phpBB MOD maker version 0.1.8 beta Created by msr2 and bojak71730 Also, thanks to LxP and Valuater for fixing major read and write issues Written using AutoIt3 http://www.autoitscript.com #comments-end #region general preparation ; everything in this region does the necesary actions to prevent errors and/or warnings when running the script #include <GUIConstants.au3> #include <file.au3> Dim $file = "", $actions = "", $action = "", $text = "", $TextInput = "", $actionInputText = "" #endregion #region GUI GUICreate("phpBB MOD maker") GUISetFont(9, 300) $tab=GUICtrlCreateTab (1,1, 400,400) $tab0=GUICtrlCreateTabitem ("general MOD information") GUICtrlSetState(-1,$GUI_SHOW) ; will be display first $modName=GUICtrlCreateInput ( "", 85, 25, 100, 21) $modNameLabel=GUICtrlCreateLabel ("MOD name: ", 10, 30, 100, 21) $modAuthor=GUICtrlCreateInput ( "", 85, 50, 100, 21) $modAuthorLabel=GUICtrlCreateLabel ( "MOD Author: ", 10, 55, 100, 21) $modEmail=GUICtrlCreateInput ( "", 90, 75, 100, 21) $modEmailLabel=GUICtrlCreateLabel ( "Author E-mail: ", 10, 80, 100, 21) $modRealName=GUICtrlCreateInput ( "", 117, 100, 100, 21) $modRealNameLabel=GUICtrlCreateLabel ( "Author Real Name: ", 10, 105, 120, 21) $modWebsite=GUICtrlCreateInput ( "", 95, 125, 100, 21) $modWebsiteLabel=GUICtrlCreateLabel ( "Author website: ", 10, 130, 100, 21) $modVersion=GUICtrlCreateInput ( "0.0.0", 85, 150, 100, 21) $modVersionLabel=GUICtrlCreateLabel ( "MOD version: ", 10, 155, 100, 21) $modDescription=GUICtrlCreateEdit ( "", 107, 175, 170, 84) $modDescriptionLabel=GUICtrlCreateLabel ( "MOD description: ", 10, 180, 100, 21) $modIncluded=GUICtrlCreateInput ( "", 93, 263, 100, 21) $modIncludedLabel=GUICtrlCreateLabel ( "Included Files: ", 10, 268, 100, 21) $modIncludedLabel2=GUICtrlCreateLabel ( "(seperated by commas)", 195, 268, 200, 21) $modToedit=GUICtrlCreateInput ( "", 85, 288, 100, 21) $modToeditLabel=GUICtrlCreateLabel ( "Files to Edit: ", 10, 293, 100, 21) $tab1=GUICtrlCreateTabitem ( "Actions" ) $actionMenu=GUICtrlCreateCombo ( "SQL", 85, 25, 200, 23) $actionMenuItems=GUICtrlSetData ( -1, "COPY|DIY INSTRUCTIONS|OPEN|FIND|REPLACE WITH|AFTER, ADD|BEFORE, ADD|INCREMENT|IN-LINE FIND|IN-LINE AFTER, ADD|IN-LINE BEFORE, ADD|IN-LINE REPLACE WITH" ) $actionMenuLabel=GUICtrlCreateLabel ( "New Action:", 10, 30 ) $actionButton=GUICtrlCreateButton ( "Add", 295, 25, 27, 20 ) $divider1=GUICtrlCreateLabel ( "_____________________________________", 56, 60 ) ; the following two lines will be put back in, modified slightly, in a later version. ;$actionLabel=GUICtrlCreateLabel ( "Current Actions", 150, 90 ) ;$actionPending=GUICtrlCreateLabel ( "Yet to be added - planned for version 1.1.0 or later", 40, 117 ) GUICtrlCreateTabitem ("") ; end tabitem definition $update=GUICtrlCreateButton ("UPDATE!", 165,350) GUISetState () ; Run the GUI until the dialog is closed While 1==1 global $msg = GUIGetMsg() If $msg = $update Then Call( "update" ) If $msg = $actionButton Then Call ( "add" ) If $msg = $GUI_EVENT_CLOSE Then $close = MsgBox(100, "Quit?", "Are you sure you want to close?") If $close = 6 Then ExitLoop EndIf WEnd #endregion #region functions Func add() $action = GUICtrlRead ( $actionMenu ) $actionInputText = "# " & @CRLF & "#-----[ " & $action & " ]------------------------------------------" & @CRLF & "# " & @CRLF GUICreate ( "New Action", 170, 240, -1, -1, "", "", "phpBB MOD maker" ) $textInput = GUICtrlCreateEdit ( $actionInputText, 10, 10, 150, 150 ) $actionCloseWin = GUICtrlCreateButton ( "Close", 65, 170 ) GUISetState () ; Run the GUI until the dialog is closed While 1 $msg = GuiGetMsg() If $msg = $actionCloseWin Then ExitLoop If $msg = $GUI_EVENT_CLOSE Then ExitLoop WEnd EndFunc Func action() $text1 = GUICtrlRead ( $textInput ) $text = $text1 & @CRLF EndFunc Func update() $actions = $actions & $text & @CRLF $fileName=InputBox ( "Save as...", "Type the file name you would like to save the mod as. (don't forget to add .mod or .txt"_ & " at the end, or you will end up with an unusable file!)") If $fileName = 2 Then Exit global $file=InputBox ( "Save as...", "Type the location of where to save the mod file:", @MyDocumentsDir & "\" & $fileName, "", _ -1, -1, 0, 0) If $file = 2 Then Exit save() EndFunc Func save() $actions = $actions & "#" & @CRLF & "#-----[ SAVE/CLOSE ALL FILES ]------------------------------------------" & @CRLF & "#" & @CRLF & "# EoM" If Not FileExists ( $file ) Then _FileCreate ( $file ) $mod = FileOpen ( $file, 2 ) Else $replace = MsgBox ( 4, "Overwrite?", $file & " already exists. Would You like to replace the existing file? If no, the new MOD will be added to the end of the file" ) If $replace = 6 Then; if "yes" is selected $mod = FileOpen ( $file, 2 ) Else $mod = FileOpen ( $file, 1 ) EndIf EndIf ; Check if file opened for reading OK If $mod = -1 Then MsgBox(0, "Error", "ERROR: Unable to open file for writing. ABORTING APPLICATION.") Exit EndIf $Name = GUICtrlRead( $modName ) $Author = GUICtrlRead( $modAuthor ) $Email = GUICtrlRead( $modEmail ) $RealName = GUICtrlRead( $modRealName ) $Website = GUICtrlRead( $modWebsite ) $Description = GUICtrlRead( $modDescription ) $Version = GUICtrlRead( $modVersion ) $ToEdit = GUICtrlRead( $modToEdit ) $Included = GUICtrlRead( $modIncluded ) ; check "Files to Edit" and "Included Files" for empty strings If $ToEdit = "" Then $ToEdit = "N/A" EndIf If $Included = "" Then $Included = "N/A" EndIf ; check e-mail address and version for correct format ; this does not work correctly. removed until it can be fixed ;If $Email <> "*@*.*" Then ; $Email = InputBox ( "E-mail address", $Email & " is an invalid E-mail address. Please enter a valid one below." ) ;EndIf ;If $Version <> "*.*.*" Then ; $Version = InputBox ( "Version", $Version & " is not in valid phpBB version format. Please enter a correct one in the format of *.*.* below." ) ;EndIf ; Start - file writing FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, "## MOD Title: " & $Name ) FileWriteLine ( $mod, "## MOD Author: " & $Author & " < " & $Email & " > (" & $RealName & ") " & $Website ) FileWriteLine ( $mod, "## MOD Description: " & $Description ) FileWriteLine ( $mod, "## MOD Version: " & $Version ) FileWriteLine ( $mod, "##" ) FileWriteLine ( $mod, "## Installation Level: (Easy/Intermediate/Advanced)" ) FileWriteLine ( $mod, "## Installation Time: x Minutes" ) FileWriteLine ( $mod, "## Files To Edit: " & $Toedit ) FileWriteLine ( $mod, "## Included Files: " & $Included ) FileWriteLine ( $mod, "## License: http://opensource.org/licenses/gpl-license.php GNU General Public License v2" ) FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, "## For security purposes, please check: http://www.phpbb.com/mods/" ) FileWriteLine ( $mod, "## for the latest version of this MOD. Although MODs are checked" ) FileWriteLine ( $mod, "## before being allowed in the MODs Database there is no guarantee" ) FileWriteLine ( $mod, "## that there are no security problems within the MOD. No support" ) FileWriteLine ( $mod, "## will be given for MODs not found within the MODs Database which" ) FileWriteLine ( $mod, "## can be found at http://www.phpbb.com/mods/" ) FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, "## Author Notes:" ) FileWriteLine ( $mod, "## none" ) FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, "## MOD History:" ) FileWriteLine ( $mod, "## " ) FileWriteLine ( $mod, "## " & @YEAR & "-" & @MON & "-" & @MDAY & " - Version " & $Version) FileWriteLine ( $mod, "## - (no version notes)" ) FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, "## Before Adding This MOD To Your Forum, You Should Back Up All Files Related To This MOD" ) FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, " " ) FileWrite ( $mod, $actions ) ; End - File Writing FileClose( $mod ) ; ; Start - File Reading (fixed by LxP) ; if (fileGetSize($file) = 0) then MsgBox (0, "ERROR", "ERROR: could not write to file " & $file & ". MOD creation failed.") EndIf ; ; End - File Reading ; EndFunc #endregion The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN Link to comment Share on other sites More sharing options...
GaryFrost Posted August 28, 2005 Share Posted August 28, 2005 works for me also. SciTE for AutoItDirections for Submitting Standard UDFs Don't argue with an idiot; people watching may not be able to tell the difference. Link to comment Share on other sites More sharing options...
GaryFrost Posted August 28, 2005 Share Posted August 28, 2005 (edited) suggest using different variable for each gui in the loop $msg, $msg2 etc. also need guidelete for the child window(s). Edited August 28, 2005 by gafrost SciTE for AutoItDirections for Submitting Standard UDFs Don't argue with an idiot; people watching may not be able to tell the difference. Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted August 29, 2005 Moderators Share Posted August 29, 2005 (edited) #include <GUICONSTANTS.AU3> Dim $actionInputText $PARENT = GUICreate( "New Action", 170, 240, -1, -1, "", "", "phpBB MOD maker" ) $GO_TO_CHILD = GUICtrlCreateButton("GET CHILD", 50, 100, 100, 30) GUISetState() While 1 $MSG = GUIGetMsg() Select Case $MSG = $GUI_EVENT_CLOSE Exit Case $MSG = $GO_TO_CHILD _CHILD_GUI() EndSelect WEnd Func _CHILD_GUI() $CHILD = GUICreate ( "New Action", 170, 240, -1, -1, "", "", "phpBB MOD maker" ) $textInput = GUICtrlCreateEdit ( $actionInputText, 10, 10, 150, 150 ) $actionCloseWin = GUICtrlCreateButton ( "Close", 65, 170 ) GUISetState () ; Run the GUI until the dialog is closed While 1 $msg = GuiGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg = $actionCloseWin Then GUIDelete($CHILD) ExitLoop EndIf WEnd EndFunc EDIT: UGH!! Gary... You're quick Edited August 29, 2005 by ronsrules Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
theguy0000 Posted August 29, 2005 Author Share Posted August 29, 2005 expandcollapse popup#comments-start phpBB MOD maker version 0.1.8 beta Created by msr2 and bojak71730 Also, thanks to LxP and Valuater for fixing major read and write issues Written using AutoIt3 http://www.autoitscript.com #comments-end #region general preparation ; everything in this region does the necesary actions to prevent errors and/or warnings when running the script #include <GUIConstants.au3> #include <file.au3> Dim $file = "", $actions = "", $action = "", $text = "", $TextInput = "", $actionInputText = "" #endregion #region GUI GUICreate("phpBB MOD maker") GUISetFont(9, 300) $tab=GUICtrlCreateTab (1,1, 400,400) $tab0=GUICtrlCreateTabitem ("general MOD information") GUICtrlSetState(-1,$GUI_SHOW) ; will be display first $modName=GUICtrlCreateInput ( "", 85, 25, 100, 21) $modNameLabel=GUICtrlCreateLabel ("MOD name: ", 10, 30, 100, 21) $modAuthor=GUICtrlCreateInput ( "", 85, 50, 100, 21) $modAuthorLabel=GUICtrlCreateLabel ( "MOD Author: ", 10, 55, 100, 21) $modEmail=GUICtrlCreateInput ( "", 90, 75, 100, 21) $modEmailLabel=GUICtrlCreateLabel ( "Author E-mail: ", 10, 80, 100, 21) $modRealName=GUICtrlCreateInput ( "", 117, 100, 100, 21) $modRealNameLabel=GUICtrlCreateLabel ( "Author Real Name: ", 10, 105, 120, 21) $modWebsite=GUICtrlCreateInput ( "", 95, 125, 100, 21) $modWebsiteLabel=GUICtrlCreateLabel ( "Author website: ", 10, 130, 100, 21) $modVersion=GUICtrlCreateInput ( "0.0.0", 85, 150, 100, 21) $modVersionLabel=GUICtrlCreateLabel ( "MOD version: ", 10, 155, 100, 21) $modDescription=GUICtrlCreateEdit ( "", 107, 175, 170, 84) $modDescriptionLabel=GUICtrlCreateLabel ( "MOD description: ", 10, 180, 100, 21) $modIncluded=GUICtrlCreateInput ( "", 93, 263, 100, 21) $modIncludedLabel=GUICtrlCreateLabel ( "Included Files: ", 10, 268, 100, 21) $modIncludedLabel2=GUICtrlCreateLabel ( "(seperated by commas)", 195, 268, 200, 21) $modToedit=GUICtrlCreateInput ( "", 85, 288, 100, 21) $modToeditLabel=GUICtrlCreateLabel ( "Files to Edit: ", 10, 293, 100, 21) $tab1=GUICtrlCreateTabitem ( "Actions" ) $actionMenu=GUICtrlCreateCombo ( "SQL", 85, 25, 200, 23) $actionMenuItems=GUICtrlSetData ( -1, "COPY|DIY INSTRUCTIONS|OPEN|FIND|REPLACE WITH|AFTER, ADD|BEFORE, ADD|INCREMENT|IN-LINE FIND|IN-LINE AFTER, ADD|IN-LINE BEFORE, ADD|IN-LINE REPLACE WITH" ) $actionMenuLabel=GUICtrlCreateLabel ( "New Action:", 10, 30 ) $actionButton=GUICtrlCreateButton ( "Add", 295, 25, 27, 20 ) $divider1=GUICtrlCreateLabel ( "_____________________________________", 56, 60 ) ; the following two lines will be put back in, modified slightly, in a later version. ;$actionLabel=GUICtrlCreateLabel ( "Current Actions", 150, 90 ) ;$actionPending=GUICtrlCreateLabel ( "Yet to be added - planned for version 1.1.0 or later", 40, 117 ) GUICtrlCreateTabitem ("") ; end tabitem definition $update=GUICtrlCreateButton ("UPDATE!", 165,350) GUISetState () ; Run the GUI until the dialog is closed While 1==1 global $msg = GUIGetMsg() If $msg = $update Then Call( "update" ) If $msg = $actionButton Then Call ( "add" ) If $msg = $GUI_EVENT_CLOSE Then $close = MsgBox(100, "Quit?", "Are you sure you want to close?") If $close = 6 Then ExitLoop EndIf WEnd #endregion #region functions Func add() $action = GUICtrlRead ( $actionMenu ) $actionInputText = "# " & @CRLF & "#-----[ " & $action & " ]------------------------------------------" & @CRLF & "# " & @CRLF GUICreate ( "New Action", 170, 240, -1, -1, "", "", "phpBB MOD maker" ) $textInput = GUICtrlCreateEdit ( $actionInputText, 10, 10, 150, 150 ) $actionCloseWin = GUICtrlCreateButton ( "Close", 65, 170 ) GUISetState () ; Run the GUI until the dialog is closed While 1 $msg2 = GuiGetMsg() If $msg2 = $actionCloseWin Then ExitLoop If $msg2 = $GUI_EVENT_CLOSE Then ExitLoop WEnd EndFunc Func action() $text1 = GUICtrlRead ( $textInput ) $text = $text1 & @CRLF EndFunc Func update() $actions = $actions & $text & @CRLF $fileName=InputBox ( "Save as...", "Type the file name you would like to save the mod as. (don't forget to add .mod or .txt"_ & " at the end, or you will end up with an unusable file!)") If $fileName = 2 Then Exit global $file=InputBox ( "Save as...", "Type the location of where to save the mod file:", @MyDocumentsDir & "\" & $fileName, "", _ -1, -1, 0, 0) If $file = 2 Then Exit save() EndFunc Func save() $actions = $actions & "#" & @CRLF & "#-----[ SAVE/CLOSE ALL FILES ]------------------------------------------" & @CRLF & "#" & @CRLF & "# EoM" If Not FileExists ( $file ) Then _FileCreate ( $file ) $mod = FileOpen ( $file, 2 ) Else $replace = MsgBox ( 4, "Overwrite?", $file & " already exists. Would You like to replace the existing file? If no, the new MOD will be added to the end of the file" ) If $replace = 6 Then; if "yes" is selected $mod = FileOpen ( $file, 2 ) Else $mod = FileOpen ( $file, 1 ) EndIf EndIf ; Check if file opened for reading OK If $mod = -1 Then MsgBox(0, "Error", "ERROR: Unable to open file for writing. ABORTING APPLICATION.") Exit EndIf $Name = GUICtrlRead( $modName ) $Author = GUICtrlRead( $modAuthor ) $Email = GUICtrlRead( $modEmail ) $RealName = GUICtrlRead( $modRealName ) $Website = GUICtrlRead( $modWebsite ) $Description = GUICtrlRead( $modDescription ) $Version = GUICtrlRead( $modVersion ) $ToEdit = GUICtrlRead( $modToEdit ) $Included = GUICtrlRead( $modIncluded ) ; check "Files to Edit" and "Included Files" for empty strings If $ToEdit = "" Then $ToEdit = "N/A" EndIf If $Included = "" Then $Included = "N/A" EndIf ; check e-mail address and version for correct format ; this does not work correctly. removed until it can be fixed ;If $Email <> "*@*.*" Then ; $Email = InputBox ( "E-mail address", $Email & " is an invalid E-mail address. Please enter a valid one below." ) ;EndIf ;If $Version <> "*.*.*" Then ; $Version = InputBox ( "Version", $Version & " is not in valid phpBB version format. Please enter a correct one in the format of *.*.* below." ) ;EndIf ; Start - file writing FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, "## MOD Title: " & $Name ) FileWriteLine ( $mod, "## MOD Author: " & $Author & " < " & $Email & " > (" & $RealName & ") " & $Website ) FileWriteLine ( $mod, "## MOD Description: " & $Description ) FileWriteLine ( $mod, "## MOD Version: " & $Version ) FileWriteLine ( $mod, "##" ) FileWriteLine ( $mod, "## Installation Level: (Easy/Intermediate/Advanced)" ) FileWriteLine ( $mod, "## Installation Time: x Minutes" ) FileWriteLine ( $mod, "## Files To Edit: " & $Toedit ) FileWriteLine ( $mod, "## Included Files: " & $Included ) FileWriteLine ( $mod, "## License: http://opensource.org/licenses/gpl-license.php GNU General Public License v2" ) FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, "## For security purposes, please check: http://www.phpbb.com/mods/" ) FileWriteLine ( $mod, "## for the latest version of this MOD. Although MODs are checked" ) FileWriteLine ( $mod, "## before being allowed in the MODs Database there is no guarantee" ) FileWriteLine ( $mod, "## that there are no security problems within the MOD. No support" ) FileWriteLine ( $mod, "## will be given for MODs not found within the MODs Database which" ) FileWriteLine ( $mod, "## can be found at http://www.phpbb.com/mods/" ) FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, "## Author Notes:" ) FileWriteLine ( $mod, "## none" ) FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, "## MOD History:" ) FileWriteLine ( $mod, "## " ) FileWriteLine ( $mod, "## " & @YEAR & "-" & @MON & "-" & @MDAY & " - Version " & $Version) FileWriteLine ( $mod, "## - (no version notes)" ) FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, "## Before Adding This MOD To Your Forum, You Should Back Up All Files Related To This MOD" ) FileWriteLine ( $mod, "##############################################################" ) FileWriteLine ( $mod, " " ) FileWrite ( $mod, $actions ) ; End - File Writing FileClose( $mod ) ; ; Start - File Reading (fixed by LxP) ; if (fileGetSize($file) = 0) then MsgBox (0, "ERROR", "ERROR: could not write to file " & $file & ". MOD creation failed.") EndIf ; ; End - File Reading ; EndFunc #endregionit still doesnt work! i just dont see the problem... The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN Link to comment Share on other sites More sharing options...
Moderators SmOke_N Posted August 29, 2005 Moderators Share Posted August 29, 2005 Gary and I gave you the answer in the above posts: Func add() $action = GUICtrlRead ( $actionMenu ) $actionInputText = "# " & @CRLF & "#-----[ " & $action & " ]------------------------------------------" & @CRLF & "# " & @CRLF $CHILD_GUI = GUICreate ( "New Action", 170, 240, -1, -1, "", "", "phpBB MOD maker" ) $textInput = GUICtrlCreateEdit ( $actionInputText, 10, 10, 150, 150 ) $actionCloseWin = GUICtrlCreateButton ( "Close", 65, 170 ) GUISetState () ; Run the GUI until the dialog is closed While 1 $msg2 = GuiGetMsg() If $msg2 = $actionCloseWin Then GUIDelete($CHILD_GUI) ExitLoop EndIf If $msg2 = $GUI_EVENT_CLOSE Then GUIDelete($CHILD_GUI) ExitLoop EndIf WEnd EndFunc Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer. Link to comment Share on other sites More sharing options...
theguy0000 Posted August 29, 2005 Author Share Posted August 29, 2005 yes! it works! thanks so much you two! The cake is a lie.www.theguy0000.com is currentlyUP images.theguy0000.com is currentlyUP all other *.theguy0000.com sites are DOWN Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now