Finding Unwanted String

[RazerM]

I have created a number game:

CODE

#include <GUIConstants.au3>

GUICreate("Number Game", 500, 600)

$numbers=GUICtrlCreateLabel("000", 231, 20, 50)

GUICtrlSetFont($numbers, 18)

$gen = GUICtrlCreateButton("Generate", 210, 50, 80, 25, $BS_DEFPUSHBUTTON)

GUICtrlCreateLabel("Small: Big:", 55, 75)

GUICtrlCreateLabel("Numbers:", 5, 93)

$small = GUICtrlCreateInput(5, 55, 90, 60, 20, $ES_CENTER)

$big = GUICtrlCreateInput(1, 120, 90, 60, 20, $ES_CENTER)

$sum = GUICtrlCreateInput("", 200, 150, 200)

$try = GUICtrlCreateButton("Try", 410, 150)

$sbnumbers = GUICtrlCreateInput("",1000,1000);not used

GUISetState()

While 1

Switch GUIGetMsg()

Case $GUI_EVENT_CLOSE

Exit

Case $gen

Gen()

Case $try

If Execute(GUICtrlRead($sum)) = GUICtrlRead($numbers) Then MsgBox(0, "Well done", "You got " & Execute(GUICtrlRead($sum)) & @CRLF & "You successfully completed the challenge")

If Execute(GUICtrlRead($sum)) <> GUICtrlRead($numbers) Then MsgBox(0, "Unlucky", "You were " & Abs(Execute(GUICtrlRead($sum))-GUICtrlRead($numbers)) & " away from the number")

;~ Case $msg =

;~ Case $msg =

EndSwitch

WEnd

Func Gen()

GUICtrlDelete($sbnumbers)

GUICtrlSetData($sum, "")

For $i = 1 To 20

$rand = Random(100, 999, 1)

GUICtrlSetData($numbers, $rand)

Sleep(50)

If GUIGetMsg() = $GUI_EVENT_CLOSE Then Exit

Next

$bign = GUICtrlRead($big)

$smalln = GUICtrlRead($small)

If $smalln + $bign > 6 Then

MsgBox(48, "Numbers", "A maximum of 6 numbers is allowed")

If $bign > $smalln Then

$bigger = 1

ElseIf $bign <= $smalln Then

$bigger = 2

EndIf

Do

$bign = GUICtrlRead($big)

$smalln = GUICtrlRead($small)

If $bigger = 1 Then

GUICtrlSetData($big, $bign - 1)

ElseIf $bigger = 2 Then

GUICtrlSetData($small, $smalln - 1)

EndIf

Until GUICtrlRead($big) + GUICtrlRead($small) = 6

EndIf

$bign = GUICtrlRead($big)

$smalln = GUICtrlRead($small)

$rand = Random(1,4,1)

If $rand = 1 Then $rand = 25

If $rand = 2 Then $rand = 50

If $rand = 3 Then $rand = 75

If $rand = 4 Then $rand = 100

$sbnumbers = GUICtrlCreateLabel($rand, 190, 92, 200)

For $i = 1 To $bign - 1

$rand = Random(1,4,1)

If $rand = 1 Then $rand = 25

If $rand = 2 Then $rand = 50

If $rand = 3 Then $rand = 75

If $rand = 4 Then $rand = 100

GUICtrlSetData($sbnumbers, GUICtrlRead($sbnumbers) & ", " & $rand)

Next

$rand = Random(1,10,1)

GUICtrlSetData($sbnumbers, GUICtrlRead($sbnumbers) & ", " & $rand)

For $i = 1 To $smalln - 1

$rand = Random(1,10,1)

GUICtrlSetData($sbnumbers, GUICtrlRead($sbnumbers) & ", " & $rand)

Next

EndFunc

when you click generate, six numbers appear, the idea is you must get the large 3 digit number using the six numbers at most once each and +-/* I want my program to check that any numbers except the six random ones are not allowed

It might go something like this:

expandcollapse popup

_CheckOnlyStrings("string", "allowed|allowed2")
And _CheckOnlyStrings("string", "allowed|allowed2") would return 0 if "string" had anything except allowed or allowed2


            
                


    Edited April 25, 2006 by RazerM
    
    

            
        

        

        
            

    
        

        
            
My Programs:AInstall - Create a standalone installer for your programUnit Converter - Converts Length, Area, Volume, Weight, Temperature and Pressure to different unitsBinary Clock - Hours, minutes and seconds have 10 columns each to display timeAutoIt Editor - Code Editor with Syntax Highlighting.Laserix Editor & Player - Create, Edit and Play Laserix LevelsLyric Syncer - Create and use Synchronised Lyrics.Connect 4 - 2 Player Connect 4 Game (Local or Online!, Formatted Chat!!)MD5, SHA-1, SHA-256, Tiger and Whirlpool Hash Finder - Dictionary and Brute Force FindCool Text Client - Create Rendered ImageMy UDF's:GUI Enhance - Enhance your GUIs visually.IDEA File Encryption - Encrypt and decrypt files easily! File Rename - Rename files easilyRC4 Text Encryption - Encrypt text using the RC4 AlgorithmPrime Number - Check if a number is primeString Remove - remove lots of strings at onceProgress Bar - made easySound UDF - Play, Pause, Resume, Seek and Stop.
        
    

        
    

    

    




    Link to comment
    
        
    
    
    

    
    Share on other sites
    

    
        
            

    

        
            

    

        
            

    

        
            

    

        
    


    
    More sharing options...

    


    

                    
                    
                    
                

                    

                    
                    





    

    

    
        
            
                


    
        
    

                
                
                    
                        

                    
                
            
        
        
            
                


elgabionline
            
            
                Posted April 25, 2006
                
            
        
    
    
        


elgabionline
            
        
        
            
                
                    


    
        
    

                    
                    
                        

                    
                
            
            
                Active Members
                
            
            
                
                    
                        
                            
                                
                            
                                 105
                            
                                
                            
                        
                        
                    
                
            
            
                

            
        
    
    
        



    
        
            
                
                    
                    
                    
                    
                    
                
            
            
                
                    
                    
                        
                        
                            Share
                        
                        
                        
                        
                        
                            
                                
                            
                            
                            
                            
                            
                            
                        
                    
                
                
            
        

        
            Posted April 25, 2006
            
            
                
                
            
        
    

    

    

    
        
        
            I have created a number game:

It might go something like this:
_CheckOnlyStrings("string", "allowed|allowed2")
And _CheckOnlyStrings("string", "allowed|allowed2")

would return 0 if "string" had anything except allowed or allowed2

[RazerM]

thanks that is perfect

Edited April 25, 2006 by RazerM