Do Until and Else If

[layer]

Here, I'll give part of the code, just the basics...

Do
    $get = GUIGetMsg()
    if $get = $f then
        CDtray ("F:", "Open")
     elseif $get= $e Then
        CDtray ("E:", "Open")
             else 
        if $get= $a Then
           CdTray ("A:", "Open")
Until $get = $GUI_EVENT_CLOSE

im not sure how to fit all of those else's and if's in the do until...anyone have any ideas?

[the_lord_mephy]

You have no EndIfs.

Do
   $get = GUIGetMsg()
   if $get = $f then
       CDtray ("F:", "Open")
    elseif $get= $e Then
       CDtray ("E:", "Open")
    elseif $get= $a Then
          CdTray ("A:", "Open")
    EndIf
Until $get = $GUI_EVENT_CLOSE

Why don't you do something like this though:

While 1
   $get = GUIGetMsg()
   Select
   Case $get = $GUI_EVENT_CLOSE
       ExitLoop
   Case $get = $f
       CDtray ("F:", "Open")
    Case $get= $e
       CDtray ("E:", "Open")
    Case $get= $a
          CdTray ("A:", "Open")
    Endselect
WEnd

[Edit]

Code fixed

Edited November 13, 2004 by the_lord_mephy

[layer]

thank you sir, works great, i used your suggestion too with the While 1 and Wend instead of Do Until

Except, there is supposed to be no "then" statements in the Case thing.

Thank you!

[the_lord_mephy]

Oh yeah whoops I just copy pasted your script and replaced the elseifs with Cases. whoops gunna fix that