Select Case syntax


Closed Thread
Results 1 to 3 of 3
  1. #1
    Join Date
    Feb 2003
    Posts
    432

    Default Select Case syntax

    Hi All,

    Had a search but cant find an example of what I am trying to do.

    I am writing a program to decode various IR formats and have hit a problem with SELECT CASE.

    Because the timing of the recieved signals is not exact I want to specify a window of acceptance. I tried using Select Case and although it would compile, the code did not work.

    I recreated the segment using IF statements and that worked. I then readded a section of Select Case code where some of the cases are less than, some are more than, and one is a between.

    I cant get the between to work. I have tried writing the statement in different ways but it wont compile. Is it possible to perform two tests in a single case ?

    Extract of code shown below

    If Header > 8800 AND Header < 9200 then Hserout ["NEC??",13]
    If Header > 7800 AND Header < 8800 then Hserout ["Pioneer??",13]
    If Header > 870 AND Header < 930 then Hserout ["RC5??",13]
    If Header > 2500 AND Header < 2800 then Hserout ["RC6??",13]
    If Header > 2200 AND Header < 2500 then Hserout ["Sony??",13]

    Select Case Header
    Case Is < 2000
    Hserout ["Not Sony!",13]
    Case Is > 7000
    Hserout ["NEC type",13]
    Case Is > 2200 AND Is < 2500
    Hserout ["Sony code",13]
    Case Else
    Hserout ["Something else",13]
    End Select

    I would prefer to use Select Case if possible but if not will have to resort to multiple IF statements.

    Thanks
    Keith

    www.diyha.co.uk
    www.kat5.tv

  2. #2
    Join Date
    Jul 2003
    Location
    Colorado Springs
    Posts
    4,959


    Did you find this post helpful? Yes | No

    Default

    Hi Keith,

    I don't know if this is any better or not, but it's another way you might try.
    Code:
    <font color="#0000FF"><b><i>'             Type   0   1    2    3    4    5    6    7     8
    </i></b></font><font color="#008000"><b>LOOKDOWN2  </b></font><b>Header</b>,&lt;[<b>870</b>,<b>930</b>,<b>2200</b>,<b>2500</b>,<b>2800</b>,<b>7800</b>,<b>8800</b>,<b>9200</b>,<b>65535</b>],<b>Type
    
    </b><font color="#008000"><b>SELECT CASE </b></font><b>Type
        </b><font color="#008000"><b>CASE </b></font><b>0</b>,<b>2</b>,<b>5</b>,<b>8  </b>: <font color="#008000"><b>HSEROUT </b></font>[<font color="#FF0000">&quot;Something else&quot;</font>,<b>13</b>]
        <font color="#008000"><b>CASE </b></font><b>1   </b>: <font color="#008000"><b>HSEROUT </b></font>[<font color="#FF0000">&quot;RC5??&quot;</font>,<b>13</b>]
        <font color="#008000"><b>CASE </b></font><b>3   </b>: <font color="#008000"><b>HSEROUT </b></font>[<font color="#FF0000">&quot;Sony??&quot;</font>,<b>13</b>]
        <font color="#008000"><b>CASE </b></font><b>4   </b>: <font color="#008000"><b>HSEROUT </b></font>[<font color="#FF0000">&quot;RC6??&quot;</font>,<b>13</b>]
        <font color="#008000"><b>CASE </b></font><b>6   </b>: <font color="#008000"><b>HSEROUT </b></font>[<font color="#FF0000">&quot;Pioneer??&quot;</font>,<b>13</b>]
        <font color="#008000"><b>CASE </b></font><b>7   </b>: <font color="#008000"><b>HSEROUT </b></font>[<font color="#FF0000">&quot;NEC??&quot;</font>,<b>13</b>]
    <font color="#008000"><b>END SELECT</b></font>
    Last edited by Darrel Taylor; - 27th September 2005 at 19:00.
    DT

  3. #3
    Join Date
    Feb 2003
    Posts
    432


    Did you find this post helpful? Yes | No

    Default

    Thanks Darrel,

    I think I might be able to do something with Lookdown2.

    Just had to lean over to the TV and MANUALLY turn the volume down. Currently surrounded by so many remote controls whilst testing that I couldnt see the one for the TV !

    Regards
    Keith

    www.diyha.co.uk
    www.kat5.tv

Similar Threads

  1. Using Nokia LCD
    By BobP in forum mel PIC BASIC Pro
    Replies: 300
    Last Post: - 3rd May 2018, 04:47
  2. Sony SIRC IR Issue
    By Ryan7777 in forum mel PIC BASIC Pro
    Replies: 10
    Last Post: - 8th August 2015, 08:10
  3. Write Onewire data toa I2C memory / read ASCI
    By Eugeniu in forum mel PIC BASIC Pro
    Replies: 67
    Last Post: - 16th November 2008, 19:19
  4. Crystalfontz LCD
    By jman12 in forum mel PIC BASIC Pro
    Replies: 9
    Last Post: - 9th February 2007, 15:04
  5. Interrupt/timer not really interrupting...
    By Tom Gonser in forum mel PIC BASIC Pro
    Replies: 1
    Last Post: - 22nd May 2005, 22:05

Members who have read this thread : 1

You do not have permission to view the list of names.

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts