Remote Control

[Paulie]

I am writing a script that uses AIM to run scripts and do things on my computer, when i send appropriate commands via my cell

heres the code i have, but it isn't working can anyone help me?

expandcollapse popup

while 1
    If WinExists("sandels02 : sandel       s01 - Instant Message") then
            While WinExists("sandels02 : sandel    s01 - Instant Message")
        $message = WinGetText("sandels02:sandel    s01 - Instant Message")   
                     $shutdown = StringinStr($message,"*shutdown*","1")
             If $shutdown>0 then
             Shutdown(1)
                     Endif
              $restart = StringinStr($message,"*restart*","1") 
             If $restart>0 then
             Shutdown(2)
                     Endif
                      $signoff = StringinStr($message,"*sign off*","1") 
             If $signoff>0 then
             Processclose("aim.exe")
                     Endif
                      $topopen = StringinStr($message,"*tCDtray open*","1") 
             If $topopen>0 then
             CDtray("E:","open")
                     Endif
                      $topclose = StringinStr($message,"*tCDtray close*","1") 
             If $topclose>0 then
             Msgbox(0,"bls","blablab")
             #cs
             CDtray("E:","closed")
                     #ce
             Endif
                      $botopen =  StringinStr($message,"*bCDtray open*","1") 
             If $botopen>0 then
             CDtray("F:","open")
                     Endif
                      $botclose = StringinStr($message,"*bCDtray close*","1")
             If $botclose>0 then
             CDtray("F:","closed")
                 Endif
         Wend
    EndIf
Wend

I am also planning on making it run scripts

[BigDod]

You might want to checkout This Topic for ideas.