JAL (compiler)

<h2 id="history">History</h2>
<p>JAL was originally created by Wouter van Ooijen and released as <a href="/facts/Free_software/IaoVtJXn">free software</a> under the <a href="/facts/GNU_General_Public_License/S75KhLSX">GNU General Public License</a> in 2003. In 2006, Stef Mientki initiated the development of a new version, JALV2, which was programmed by Kyle York and beta tested by an international user group.<a class="footnote-ref" id="fnref:1" href="#fn:1"><sup>1</sup></a>
</p>
<h2 id="sample-code">Sample code</h2>
-- JAL 2.3
include 16f877_bert--define the variables
var byte resist--define the pins
pin_a0_direction = input--variable resistor
pin_d7_direction = input--switch
pin_c2_direction = output--pwm led--enable pulse width modulation
PWM_init_frequency (true, true)

forever loop--convert analog on a0 to digital
   resist = ADC_read_low_res(0)

-- run measurement through flash memory
   program_eeprom_write(2000,resist)
   program_eeprom_read(2000,resist)

-- run measurement through data memory
   data_eeprom_write(10,resist)
   data_eeprom_read(10,resist)

-- if the switch is pressed return random value
   if pin_d7 == high then
      resist = random_byte
   end if--send resistance to PC
   serial_sw_write(resist)
   delay_100ms(1)
   -- set actual PWM duty cycle
   PWM_Set_DutyCycle (resist, resist)

end loop

<h2 id="external-links">External links</h2>
<ul><li><a href="http://www.casadeyork.com/jalv2/">JALv2 Compiler home page</a></li>
<li><a href="https://github.com/jallib/jallib/wiki">Open Source JAL Libraries</a></li>
<li><a href="http://justanotherlanguage.org">JAL Homepage</a></li></ul>

<h2 id="references">References</h2>

<ol>
<li id="fn:1"><p>Beta testing by: Bert van Dam, Sunish Isaac, Dave Lagzdin, Javier Martinez, Stef Mientki, Wouter van Ooijen, Michael Reynolds, André Steenveld, Joep Suijs, Vasile Surducan, and Michael Watterson <a href="#fnref:1" class="footnote-back-ref">↩</a></p></li>
</ol>

JAL (compiler) open-in-new

JAL (compiler)