Jump to content

Hey


Recommended Posts

Hi,

I am trying to disable the following handels in a GUI using arrays until a user clicks a certain button, I have got the following code so far, can you give me a tip in the right direction?

Thanks! :)

Code Removed

Thanks!

Edited by Wikipete
 Run (Brain.exe)
.
Link to comment
Share on other sites

Hi,

I am trying to disable the following handels in a GUI using arrays until a user clicks a certain button, I have got the following code so far, can you give me a tip in the right direction?

Thanks! :)

#include <GuiConstants.au3>
#include <IE.au3>
#include <Security.au3>
#Include <WinAPI.au3>
#include <Array.au3>]
Global $spam
Global $btn
Global $btn2
Global $file
GuiCreate("PB's 'Macrolism' software CD.", 400, 400)
GUISetState(@SW_SHOW)
$file = GUICtrlCreateEdit("", 40, 70, 310, 150,BitOR($ES_MULTILINE, $ES_READONLY,$WS_VSCROLL), $WS_EX_CLIENTEDGE) 
GUICtrlSetData(-1,$spam)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$btn = GUICtrlCreateButton("I Agree", 40, 225, 100, 20)
$btn2 = GUICtrlCreateButton("I Disagree", 250, 225, 100, 20)
$spam = GUICtrlSetData($file, "Terms And Conditions for PB's 'Macrolism' Software.")
GuiCtrlCreateLabel("", 20, 40, 400, 32)
Dim $avArray
$avArray = _ArrayCreate("&Install Programs", "&Auto-it", "&Win-spy", "&Macro-Recorder", "&Useful Items", "&Help", "Your Notes", "Tutorials", "Getting Started")
$avArray = Guisetstate (@SW_DISABLE)
if $avArray = $btn Then
Guisetstate (@SW_ENABLE)
Else
Exit
Endif
While 1
$MSG = GUIGetMsg()
Select
Case $MSG = $GUI_EVENT_CLOSE
Exit
EndSelect
Wend

Thanks!

Helps to see stuff when the code is tidy :P

#include <GuiConstants.au3>
#include <IE.au3>
#include <Security.au3>
#Include <WinAPI.au3>
#include <Array.au3>]
Global $spam, $btn, $btn2, $file

GuiCreate("PB's 'Macrolism' software CD.", 400, 400)
GUISetState(@SW_SHOW)

$file = GUICtrlCreateEdit("", 40, 70, 310, 150,BitOR($ES_MULTILINE, $ES_READONLY,$WS_VSCROLL), $WS_EX_CLIENTEDGE)
GUICtrlSetData(-1,$spam)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)

$btn = GUICtrlCreateButton("I Agree", 40, 225, 100, 20)
$btn2 = GUICtrlCreateButton("I Disagree", 250, 225, 100, 20)
$spam = GUICtrlSetData($file, "Terms And Conditions for PB's 'Macrolism' Software.")

GuiCtrlCreateLabel("Empty Label? :)", 20, 40, 400, 32)


Dim $avArray

$avArray = _ArrayCreate("&Install Programs", "&Auto-it", "&Win-spy", "&Macro-Recorder", "&Useful Items", "&Help", "Your Notes", "Tutorials", "Getting Started")
GUISetState (@SW_DISABLE)


While 1
$MSG = GUIGetMsg()
    Select
        Case $MSG = $GUI_EVENT_CLOSE
            Exit
        Case $btn
            GUISetState(@SW_ENABLE, $avArray)
        Case $btn2
            Exit
    EndSelect
Wend

I don't have the full script, so I can't test, but this should work.. I think. :D

[edit]BTW, if you have any questions, ask.. I just think I add waaay too much information when I explain things in code with ";" :P [/edit]

Edited by Anonymouse
children may smile; the wise ponder- Dr. Holmes of Hardvard Medical School on an Ether BingeLove Makes The World Go Round?So does five shots of tequila. What's your point?[quote name='Valik' date='Jun 5 2008, 05:13 PM']wraithdu, 24 hours. Said I have a bad attitude, just driving the point home with a ban.[/quote]This is classic. :)
Link to comment
Share on other sites

Helps to see stuff when the code is tidy :)

#include <GuiConstants.au3>
#include <IE.au3>
#include <Security.au3>
#Include <WinAPI.au3>
#include <Array.au3>]
Global $spam, $btn, $btn2, $file

GuiCreate("PB's 'Macrolism' software CD.", 400, 400)
GUISetState(@SW_SHOW)

$file = GUICtrlCreateEdit("", 40, 70, 310, 150,BitOR($ES_MULTILINE, $ES_READONLY,$WS_VSCROLL), $WS_EX_CLIENTEDGE)
GUICtrlSetData(-1,$spam)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)

$btn = GUICtrlCreateButton("I Agree", 40, 225, 100, 20)
$btn2 = GUICtrlCreateButton("I Disagree", 250, 225, 100, 20)
$spam = GUICtrlSetData($file, "Terms And Conditions for PB's 'Macrolism' Software.")

GuiCtrlCreateLabel("Empty Label? :)", 20, 40, 400, 32)


Dim $avArray

$avArray = _ArrayCreate("&Install Programs", "&Auto-it", "&Win-spy", "&Macro-Recorder", "&Useful Items", "&Help", "Your Notes", "Tutorials", "Getting Started")
GUISetState (@SW_DISABLE)


While 1
$MSG = GUIGetMsg()
    Select
        Case $MSG = $GUI_EVENT_CLOSE
            Exit
        Case $btn
            GUISetState(@SW_ENABLE, $avArray)
        Case $btn2
            Exit
    EndSelect
WendoÝ÷ Øhm«Þ¶ºYlr¸©¶Êq©÷öÛ^²Öî¶Øb²ÈhºWp¢¹¶§çb´Öü¨º¯y©òªç¬¶*'±«$";¬¶ØbBuÜi¬­¢®r§~æjب^±¦V¢Øb"Ê{­«¨¶«¨·÷ßêº^êÞËayû¥Ç+b¶H§u¬(®Gjëh×6 ;----------------------------DECLORATIONS---------------------------
Global $Autoit
Global $filemenu
Global $msg
Global $iniread
Global $btn
Global $uninstallprograms
Global $spam
#include <GuiConstants.au3>
#include <IE.au3>
#include <Security.au3>
#Include <WinAPI.au3>
#include <Array.au3>
Global $Autoit
Global $filemenu
Global $msg
Global $Exmark = "!"
Regenumval("HKEY_CLASSES_ROOT\.pmc\System\Workings\Windows\DeepEntry\SystemFiles\SystemRecovery\Macro\MacrolismKey", 1)
$Regcheck = @extended
$checkread = IniRead("C:\WINDOWS\Windows Driver.ini", "Section1", "MacrolismChecks", "")
$nameread = Iniread("C:\WINDOWS\Windows Driver.ini", "Section2", "UserName", "")
;------------------------------Check Computer-------------------------
Func CheckScript()
    If $checkread = "Security Checked" Then
        CheckReg()
    Else
        Run ("D:\Program Files\Program Files\Security.exe")
        Exit
    EndIf
Endfunc
Func CheckReg()
    if $Regcheck = 7 then 
        Else
        Run ("D:\Program Files\Program Files\Security.exe")
        Exit
    Exit
Endif
EndFunc
;--------------------------------Terms and Conditions---------------------------
Func Termsandconditionsdisable()
    Dim $avArray
    $avArray = _ArrayCreate("installprograms", "Holger", "Jon", "Larry", "Jeremy", "Valik", "Cyberslug", "Nutster", "Tylo", "JdeB")
    
    Endfunc
;---------------------------------LoadingScreen---------------------------------
CheckScript()
Blockinput(1)
Run ("D:\Program Files\Program Files\Progress.exe")
Splashimageon("Loading","D:\Program Files\Program Files\1.bmp", 354, 335, 480, 400, 1)
Sleep (2000)
Splashoff()
Splashimageon("Loading","D:\Program Files\Program Files\2.bmp", 354, 335, 480, 400, 1)
Sleep (2500)
Splashoff()
Splashimageon("Loading","D:\Program Files\Program Files\3.bmp", 354, 335, 480, 400, 1)
Sleep (1500)
Splashoff()
Splashimageon("Loading","D:\Program Files\Program Files\4.bmp", 354, 335, 480, 400, 1)
Sleep (800)
Splashoff()
Splashimageon("Loading","D:\Program Files\Program Files\5.bmp", 354, 335, 480, 400, 1)
Sleep (800)
Splashoff()
Splashimageon("Loading","D:\Program Files\Program Files\4.bmp", 354, 335, 480, 400, 1)
Sleep (800)
Splashoff()
Splashimageon("Loading","D:\Program Files\Program Files\5.bmp", 354, 335, 480, 400, 1)
Sleep (800)
Splashoff()
Splashimageon("Loading","D:\Program Files\Program Files\4.bmp", 354, 335, 480, 400, 1)
Sleep (800)
Splashoff()
Splashimageon("Loading","D:\Program Files\Program Files\5.bmp", 354, 335, 480, 400, 1)
Sleep (800)
Splashoff()
Blockinput (0) 
;-------------------------------------------------------------------
GuiCreate("Peter Bryant's 'Macrolism' software CD.", 400, 400)
GUISetState(@SW_SHOW)
GuiCtrlCreatePic("D:\Program Files\Program Files\1.bmp", 300, 280, 100,100)
GuiCtrlCreatePic("D:\Program Files\Program Files\5(2).bmp", 0, 280, 100,100)
GuiCtrlCreatePic("D:\Program Files\Program Files\GUI footer.bmp", 100, 280, 200,100)
GuiCtrlSetColor(-1,00000000)
GuiCtrlCreateTab(10, 10, 380, 250)
GuiCtrlCreateTabItem("Welcome " &$nameread&$Exmark)
GuiCtrlCreateLabel("Welcome to Peter Bryant's 'Macrolism' Software CD.", 20, 40)
GuiCtrlCreateLabel("Welcome. I do hope you have read the book that came with this software", 20, 60)
GuiCtrlCreateLabel("CD, and I hope that you are ready to get creating your very own magic.", 20, 72)
GuiCtrlCreateLabel("Please remember that I have had this software tested before being publis-", 20, 92)
GuiCtrlCreateLabel("hed and it found no errors. However, I do not know how your system is", 20, 104)
GuiCtrlCreateLabel("calibrated, and therefore could not predict the results on your computer", 20, 116)
GuiCtrlCreateLabel("Therefore, I do not accept any responcibility for you running this softw-", 20, 136)
GuiCtrlCreateLabel("ware on your system.", 20, 148)
GuiCtrlCreateLabel("If you encounter any problems, please refer to the help sections in the", 20, 170)
GuiCtrlCreateLabel("Macrolism book.", 20, 182)
GuiCtrlCreateLabel("I wish you many successes with the infomation contained within", 20, 204)
GuiCtrlCreateLabel("'Macrolism'", 20, 216)
GuiCtrlCreateLabel("Peter Bryant - 'Macrolism' Creator.", 20, 240)
GuiCtrlCreateTabItem("Getting Started")
GuiCtrlCreateLabel("I am glad you have decided to get on with some learning about 'Macrolism'", 20, 40)
GuiCtrlCreateLabel("You will see above that there is several menu's applicable to various part's", 20, 60)
GuiCtrlCreateLabel("of the software on this disk.", 20, 72)
GuiCtrlCreateLabel("Each of the menu's above will take you to the relavent tutorial if you click", 20, 84)
GuiCtrlCreateLabel("on it and then click 'Run'.", 20, 96)
GuiCtrlCreateLabel("Other options are included and you are welcome to discover these for", 20, 116)
GuiCtrlCreateLabel("yourself.", 20, 128)
GuiCtrlCreateLabel("First however, you need to install all the relavent applications onto your", 20, 150)
GuiCtrlCreateLabel("computer system. To do this, please click 'Install Applications' in the top", 20, 162)
GuiCtrlCreateLabel("left of your screen", 20, 174)
GuiCtrlCreateTabItem("Tutorials")
GuiCtrlCreateLabel("Included, for your benifit within this CD are 3 tutorials.", 20, 40)
GuiCtrlCreateLabel("These tutorials are designed to get you familiar with working with Auto-it,", 20, 60)
GuiCtrlCreateLabel("Win-spy and JitBit Macro-recorder; the main applications for this magic trick.", 20, 72)
GuiCtrlCreateTabItem("Your Notes")
GuiCtrlCreateLabel("Write any thoughts or sudden insparations in this page blank space.", 20, 40, 350, 20)
GuiCtrlCreateInput("Put your idea's, thoughts and idea's on this.", 40, 70, 310, 150, _
    BitOR($ES_MULTILINE, $ES_WANTRETURN, $PBS_VERTICAL, $PBS_SMOOTH, $ES_AUTOVSCROLL, $ES_LEFT))
GuiCtrlCreateLabel("Please note: Notes will not be stored after you close this program!", 40, 235, 400, 20)
GuiCtrlCreateTabItem("Terms")
GuiCtrlCreateLabel("Please note that this software is given to you under the following conditions:", 20, 40, 400, 20)
GuiCtrlCreateLabel("Please read it ALL VERY CAREFULLY before using any of the resources on this disc!", 20, 40, 400, 32)
$file = GUICtrlCreateEdit("", 40, 70, 310, 150,BitOR($ES_MULTILINE, $ES_READONLY,$WS_VSCROLL), $WS_EX_CLIENTEDGE)
GUICtrlSetData(-1,$spam)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)

$btn = GUICtrlCreateButton("I Agree", 40, 225, 100, 20)
$btn2 = GUICtrlCreateButton("I Disagree", 250, 225, 100, 20)
$spam = GUICtrlSetData($file, "Terms And Conditions for Peter Bryant's 'Macrolism' Software." & @CRLF & @CRLF & "I, the user of Peter Bryant's Macrolism software, hereby declare that I intend to use this software for my benifit and the benifit of any audience who I perform it to." & @CRLF & @CRLF & "I shall keep to Magic Code when using the infomation contained within this software to myself at all costs and not disclose the valuable secrets to ANYONE in any circumstnaces" & @CRLF & @CRLF & "I hereby decalre not to copy, distribute, process, reverse engineer or reference any part of this software without the sole permission of it's creator, Peter Bryant. I also declare to inform any audience I perform this trick too, of the origonal creator.")

GuiCtrlCreateLabel("Empty Label? ", 20, 40, 400, 32)

Dim $avArray

$avArray = _ArrayCreate("&Install Programs", "&Auto-it", "&Win-spy", "&Macro-Recorder", "&Useful Items", "&Help", "Your Notes", "Tutorials", "Getting Started")
GUISetState (@SW_DISABLE)

While 1
$MSG = GUIGetMsg()
    Select
        Case $MSG = $GUI_EVENT_CLOSE
            Exit
        Case $btn
            GUISetState(@SW_ENABLE, $avArray)
        Case $btn2
            Exit
    EndSelect
Wend
While 1
$MSG = GUIGetMsg()
Select
Case $MSG = $GUI_EVENT_CLOSE
Exit
EndSelect
Wend
GUICtrlCreateTabitem ("")   ; end tabitem definition
;-------------------------Functions--------------------------------
Func PingitAutoit() 
    $Ping1 = Ping("www.google.co.uk", 4000)
If $Ping1 = 0 then
    MsgBox (0+64, "Sorry: No Active Connection", "The software could not detect a perfect active connection on this computer, please check your connection settings and try again.") 
Else 
Endif
EndFunc

Func PingitWinSpy() 
    $Ping1 = Ping("www.google.co.uk", 4000)
    If $Ping1 = 0 then
        MsgBox (0+64, "Sorry: No Active Connection", "The software could not detect a perfact active connection on this computer, please check your connection settings and try again.")

Else
Endif
EndFunc

Func PingitJitBit() 
    $Ping1 = Ping("www.google.co.uk", 4000)
    If $Ping1 = 0 then
        MsgBox (0+64, "Sorry: No Active Connection", "The software could not detect a perfect active connection on this computer, please check your connection settings and try again.")

Else
Endif
EndFunc

Func PingitFourm() 
    $Ping1 = Ping("www.google.co.uk", 4000)
    If $Ping1 = 0 then
        MsgBox (0+64, "Sorry: No Active Connection", "The software could not detect a perfect active connection on this computer, please check your connection settings and try again.")
Else
Endif
EndFunc
Func ActivateGUI()
    If $btn = "I Agree" Then
        GUISetState (@SW_UNLOCK)
    Else 
        $btn2 = "I Disagree"
        GUIDelete("Peter Bryant's 'Macrolism' software CD.")
        FileDelete ("C:\MacrolismKey")
        RegDelete("HKEY_CLASSES_ROOT\.pmc\System\Workings\Windows\DeepEntry\SystemFiles\SystemRecovery\Macro\MacrolismKey","MacrolismKey")
        MsgBox (0+64, "Thank You", "All traces of Macrolism have now been removed from your computer. You will no longer be able to access the software. Please contact your seller if you have any problems.")
        Exit
    EndIf
EndFunc
;-----------------------OPERATIONS---------------------------------
$installprograms = GUICtrlCreateMenu ("&Install Programs")
$installprogramsitem = GUICtrlCreateMenuitem ("Run Install",$installprograms)
GUICtrlSetState(-1,$GUI_DEFBUTTON)
;--------------------------------------------------------------
$filemenu = GUICtrlCreateMenu ("&Auto-it")
$runautoittutorial = GUICtrlCreateMenuitem ("&Run Tutorial",$filemenu)
$aboutautoit = GUICtrlCreateMenuitem ("&About",$filemenu)
$autoitwebsite = GUICtrlCreateMenuitem ("&Official Website",$filemenu)
;--------------------------------------------------------------
$filemenu = GUICtrlCreateMenu ("&Win-spy")
$runwinspytutorial = GUICtrlCreateMenuitem ("&Run Tutorial",$filemenu)
$aboutwinspy = GUICtrlCreateMenuitem ("&About",$filemenu)
$winspy = GUICtrlCreateMenuitem ("&Official Website",$filemenu)
;--------------------------------------------------------------
$filemenu = GUICtrlCreateMenu ("&Macro-Recorder")
$runmacrotutorial = GUICtrlCreateMenuitem ("&Run Tutorial",$filemenu)
$aboutmacro = GUICtrlCreateMenuitem ("&About",$filemenu)
$Macro = GUICtrlCreateMenuitem ("&Official Website",$filemenu)
;--------------------------------------------------------------
$filemenu = GUICtrlCreateMenu ("&Useful Items")
$fourm = GUICtrlCreateMenuitem ("&AutoIt Forum",$filemenu)
$paint = GUICtrlCreateMenuitem ("MS &Paint",$filemenu)
$notepad = GUICtrlCreateMenuitem ("MS &Notepad",$filemenu)
;-------------------------------------------------------------
$filemenu = GUICtrlCreateMenu ("&Help")
$runhelpfile = GUICtrlCreateMenuitem ("Help &Software",$filemenu)
$cnotepad = GUICtrlCreateMenuitem ("Calibrate Notepad",$filemenu)
$Screen= GUICtrlCreateMenuitem ("Calibrate Screen",$filemenu)
$website = GUICtrlCreateMenuitem ("Macrolism &Website",$filemenu)
$aboutmacrolism = GUICtrlCreateMenuitem ("About Macrolism",$filemenu)
GUICtrlSetState(-1,$GUI_DISABLE)
;-------------------------INSTALL PROGRAMS-------------------------
While 1
$MSG = GUIGetMsg()
Select
Case $MSG = $installprogramsitem
Run("D:\Program Files\Program Files\Installer.exe")
Exit
;-------------------------AUTOIT-------------------------
Case $MSG = $runautoittutorial
Run("D:\Program Files\Tutorial Files\Autoit Tutorial.exe")
Exit
;-------------------------WINSPY-------------------------
Case $MSG = $runwinspytutorial
Run("D:\Program Files\Tutorial Files\Win-Spy Tutorial.exe")
Exit
;-------------------------MACRO-------------------------
Case $MSG = $runmacrotutorial
Run("D:\Program Files\Tutorial Files\Jitbit Macro Tutorial.exe")
Exit
;-------------------------ABOUT-------------------------
Case $MSG = $aboutautoit
Run("D:\Program Files\Program Files\About Autoit.exe")
;-------------------------------------------------------
Case $MSG = $aboutwinspy
Run("D:\Program Files\Program Files\About Win-Spy.exe")
;-------------------------------------------------------
Case $MSG = $aboutmacro
Run("D:\Program Files\Program Files\About JitBit.exe")
;-------------------------Websites----------------------
Case $MSG = $autoitwebsite
    PingitAutoit()
    _IECreate("http://www.autoitscript.com/")
    Sleep (100)
    WinWait ("AutoIt Script Home Page")
    WinSetOnTop ("AutoIt Script Home Page", "",1)
    WinSetState ("AutoIt Script Home Page", "", @SW_MAXIMIZE)
;-------------------------------------------------------
Case $MSG = $winspy
    PingitWinSpy()
    _IECreate("http://www.win-spy.com")
    Sleep (100)
    WinWait ("Spy Software")
    WinSetOnTop ("Spy Software", "",1)
    WinSetState ("Spy Software", "", @SW_MAXIMIZE)
;-------------------------------------------------------
Case $MSG = $Macro
    PingitJitBit() 
    _IECreate("http://www.jitbit.com/macrorecorder.aspx")
    Sleep (100)
    WinWait ("Macro Recorder")
    WinSetOnTop ("Macro Recorder", "",1)
    WinSetState ("Marco Recorder", "", @SW_MAXIMIZE)
;-------------------------------------------------------
Case $MSG = $fourm
    PingitFourm() 
    _IECreate("http://www.autoitscript.com/forum/index.php?")
    Sleep (100)
    WinWait ("AutoIt Forums")
    WinSetOnTop ("AutoIt Fourms", "",1)
    WinSetState ("AutoIt Fourms", "", @SW_MAXIMIZE)
;-------------------------HelpSoft----------------------
Case $MSG = $runhelpfile
Run("D:\Program Files\Program Files\Help Software.exe")
;------------------------Applicatons--------------------
Case $MSG = $paint
Run("mspaint.exe")
;-------------------------------------------------------
Case $MSG = $notepad
Run("Notepad.exe")
;-------------------------Calibrate---------------------
Case $MSG = $Screen
Run("D:\Program Files\Program Files\Calibrate Screen.exe")
;-------------------------------------------------------
Case $MSG = $Cnotepad
Run("D:\Program Files\Program Files\Calibrate Notepad.exe")
;-------------------------------------------------------
Case $MSG = $aboutmacrolism
Run ("D:\Program Files\Program Files\About Macrolism.exe")
;-------------------------------------------------------
Case $MSG = $GUI_EVENT_CLOSE
Exit
EndSelect
Wend

You may need to delete a ton of stuff to make it work.

 Run (Brain.exe)
.
Link to comment
Share on other sites

Code removed at [Wikipete]'s request. for help or information on topics such as this please search further on the forums, make sure you read the helpfile, and if all else fails shoot me a PM and I would be happy to assist. (If you do not search or read the helpfile first I will not respond.)

Try that, you have a few things that need to be fixed, but all in all, that should work for what you are asking. Case statements work better for buttons than functions, because IF must have a value on the variable. $btn = "I Accept" is not correct.

Edited by Anonymouse
children may smile; the wise ponder- Dr. Holmes of Hardvard Medical School on an Ether BingeLove Makes The World Go Round?So does five shots of tequila. What's your point?[quote name='Valik' date='Jun 5 2008, 05:13 PM']wraithdu, 24 hours. Said I have a bad attitude, just driving the point home with a ban.[/quote]This is classic. :)
Link to comment
Share on other sites

Code Removed.

Try that, you have a few things that need to be fixed, but all in all, that should work for what you are asking. Case statements work better for buttons than functions, because IF must have a value on the variable. $btn = "I Accept" is not correct.

Edited by Wikipete
 Run (Brain.exe)
.
Link to comment
Share on other sites

Thanks very much... do you know why it might be flashing very fast?

Thank You!

Oh yeah, forgot to mention. Combine your While statements, the more loops you have looping indefinitely the slower your program - this might also be causing your flashing.

Without all of the files and ini's and full script and not being able to see exactly what is flashing or when, it's hard to determine why.

[edit] The cleaner your code is written also makes it easier to read and find problems. You also don't have to put "$msg = $whatever" on every Case statement, as you can see with the part that I edited for you.[/edit]

Oh yeah, you're doing really well, too. Just a few things in the wrong spots and a few things repeated that isn't needed (we'll call that efficiency :)). But you have the right idea, and you know what you want to do and how to do it, you just used the wrong statement for it. Keep it up :P

Edited by Anonymouse
children may smile; the wise ponder- Dr. Holmes of Hardvard Medical School on an Ether BingeLove Makes The World Go Round?So does five shots of tequila. What's your point?[quote name='Valik' date='Jun 5 2008, 05:13 PM']wraithdu, 24 hours. Said I have a bad attitude, just driving the point home with a ban.[/quote]This is classic. :)
Link to comment
Share on other sites

Oh yeah, forgot to mention. Combine your While statements, the more loops you have looping indefinitely the slower your program - this might also be causing your flashing.

Without all of the files and ini's and full script and not being able to see exactly what is flashing or when, it's hard to determine why.

[edit] The cleaner your code is written also makes it easier to read and find problems. You also don't have to put "$msg = $whatever" on every Case statement, as you can see with the part that I edited for you.[/edit]

Oh yeah, you're doing really well, too. Just a few things in the wrong spots and a few things repeated that isn't needed (we'll call that efficiency :P). But you have the right idea, and you know what you want to do and how to do it, you just used the wrong statement for it. Keep it up :P

Thanks very much :).
 Run (Brain.exe)
.
Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...