Announcement

Collapse
No announcement yet.

Need Help with ExtPlug exemple

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Need Help with ExtPlug exemple

    Hello all,

    I try to create my first VB6 plugin for RR and use the ExtPlug files like example.
    I want just to set ON an indicator when the plugin is launched.

    Is the good way to add my RR command , i think no because i have an undefined variable error when i compile the dll !
    Code:
    Private Sub Class_Initialize()
    'Code here is executed when loading the Extension plugin
     RRSDK.Execute ("SETIND;GMAILNOTIFIER;ON")
    End Sub
    In this case, what is the difference between COMSend "RoadRunner", "SETIND;GMAILNOTIFIER;ON" and RRSDK.Execute ("SETIND;GMAILNOTIFIER;ON")

    Thanks

  • #2
    COMSend is depreciated from extension plugins
    it was how you did things before extension plugins
    dont use
    -Thanks
    Mitch
    www.rush2112.net

    "Did you test it in carwings??"

    Sun, Come shine my way
    May healing waters bury all my pain
    Wind, Carry me home
    The fabric of reality is tearing apart
    The piece of me that died
    Will return To live again

    Comment


    • #3
      Originally posted by mitchjs View Post
      COMSend is depreciated from extension plugins
      it was how you did things before extension plugins
      dont use
      Is it possible to have a new good exemple in the faq because the exemple that com with the RR install don't run for me in vb6

      Code:
      '*****************************************************************
      '* This is an interface to add commands/labels/indicators/sliders
      '* to RoadRunner without needing a whole new application for such.
      '*
      '* You can monitor commands executed in RR by checking the CMD
      '* paramter of ProcessCommand and similarly monitor labels and
      '* indicators of the current screen. The idea is so you can create
      '* new commands, labels, indicators and sliders without having
      '* to re-compile or understand the code in RoadRunner.
      '*
      '* Furthermore, it should be possible to intercept commands and
      '* modify them to your interst, say "AUDIO" to "LOAD;MYAUDIO.SKIN"
      '* for this all you need to do is modify CMD and return 3 on the
      '* processcommand call so that RR executes the command you return.
      '*
      '* You can also use ComSend "RoadRunner","COMMAND" to execute any
      '* standard RR command from here. Keep in mind that any commands
      '* executed in that fashion will NOT execute until your current
      '* command is done processing.
      '*
      '* NOTE >> COMSEND ONLY WORKS WITH THE COMPILED VERSION OF RR <<
      '*
      '* NOTE 2 >> You should consider removing ModCom from this project
      '* and using the COM interface instead of COMSEND. It Offers more
      '* features with less code. To know more about this, please check
      '* RR's help file or mp3car.com for documentation.
      '*
      '* You're free to use this code in any way you see fit.
      '*
      '*****************************************************************
      
      '*****************************************************************
      '* This Function will be called with the current command string
      '* The return parameter of this function determines the handling
      '* To be taken upon returning to RR:
      '*
      '* 0 = Command not processed here
      '* 1 = Command completed + return to previous screen
      '* 2 = Command completed, stay on current screen
      '* 3 = Command has been changed/modified, execute returned one
      '*
      '* frm is the form object which generated the current command. Be
      '* VERY VERY careful when using it.
      '*
      '* frm.tag contains the screen name for the same screen.
      '* you can poll other propperties/methods from the screen but you
      '* will need to look at RR's frmskin to know what you can use/do.
      '*****************************************************************
      Public Function ProcessCommand(CMD As String, frm As Object) As Integer
      
          Select Case LCase(CMD)
              Case "mycommand"
                  'This example shows a message on screen (never recommended)
                  MsgBox "MYCOMMAND was executed from " + frm.Tag + " !", vbOKOnly + vbExclamation, "Extension Plugin"
                  ProcessCommand = 2 'Command completed
          
              Case "test"
                  CMD = "audio"
                  ProcessCommand = 3
          
              Case "boo"
                  COMSend "RoadRunner", "vol+"
                  ProcessCommand = 1
                  
              Case "gmailon"
                  COMSend "RoadRunner", "gmailon"
                  ProcessCommand = 2
          
              Case "gmailexit"
                  COMSend "RoadRunner", "ESC"
                  ProcessCommand = 2
          
              'Specify whatever and whichever commands you wish to create
              'You can add as many as you'd like, and you can process complex commands as long
              'as you parse them yourself (i.e. "mycomplexcommand;parameter")
              
              'Case "mycommand2"
                  'Insert Command code here
          
          End Select
      
      End Function
      
      '*****************************************************************
      '* This Function will be called with a requested label code and
      '* format specified at the skin file. Simply return any text to
      '* be displayed for the specified format.
      '*****************************************************************
      Public Function ReturnLabel(LBL As String, FMT As String) As String
      
          Select Case LCase(LBL)
              Case "plugindesc"
                      ReturnLabel = "GmailNotifier"
              Case "pluginver"
                      ReturnLabel = "1.0"
              Case "GmailNotifier"
                  'This example returns a "hello" text to show it works
                  ReturnLabel = "Hello from Extension!"
              
              'Specify whatever and whichever labels you wish to create
              'You can add as many as you'd like, and you can process complex labels as long
              'as you parse them yourself (i.e. "mycomplexlabel;parameter")
              
              'Case "mycommand2"
                  'Insert Command code here
              
          End Select
      
      End Function
      
      '*****************************************************************
      '* This Function will be called with requested indicator code
      '* specified at the skin file. Simply return "True" or "False" to
      '* displayed the respective ON or OFF layer of the skin images.
      '* alternatively you can specify a path to a file to be displayed
      '* as the indicator specified. Return "False" to erase the image.
      '* ONLY return something else IF AND ONLY IF you process that code
      '*****************************************************************
      Public Function ReturnIndicatorEx(IND As String) As String
      
          'Default (No Action)
          'ONLY return something else IF AND ONLY IF you process that code
          ReturnIndicatorEx = ""
      
          Select Case LCase(IND)
              Case "GMAILNOTIFIER"
                  'This example show ON for even seconds and OFF otherwise
                  ReturnIndicatorEx = IIf(Val(Format(Time, "SS")) Mod 2 = 0, "C:\VBStuff\Road Runner\XMArt\1.gif", "")
              
              'Specify whatever and whichever indicators you wish to create
              'You can add as many as you'd like, and you can process complex indicators as long
              'as you parse them yourself (i.e. "mycomplexindicator;parameter")
              
              'Case "myindicator2"
                  'Insert Code here to return "True", "False" or Path name
      
          End Select
      
      End Function
      
      '*****************************************************************
      '* This Sub will be called with an indicator code "CLICKED"
      '* specified at the skin file. This "event" so to speak can be used
      '* to toggle indicators or execute any code you desire when clicking
      '* on a specifig indicator in the skin. You can also modify IND and
      '* monitor the IND parameter as to detect/alter the behaviour of
      '* how RR will process the indicator code being clicked.
      '*****************************************************************
      Public Sub IndicatorClick(IND As String)
      
          'If one of our indicators
          Select Case LCase(IND)
              Case "GMAILNOTIFIER"
                  'Displays message box
                  MsgBox "IndGmail has been clicked!"
                              
          End Select
      
      End Sub
      
      '*****************************************************************
      '* This Function will be called with requested slider code
      '* specified at the skin file. Simply return the value of the
      '* slider to be displayed. Values should range from 0 to 65536.
      '* It is also possible to intercept/change the slider code before
      '* it is processed in RoadRunner (to overwrite existing codes).
      '*****************************************************************
      Public Function ReturnSlider(SLD As String) As Long
      
          'This tells RR that the Slider was not processed in this plugin
          ReturnSlider = -1
      
          Select Case LCase(SLD)
              Case "myslider"
                  ReturnSlider = 1000! * Val(Format(Time, "SS"))
                  
              'case "myslider2"
                  'Insert code here to return your slider value
                  
          End Select
          
      End Function
      
      
      '*****************************************************************
      '* This Function will be called with requested slider code
      '* specified at the skin file. Simply return the value of the
      '* slider to be displayed. Values should range from 0 to 65536.
      '* It is also possible to intercept/change the slider code before
      '* it is processed in RoadRunner (to overwrite existing codes).
      '*****************************************************************
      Public Sub SetSlider(SLD As String, Value As Long, Direction As Boolean)
      
          Select Case LCase(SLD)
              Case "myslider"
                  MsgBox "Myslider Clicked to set value to:" + CStr(Value) + " Direction: " + IIf(Direction, "UP", "DOWN")
          
              'Case "myslider2"
                  'Insert code to process/set slider value here
          
          End Select
      
      End Sub
      
      Private Sub Class_Initialize()
      
      'Code here is executed when loading the Extension plugin
      ' RRSDK.Execute ("SETIND;GMAILNOTIFIER;ON")
       COMSend "RoadRunner", "SETIND;GMAILNOTIFIER;ON"
      ' ProcessCommand = 2
      End Sub
      
      Private Sub Class_Terminate()
      
      'Code here is executed when unloading the Extension plugin
      
      End Sub
      Actually, i just play with the exemple plugin two understand how to create a plugin and how vb6 run.

      Green commands run well for me , not the red commands.

      Can you to correct me please ?

      Comment


      • #4
        If you downloaded the Plugin example from the FAQ thread, that was an older example which has been updated. I would suggest you to use the ones from the RR installer instead -- this is probably why the "RRSDK.Execute" command is not working for you. I have updated the FAQ with the latest examples which you can find here: http://guino.home.insightbb.com/RREx...inExamples.zip
        Ride Runner RR's Myspace

        "Being happy is not about having what you want, it's about wanting what you have."
        "The best things in life are always free - but that doesn't mean money can't buy you good things."

        Comment


        • #5
          Thanks for the new example than i have already tried .

          I have an error with this messages:


          Comment


          • #6
            you just need to deselect riderunner.exe, and browse for riderunner.exe real path, also in debugging you need to set that path as well. for debugging when working in your PI, sorry pierrot. try to download working PI sources, and learn from them.
            BASSRR ==> [Audio Player/MusicDB/Cd Player/Ripper/Rate/Internet Radio/Audio Capture/Youtube Video]
            RRTube ==> [View/Download Youtube Videos]
            WifiMan ==> [Wifi Manager]
            RRec ==> [Audio Capture]

            If You Want To Be Given Everything, Give Everything Up ...
            Bird York -- In The Deep --

            Comment


            • #7
              Originally posted by EL CAMINO View Post
              you just need to deselect riderunner.exe, and browse for riderunner.exe real path, also in debugging you need to set that path as well. for debugging when working in your PI, sorry pierrot. try to download working PI sources, and learn from them.
              Wel well ! It's ok for i can to create a dll . Now, i must to learn VB6 .

              Where can i found Pi source ?

              Comment


              • #8
                The example posted is a WORKING example, if you don't change it it should just work -- as long as you have RR installed on the same machine ?
                Ride Runner RR's Myspace

                "Being happy is not about having what you want, it's about wanting what you have."
                "The best things in life are always free - but that doesn't mean money can't buy you good things."

                Comment


                • #9
                  It working for me but i search other exemple PI.

                  I have tried to add just one indicator into your gpsexec source , but the RR interface work with Comsend , so i don't know how to do.

                  I have added these lignes into the modSDK.cls file.
                  Code:
                  '*****************************************************************
                  '* This Function will be called with requested indicator code
                  '* specified at the skin file. Simply return "True" or "False" to
                  '* displayed the respective ON or OFF layer of the skin images.
                  '* alternatively you can specify a path to a file to be displayed
                  '* as the indicator specified. Return "False" to erase the image.
                  '* ONLY return something else IF AND ONLY IF you process that code
                  '*****************************************************************
                  Public Function ReturnIndicatorEx(IND As String) As String
                  
                      'Default (No Action)
                      ' DO NOT RETURN "False" for unprocess indicators, return ""
                      ReturnIndicatorEx = ""
                  
                      Select Case LCase(IND)
                          'Case "myindicator"
                              'This example show ON for even seconds and OFF otherwise
                              'ReturnIndicatorEx = IIf(Val(Format(Time, "SS")) Mod 2 = 0, "C:\VBStuff\Road Runner\XMArt\1.gif", "False")
                          
                          'Specify whatever and whichever indicators you wish to create
                          'You can add as many as you'd like, and you can process complex indicators as long
                          'as you parse them yourself (i.e. "mycomplexindicator;parameter")
                          
                          Case "gpsexec"
                              'Insert Code here to return "True", "False" or Path name
                              ReturnIndicatorEx = "True"
                              
                      End Select
                  
                  End Function
                  
                  '*****************************************************************
                  '* This Sub will be called with an indicator code "CLICKED"
                  '* specified at the skin file. This "event" so to speak can be used
                  '* to toggle indicators or execute any code you desire when clicking
                  '* on a specifig indicator in the skin. You can also modify IND and
                  '* monitor the IND parameter as to detect/alter the behaviour of
                  '* how RR will process the indicator code being clicked.
                  '*****************************************************************
                  Public Sub IndicatorClick(IND As String)
                  
                      'If one of our indicators
                      Select Case LCase(IND)
                          Case "gpsexec"
                              'Displays message box
                              'MsgBox "GPSExec has been clicked!"
                  
                      End Select
                  
                  End Sub
                  but the indicator don't run

                  Comment


                  • #10
                    Your code seems right.

                    When you're dealing with extension plugins, you need to always overwrite the DLL with the one you just compiled. MAKE SURE you only have ONE DLL -- the one you compiled. Otherwise you may be running the old (original) DLL without knowing.
                    Ride Runner RR's Myspace

                    "Being happy is not about having what you want, it's about wanting what you have."
                    "The best things in life are always free - but that doesn't mean money can't buy you good things."

                    Comment


                    • #11
                      In this case, gpsexec is not really a plugin , (not a dll but an exe).

                      I try that, but indicator and click on indicator don't run.
                      Code:
                      '*****************************************************************
                      '* This Function will be called with requested indicator code
                      '* specified at the skin file. Simply return "True" or "False" to
                      '* displayed the respective ON or OFF layer of the skin images.
                      '* alternatively you can specify a path to a file to be displayed
                      '* as the indicator specified. Return "False" to erase the image.
                      '* ONLY return something else IF AND ONLY IF you process that code
                      '*****************************************************************
                      Public Function ReturnIndicatorEx(IND As String) As String
                      
                          'Default (No Action)
                          ' DO NOT RETURN "False" for unprocess indicators, return ""
                          ReturnIndicatorEx = ""
                      
                          Select Case LCase(IND)
                              'Case "myindicator"
                                  'This example show ON for even seconds and OFF otherwise
                                  'ReturnIndicatorEx = IIf(Val(Format(Time, "SS")) Mod 2 = 0, "C:\VBStuff\Road Runner\XMArt\1.gif", "False")
                              
                              'Specify whatever and whichever indicators you wish to create
                              'You can add as many as you'd like, and you can process complex indicators as long
                              'as you parse them yourself (i.e. "mycomplexindicator;parameter")
                              
                              Case "gpsexec"
                                  'Insert Code here to return "True", "False" or Path name
                                  ReturnIndicatorEx = "True"
                                  
                          End Select
                      
                      End Function
                      
                      '*****************************************************************
                      '* This Sub will be called with an indicator code "CLICKED"
                      '* specified at the skin file. This "event" so to speak can be used
                      '* to toggle indicators or execute any code you desire when clicking
                      '* on a specifig indicator in the skin. You can also modify IND and
                      '* monitor the IND parameter as to detect/alter the behaviour of
                      '* how RR will process the indicator code being clicked.
                      '*****************************************************************
                      Public Sub IndicatorClick(IND As String)
                      
                          'If one of our indicators
                          Select Case LCase(IND)
                              Case "gpsexec"
                                  'Displays message box
                                  'MsgBox "GPSExec has been clicked!"
                                  COMSend "RoadRunner", "CLOSEWINDOW;gpsexec"
                          End Select
                      
                      End Sub
                      If i use these lines in a dll with the last plugin format, my dll run well, but not in this case !

                      Can you explain me where is my error ?

                      My exe is always the new compiled file

                      Comment


                      • #12
                        Vb.net 2008

                        I try to create a plugin with the C# exemple found in the RR install.
                        With VB6, my plugin run very well, just one indicator (gmailnotifier) and the clicl ind fonction.

                        With VB.NET , i can't do the same thing !

                        this is my files .

                        I don't understand why !
                        Attached Files

                        Comment

                        Working...
                        X