Jump to content

AdLibRegister looping?

Damein
 Share

Recommended Posts

Damein Universalist

Damein

Posted
Posted (edited)

Hey, so I'm not quite sure how I am using this wrong (Maybe I'm not understanding how it works?)

 

First off: You'll see a lot of the word "Game" in there. This is not to use on a game, I am making the game. If further proof is necessary I will post the source for the game; since this section is only a module to the game, one specific mode of it.

 

But I have a function I need executed every X seconds so I'm using Adlib.

 

Now it works just fine until I want it to stop. But even after using AdlibUnRegister it seems to be continuing and I'm not sure why.

 

Entire Source: 

Global $DefaultGameResultsGUI, $MainMenuGUI, $TotalTargetsHit, $TotalTargetsAccuracy, $TotalTargetsMissed, $TotalTargetsShown
Global $Difficulty, $DefaultGameGUI, $Attempt, $DisplayTargetsAccuracy, $DisplayTotalTargetsHit, $DisplayTotalTargetsMissed, $DisplayTotalTargetsShown
Global $TargetImage, $MissImage, $StatusImage, $TotalTimeTaken, $DisplayTotalTimeTaken, $BeatGame, $CalculateDifference = 0, $Minutes = 0, $Seconds = 0
Global $StartTimer, $RecordsData, $FirstRun = 0

Func _DefaultGame()
    $CurrentGUI = "DefaultGame"
    GUIDelete($DefaultGameResultsGUI)
    GUIDelete($MainMenuGUI)
    $TotalTargetsAccuracy = 0
    $TotalTargetsHit = 115
    $TotalTargetsMissed = 0
    $TotalTargetsShown = 0
    $StopGame = 0
    $FirstRun = 0
    $Attempt = 0
    $BeatGame = 0
    $CalculateDifference = 0
    $Minutes = 0
    $Seconds = 0

    $DefaultGameGUI = GUICreate("Default Game", 700, 600)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_CloseGui")

    _GDIPlus_Startup()

    $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/Grid.png") ;<-- your image
    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)
    $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)

    $iPic = GUICtrlCreatePic("", -60, -230, $iWidth, $iHeight)



    _WinAPI_DeleteObject(GUICtrlSendMsg($iPic, 0x0172, $IMAGE_BITMAP, $hGDIBitmap)) ;$STM_SETIMAGE = 0x0172
    _WinAPI_DeleteObject($hGDIBitmap)



    GUISetState()

    $PenGraphic = _GDIPlus_GraphicsCreateFromHWND($DefaultGameGUI)
    $hPen = _GDIPlus_PenCreate()
    _GDIPlus_GraphicsDrawLine($PenGraphic, 0, 540, 700, 540, $hPen)
    _GDIPlus_PenDispose($hPen)

    GUICtrlCreateLabel("Total Targets", 30, 541, 300, 30)
    GUICtrlSetFont(-1, 15)

    $DisplayTotalTargetsShown = GUICtrlCreateInput("", 15, 565, 150, 30, BitOR($ES_CENTER, $ES_READONLY))
    GUICtrlSetColor(-1, 0xffffff)
    GUICtrlSetFont(-1, 15)

    GUICtrlCreateLabel("Targets Missed", 191, 541, 300, 30)
    GUICtrlSetFont(-1, 15)

    $DisplayTotalTargetsMissed = GUICtrlCreateInput("", 185, 565, 150, 30, BitOR($ES_CENTER, $ES_READONLY))
    GUICtrlSetColor(-1, 0xf41a1a)
    GUICtrlSetFont(-1, 15)

    GUICtrlCreateLabel("Targets Hit", 395, 541, 300, 30)
    GUICtrlSetFont(-1, 15)

    $DisplayTotalTargetsHit = GUICtrlCreateInput("", 370, 565, 150, 30, BitOR($ES_CENTER, $ES_READONLY))
    GUICtrlSetColor(-1, 0x26ff00)
    GUICtrlSetFont(-1, 15)

    GUICtrlCreateLabel("Accuracy", 570, 541, 300, 30)
    GUICtrlSetFont(-1, 15)

    $DisplayTargetsAccuracy = GUICtrlCreateInput("", 540, 565, 150, 30, BitOR($ES_CENTER, $ES_READONLY))
    GUICtrlSetColor(-1, 0xffffff)
    GUICtrlSetFont(-1, 15)


    SoundPlay(@ScriptDir & "/Sounds/Clock.wav")
    $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/5.png") ;<-- your image
    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)
    $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)


    $5Image = GUICtrlCreatePic("", 300, 200, $iWidth, $iHeight)

    _WinAPI_DeleteObject(GUICtrlSendMsg($5Image, 0x0172, $IMAGE_BITMAP, $hGDIBitmap)) ;$STM_SETIMAGE = 0x0172
    _WinAPI_DeleteObject($hGDIBitmap)

    Sleep(1000)

    GUICtrlDelete($5Image)


    SoundPlay(@ScriptDir & "/Sounds/Clock.wav")
    $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/4.png") ;<-- your image
    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)
    $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)



    $4Image = GUICtrlCreatePic("", 300, 200, $iWidth, $iHeight)

    _WinAPI_DeleteObject(GUICtrlSendMsg($4Image, 0x0172, $IMAGE_BITMAP, $hGDIBitmap)) ;$STM_SETIMAGE = 0x0172
    _WinAPI_DeleteObject($hGDIBitmap)

    Sleep(1000)

    GUICtrlDelete($4Image)

    SoundPlay(@ScriptDir & "/Sounds/Clock.wav")
    $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/3.png") ;<-- your image
    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)
    $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)



    $3Image = GUICtrlCreatePic("", 300, 200, $iWidth, $iHeight)

    _WinAPI_DeleteObject(GUICtrlSendMsg($4Image, 0x0172, $IMAGE_BITMAP, $hGDIBitmap)) ;$STM_SETIMAGE = 0x0172
    _WinAPI_DeleteObject($hGDIBitmap)

    Sleep(1000)

    GUICtrlDelete($3Image)

    SoundPlay(@ScriptDir & "/Sounds/Clock.wav")
    $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/2.png") ;<-- your image
    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)
    $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)



    $2Image = GUICtrlCreatePic("", 300, 200, $iWidth, $iHeight)

    _WinAPI_DeleteObject(GUICtrlSendMsg($4Image, 0x0172, $IMAGE_BITMAP, $hGDIBitmap)) ;$STM_SETIMAGE = 0x0172
    _WinAPI_DeleteObject($hGDIBitmap)

    Sleep(1000)

    GUICtrlDelete($2Image)

    SoundPlay(@ScriptDir & "/Sounds/Clock.wav")
    $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/1.png") ;<-- your image
    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)
    $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)



    $1Image = GUICtrlCreatePic("", 300, 200, $iWidth, $iHeight)

    _WinAPI_DeleteObject(GUICtrlSendMsg($4Image, 0x0172, $IMAGE_BITMAP, $hGDIBitmap)) ;$STM_SETIMAGE = 0x0172
    _WinAPI_DeleteObject($hGDIBitmap)

    Sleep(1000)

    GUICtrlDelete($1Image)

    SoundPlay(@ScriptDir & "/Sounds/Clock.wav")
    $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/0.png") ;<-- your image
    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)
    $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)



    $0Image = GUICtrlCreatePic("", 300, 200, $iWidth, $iHeight)

    _WinAPI_DeleteObject(GUICtrlSendMsg($4Image, 0x0172, $IMAGE_BITMAP, $hGDIBitmap)) ;$STM_SETIMAGE = 0x0172
    _WinAPI_DeleteObject($hGDIBitmap)

    SoundPlay(@ScriptDir & "/Sounds/Start Round.wav")

    Sleep(1100)


    GUICtrlDelete($0Image)
    _GDIPlus_ImageDispose($hImage)
    _GDIPlus_Shutdown()

    $StartTimer = _Timer_Init()

    _PlayDefaultGame()


EndFunc   ;==>_DefaultGame

Func _PlayDefaultGame()


    $RandomX = Random(10, 550, 1)
    $RandomY = Random(10, 460, 1)

    _GDIPlus_Startup()

    If $TotalTargetsHit < 30 Then

        $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/LargeTarget.png") ;<-- your image

    ElseIf $TotalTargetsHit < 80 And $TotalTargetsHit >= 30 Then

        $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/MediumTarget.png") ;<-- your image

    ElseIf $TotalTargetsHit < 120 And $TotalTargetsHit >= 80 Then

        $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/SmallTarget.png") ;<-- your image

    EndIf

    If $TotalTargetsHit >= 120 Then
        _GDIPlus_Shutdown()
        AdlibUnRegister("_MissedDefaultGame")
        _Timer_KillAllTimers($DefaultGameGUI)
        $StopGame = 1
        $BeatGame = 1
        $TotalTimeTaken = _Timer_Diff($StartTimer)
        $TotalTimeTaken = Round($TotalTimeTaken)
        $CalculateDifference = $TotalTimeTaken - 180000
        While $CalculateDifference < -60000
            $Minutes += 1
            $CalculateDifference += 60000
        WEnd


        While $CalculateDifference < 0
            $Seconds += 1
            $CalculateDifference += 1000
        WEnd

        $TotalTimeTaken = $Minutes & ":" & $Seconds

        _DefaultGameResults()
    EndIf

    If $StopGame = 0 Then

        $iWidth = _GDIPlus_ImageGetWidth($hImage)
        $iHeight = _GDIPlus_ImageGetHeight($hImage)
        $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)

        $TargetImage = GUICtrlCreatePic("", $RandomX, $RandomY, $iWidth, $iHeight)

        _WinAPI_DeleteObject(GUICtrlSendMsg($TargetImage, 0x0172, $IMAGE_BITMAP, $hGDIBitmap)) ;$STM_SETIMAGE = 0x0172
        _WinAPI_DeleteObject($hGDIBitmap)

        _GDIPlus_ImageDispose($hImage)
        _GDIPlus_Shutdown()



        $TargetX = $RandomX
        $TargetY = $RandomY
        $TargetHeight = $iHeight
        $TargetWidth = $iWidth


        If $Difficulty = 1 Then
            AdlibUnRegister("_MissedDefaultGame")
            AdlibRegister("_MissedDefaultGame", 1800)
        ElseIf $Difficulty = 2 Then
            AdlibUnRegister("_MissedDefaultGame")
            AdlibRegister("_MissedDefaultGame", 1000)
        ElseIf $Difficulty = 3 Then
            AdlibUnRegister("_MissedDefaultGame")
            AdlibRegister("_MissedDefaultGame", 800)
        ElseIf $Difficulty = 4 Then
            AdlibUnRegister("_MissedDefaultGame")
            AdlibRegister("_MissedDefaultGame", 600)
        EndIf
    EndIf

EndFunc   ;==>_PlayDefaultGame

Func _DefaultGameResults()
    $StopGame = 0
    $StartTimer = ""
    $CheckTime = ""
    $CurrentGUI = "DefaultGameResults"
    GUIDelete($DefaultGameGUI)
    $DefaultGameResultsGUI = GUICreate("Results", 500, 500)
    GUISetOnEvent($GUI_EVENT_CLOSE, "_CloseGui")

    GUICtrlCreateGroup("", 140, 5, 210, 210)

    _GDIPlus_Startup()

    If $BeatGame = 1 Then

        $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/WonGame.png") ;<-- your image

    ElseIf $BeatGame = 0 Then

        $hImage = _GDIPlus_ImageLoadFromFile(@ScriptDir & "\Images/LostGame.png") ;<-- your image
        $TotalTimeTaken = "3:00"

    EndIf

    $iWidth = _GDIPlus_ImageGetWidth($hImage)
    $iHeight = _GDIPlus_ImageGetHeight($hImage)
    $hGDIBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage)

    $StatusImage = GUICtrlCreatePic("", 145, 13, $iWidth, $iHeight)

    _WinAPI_DeleteObject(GUICtrlSendMsg($StatusImage, 0x0172, $IMAGE_BITMAP, $hGDIBitmap)) ;$STM_SETIMAGE = 0x0172
    _WinAPI_DeleteObject($hGDIBitmap)

    _GDIPlus_ImageDispose($hImage)
    _GDIPlus_Shutdown()

    GUICtrlCreateLabel("Time Left", 200, 220, 150, 30)
    GUICtrlSetFont(-1, 15)

    $DisplayTotalTimeTaken = GUICtrlCreateInput($TotalTimeTaken, 170, 250, 150, 30, BitOR($ES_CENTER, $ES_READONLY))
    GUICtrlSetFont(-1, 15)

    If $BeatGame = 0 Then
        GUICtrlSetColor($DisplayTotalTimeTaken, 0xf41a1a)
    ElseIf $BeatGame = 1 Then
        GUICtrlSetColor($DisplayTotalTimeTaken, 0x26ff00)
    EndIf

    GUICtrlCreateLabel("Targets Missed", 180, 320, 300, 30)
    GUICtrlSetFont(-1, 15)

    $DisplayTotalTargetsMissed = GUICtrlCreateInput($TotalTargetsMissed, 175, 350, 150, 30, BitOR($ES_CENTER, $ES_READONLY))
    GUICtrlSetColor(-1, 0xf41a1a)
    GUICtrlSetFont(-1, 15)

    GUICtrlCreateLabel("Targets Hit", 33, 320, 100, 30)
    GUICtrlSetFont(-1, 15)

    $DisplayTotalTargetsHit = GUICtrlCreateInput($TotalTargetsHit, 10, 350, 150, 30, BitOR($ES_CENTER, $ES_READONLY))
    GUICtrlSetColor(-1, 0x26ff00)
    GUICtrlSetFont(-1, 15)

    GUICtrlCreateLabel("Accuracy", 375, 320, 300, 30)
    GUICtrlSetFont(-1, 15)

    $DisplayTargetsAccuracy = GUICtrlCreateInput($TotalTargetsAccuracy & "%", 340, 350, 150, 30, BitOR($ES_CENTER, $ES_READONLY))
    GUICtrlSetColor(-1, 0xffffff)
    GUICtrlSetFont(-1, 15)

    If $TotalTargetsAccuracy < 0 Then
        GUICtrlSetColor($DisplayTargetsAccuracy, 0xf41a1a)
    Else
        GUICtrlSetColor($DisplayTargetsAccuracy, 0x26ff00)
    EndIf

    $RetryDefaultGameButton = GUICtrlCreateButton("Play Again", 10, 400, 160, 80)
    GUICtrlSetOnEvent(-1, "_DefaultGame")
    GUICtrlSetFont(-1, 14)

    $MainMenuButton = GUICtrlCreateButton("Main Menu", 330, 400, 160, 80)
    GUICtrlSetOnEvent(-1, "_CloseGui")
    GUICtrlSetFont(-1, 14)
    GUISetState()

    $RecordsData = IniReadSection(@ScriptDir & "/Data/Records.ini", "Classic")

    If $TotalTimeTaken > $RecordsData[1][1] Then
        IniWrite(@ScriptDir & "/Data/Records.ini", "Classic", "1", $TotalTimeTaken)
        IniWrite(@ScriptDir & "/Data/Records.ini", "Classic", "2", $TotalTargetsHit)
        IniWrite(@ScriptDir & "/Data/Records.ini", "Classic", "3", $TotalTargetsMissed)
        IniWrite(@ScriptDir & "/Data/Records.ini", "Classic", "4", $TotalTargetsAccuracy)
        GUISetState(@SW_DISABLE, $DefaultGameResultsGUI)
        MsgBox(0, "Record!", "New best!")
        GUISetState(@SW_ENABLE, $DefaultGameResultsGUI)
        Sleep(100)
        WinActivate($DefaultGameResultsGUI)
    EndIf

EndFunc   ;==>_DefaultGameResults



Func _MissedDefaultGame()
    If $Attempt = 0 Then
        $TotalTargetsMissed += 1
        GUICtrlSetData($DisplayTotalTargetsMissed, $TotalTargetsMissed)
        $TotalTargetsShown += 1
        GUICtrlSetData($DisplayTotalTargetsShown, $TotalTargetsShown)
        $CalculateAccuracy = (($TotalTargetsHit - $TotalTargetsMissed) / $TotalTargetsShown) * 100
        If $CalculateAccuracy = 100 Then
            $TotalTargetsAccuracy = $CalculateAccuracy
            GUICtrlSetData($DisplayTargetsAccuracy, $TotalTargetsAccuracy & "%")
        Else
            $TotalTargetsAccuracy = $CalculateAccuracy
            $TotalTargetsAccuracy = Round($TotalTargetsAccuracy)
            GUICtrlSetData($DisplayTargetsAccuracy, $TotalTargetsAccuracy & "%")
        EndIf
        If $TotalTargetsAccuracy < 0 Then
            GUICtrlSetColor($DisplayTargetsAccuracy, 0xf41a1a)
        Else
            GUICtrlSetColor($DisplayTargetsAccuracy, 0x26ff00)
        EndIf
        GUICtrlDelete($TargetImage)
        GUICtrlDelete($MissImage)
        _PlayDefaultGame()
    EndIf
EndFunc   ;==>_MissedDefaultGame

 

Section:

  

If $Difficulty = 1 Then
            AdlibUnRegister("_MissedDefaultGame") ; I did not have these in my original since I was under the impression reregistering a function removed all previous registrations but since it didn't seem to work I added these in for a safe measure.
            AdlibRegister("_MissedDefaultGame", 1800)
        ElseIf $Difficulty = 2 Then
            AdlibUnRegister("_MissedDefaultGame")
            AdlibRegister("_MissedDefaultGame", 1000)
        ElseIf $Difficulty = 3 Then
            AdlibUnRegister("_MissedDefaultGame")
            AdlibRegister("_MissedDefaultGame", 800)
        ElseIf $Difficulty = 4 Then
            AdlibUnRegister("_MissedDefaultGame")
            AdlibRegister("_MissedDefaultGame", 600)
        EndIf
        
        
        ;;; Function
        
        Func _MissedDefaultGame()
    If $Attempt = 0 Then
        $TotalTargetsMissed += 1
        GUICtrlSetData($DisplayTotalTargetsMissed, $TotalTargetsMissed)
        $TotalTargetsShown += 1
        GUICtrlSetData($DisplayTotalTargetsShown, $TotalTargetsShown)
        $CalculateAccuracy = (($TotalTargetsHit - $TotalTargetsMissed) / $TotalTargetsShown) * 100
        If $CalculateAccuracy = 100 Then
            $TotalTargetsAccuracy = $CalculateAccuracy
            GUICtrlSetData($DisplayTargetsAccuracy, $TotalTargetsAccuracy & "%")
        Else
            $TotalTargetsAccuracy = $CalculateAccuracy
            $TotalTargetsAccuracy = Round($TotalTargetsAccuracy)
            GUICtrlSetData($DisplayTargetsAccuracy, $TotalTargetsAccuracy & "%")
        EndIf
        If $TotalTargetsAccuracy < 0 Then
            GUICtrlSetColor($DisplayTargetsAccuracy, 0xf41a1a)
        Else
            GUICtrlSetColor($DisplayTargetsAccuracy, 0x26ff00)
        EndIf
        GUICtrlDelete($TargetImage)
        GUICtrlDelete($MissImage)
        _PlayDefaultGame()
    EndIf
EndFunc   ;==>_MissedDefaultGame


;;; UnRegister Section

If $TotalTargetsHit >= 120 Then
        _GDIPlus_Shutdown()
        AdlibUnRegister("_MissedDefaultGame")
        _Timer_KillAllTimers($DefaultGameGUI)
        $StopGame = 1
        $BeatGame = 1
        $TotalTimeTaken = _Timer_Diff($StartTimer)
        $TotalTimeTaken = Round($TotalTimeTaken)
        $CalculateDifference = $TotalTimeTaken - 180000
        While $CalculateDifference < -60000
            $Minutes += 1
            $CalculateDifference += 60000
        WEnd


        While $CalculateDifference < 0
            $Seconds += 1
            $CalculateDifference += 1000
        WEnd

        $TotalTimeTaken = $Minutes & ":" & $Seconds

        _DefaultGameResults()
    EndIf

 

But even though I seemlingly unregistered it the thing still fires the MissedDefaultGame function afterwards. I have added in test Msgbox's to the UnRegister / Func and all and have verified all have executed.

Edited by Damein

MCR.jpg?t=1286371579

Most recent sig. I made

Quick Launcher W/ Profiles Topic Movie Database Topic & Website | LiveStreamer Pro Website | YouTube Stand-Alone Playlist Manager: Topic | Weather Desktop Widget: Topic | Flash Memory Game: Topic | Volume Control With Mouse / iTunes Hotkeys: Topic | Weather program: Topic | Paws & Tales radio drama podcast mini-player: Topic | Quick Math Calculations: Topic

Link to comment
Share on other sites
  • Moderators
Melba23 Universalist

Melba23

Posted
  • Moderators
Posted

Damein,

Adlib works fine - as you can see from this little script: 

#include <GUIConstantsEx.au3>

$hGUI = GUICreate("Test", 500, 500)

$c_0500 = GUICtrlCreateButton("500",  10,  10, 80, 30)
$c_1000 = GUICtrlCreateButton("1000", 10,  60, 80, 30)
$c_1500 = GUICtrlCreateButton("1500", 10, 110, 80, 30)
$c_2000 = GUICtrlCreateButton("2000", 10, 160, 80, 30)
$c_Stop = GUICtrlCreateButton("Stop", 10, 210, 80, 30)

GUISetState()

While 1

    Switch GUIGetMsg()
        Case $GUI_EVENT_CLOSE
            Exit
        Case $c_0500
            ConsoleWrite("Interval: 500" & @CRLF)
            AdlibRegister("_CW", 500)
        Case $c_1000
            ConsoleWrite("Interval: 1000" & @CRLF)
            AdlibRegister("_CW", 1000)
        Case $c_1500
            ConsoleWrite("Interval: 1500" & @CRLF)
            AdlibRegister("_CW", 1500)
        Case $c_2000
            ConsoleWrite("Interval: 2000" & @CRLF)
            AdlibRegister("_CW", 2000)
        Case $c_Stop
            ConsoleWrite("Stopped" & @CRLF)
            AdlibUnRegister("_CW")
    EndSwitch

WEnd

Func _CW()

    ConsoleWrite("Actioned: " & @SEC & "." & @MSEC & @CRLF)

EndFunc

So there must be something else in your script - I will take a look later.

M23

Public_Domain.png.2d871819fcb9957cf44f4514551a2935.png Any of my own code posted anywhere on the forum is available for use by others without any restriction of any kind

Open spoiler to see my UDFs:

Spoiler

ArrayMultiColSort ---- Sort arrays on multiple columns
ChooseFileFolder ---- Single and multiple selections from specified path treeview listing
Date_Time_Convert -- Easily convert date/time formats, including the language used
ExtMsgBox --------- A highly customisable replacement for MsgBox
GUIExtender -------- Extend and retract multiple sections within a GUI
GUIFrame ---------- Subdivide GUIs into many adjustable frames
GUIListViewEx ------- Insert, delete, move, drag, sort, edit and colour ListView items
GUITreeViewEx ------ Check/clear parent and child checkboxes in a TreeView
Marquee ----------- Scrolling tickertape GUIs
NoFocusLines ------- Remove the dotted focus lines from buttons, sliders, radios and checkboxes
Notify ------------- Small notifications on the edge of the display
Scrollbars ----------Automatically sized scrollbars with a single command
StringSize ---------- Automatically size controls to fit text
Toast -------------- Small GUIs which pop out of the notification area

 

Link to comment
Share on other sites
Damein Universalist

Damein

Posted
  • Author
Posted

Ah, I found out why.

 

I had 

$StopGame = 0

 

In the _DefaultGameResults() function. Which after the function fires it continues through to the end of the _PlayDefaultGame() function which reregisters the Adlib since $StopGame was assigned to 0 again.

 

Thanks anyways!

MCR.jpg?t=1286371579

Most recent sig. I made

Quick Launcher W/ Profiles Topic Movie Database Topic & Website | LiveStreamer Pro Website | YouTube Stand-Alone Playlist Manager: Topic | Weather Desktop Widget: Topic | Flash Memory Game: Topic | Volume Control With Mouse / iTunes Hotkeys: Topic | Weather program: Topic | Paws & Tales radio drama podcast mini-player: Topic | Quick Math Calculations: Topic

Link to comment
Share on other sites
Damein Universalist

Damein

Posted
  • Author
Posted

Uploading it now actually :)

 

Look for it in the Examples!

MCR.jpg?t=1286371579

Most recent sig. I made

Quick Launcher W/ Profiles Topic Movie Database Topic & Website | LiveStreamer Pro Website | YouTube Stand-Alone Playlist Manager: Topic | Weather Desktop Widget: Topic | Flash Memory Game: Topic | Volume Control With Mouse / iTunes Hotkeys: Topic | Weather program: Topic | Paws & Tales radio drama podcast mini-player: Topic | Quick Math Calculations: Topic

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
Go to topic listing

  • Recently Browsing   0 members

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