Done in jal0.4x but can be ported with jallib I guess http://www.andremiller.net/content/lm75-temperature-sensor-with-7-segment-display-output
Sunish On Sun, Aug 16, 2009 at 11:26 PM, Joep Suijs <[email protected]> wrote: > > Sunish, anybody, > > It compiles okay. Do you have a configuration available to test this > function of should I create one? > > Joep > > 2009/8/16 <[email protected]>: > > > > Revision: 1204 > > Author: jsuijs > > Date: Sun Aug 16 10:54:17 2009 > > Log: jseven port to jalv2 > > http://code.google.com/p/jallib/source/detail?r=1204 > > > > Added: > > /trunk/include/external/seven > > /trunk/include/external/seven/jseven.jal > > > > ======================================= > > --- /dev/null > > +++ /trunk/include/external/seven/jseven.jal Sun Aug 16 10:54:17 2009 > > @@ -0,0 +1,165 @@ > > +-- Title: jseven.jal - translation routine for 7 segment display > > +-- Author: Wouter van Ooijen (c) 1998, all rights reserved. > > +-- Adapted-by: Joep Suijs > > +-- Compiler: >=2.2 > > +-- > > +-- This file is part of jallib (http://jallib.googlecode.com) > > +-- Released under the ZLIB license > > (http://www.opensource.org/licenses/zlib-license.html) > > +-- > > +-- Sources: > > +-- > > +-- Description: Translation routine for 7 segment display. > > +-- -- > > +-- The seven segment display needs to be connected to a single port. > > +-- Define the pin layout of the seven segment display like: > > +-- -- > > +-- -- constant for the segments gfe dcba > > +-- const byte seven_segment_a = 0b_0000_0001 > > +-- const byte seven_segment_b = 0b_0000_0010 > > +-- const byte seven_segment_c = 0b_0000_0100 > > +-- const byte seven_segment_d = 0b_0000_1000 > > +-- const byte seven_segment_e = 0b_0001_0000 > > +-- const byte seven_segment_f = 0b_0010_0000 > > +-- const byte seven_segment_g = 0b_0100_0000 > > +-- const byte seven_segment_dp = 0b_1000_0000 > > +-- -- > > +-- Use: > > +-- portd_direction = all_output > > +-- portd = seven_from_digit(1) -- display '1' > > +-- -- > > +-- > > +-- Notes: > > +-- > > + > > +const byte seven_value_space[] = { > > + -- const byte seven_value_0 > > + seven_segment_a > > + + seven_segment_b > > + + seven_segment_c > > + + seven_segment_d > > + + seven_segment_e > > + + seven_segment_f, > > + > > + -- const byte seven_value_1 > > + seven_segment_b > > + + seven_segment_c, > > + > > + -- const byte seven_value_2 > > + seven_segment_a > > + + seven_segment_b > > + + seven_segment_d > > + + seven_segment_e > > + + seven_segment_g, > > + > > + -- const byte seven_value_3 > > + seven_segment_a > > + + seven_segment_b > > + + seven_segment_c > > + + seven_segment_d > > + + seven_segment_g, > > + > > + -- const byte seven_value_4 > > + seven_segment_b > > + + seven_segment_c > > + + seven_segment_f > > + + seven_segment_g, > > + > > + -- const byte seven_value_5 > > + seven_segment_a > > + + seven_segment_c > > + + seven_segment_d > > + + seven_segment_f > > + + seven_segment_g, > > + > > + -- const byte seven_value_6 > > + seven_segment_a > > + + seven_segment_c > > + + seven_segment_d > > + + seven_segment_e > > + + seven_segment_f > > + + seven_segment_g, > > + > > + -- const byte seven_value_7 > > + seven_segment_a > > + + seven_segment_b > > + + seven_segment_c, > > + > > + -- const byte seven_value_8 > > + seven_segment_a > > + + seven_segment_b > > + + seven_segment_c > > + + seven_segment_d > > + + seven_segment_e > > + + seven_segment_f > > + + seven_segment_g, > > + > > + -- const byte seven_value_9 > > + seven_segment_a > > + + seven_segment_b > > + + seven_segment_c > > + + seven_segment_d > > + + seven_segment_f > > + + seven_segment_g, > > + > > + -- const byte seven_value_a > > + seven_segment_a > > + + seven_segment_b > > + + seven_segment_c > > + + seven_segment_e > > + + seven_segment_f > > + + seven_segment_g, > > + > > + -- const byte seven_value_b > > + seven_segment_c > > + + seven_segment_d > > + + seven_segment_e > > + + seven_segment_f > > + + seven_segment_g, > > + > > + -- const byte seven_value_c > > + seven_segment_a > > + + seven_segment_d > > + + seven_segment_e > > + + seven_segment_f, > > + > > + -- const byte seven_value_d > > + seven_segment_b > > + + seven_segment_c > > + + seven_segment_d > > + + seven_segment_e > > + + seven_segment_g, > > + > > + -- const byte seven_value_e > > + seven_segment_a > > + + seven_segment_d > > + + seven_segment_e > > + + seven_segment_f > > + + seven_segment_g, > > + > > + -- const byte seven_value_f > > + seven_segment_a > > + + seven_segment_e > > + + seven_segment_f > > + + seven_segment_g, > > + > > + -- const byte seven_letter_c (16) > > + seven_segment_a > > + + seven_segment_f > > + + seven_segment_e > > + + seven_segment_d, > > + > > + -- const byte seven_letter_s (17) > > + seven_segment_a > > + + seven_segment_f > > + + seven_segment_g > > + + seven_segment_c > > + + seven_segment_d > > +} > > + > > + > > +-- return seven segment value corresponding to lower nibble of x > > +function seven_from_digit( byte in x ) return byte is > > + > > + return seven_value_space[x] > > + > > +end function > > > > > > > > > > > --~--~---------~--~----~------------~-------~--~----~ You received this message because you are subscribed to the Google Groups "jallib" group. To post to this group, send email to [email protected] To unsubscribe from this group, send email to [email protected] For more options, visit this group at http://groups.google.com/group/jallib?hl=en -~----------~----~----~----~------~----~------~--~---
