<?xml version="1.0" encoding="utf-8"?> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> <html xmlns:MadCap="http://www.madcapsoftware.com/Schemas/MadCap.xsd" MadCap:lastBlockDepth="6" MadCap:lastHeight="94" MadCap:lastWidth="853" MadCap:disableMasterStylesheet="true" MadCap:tocPath="" MadCap:InPreviewMode="false" MadCap:PreloadImages="false" MadCap:RuntimeFileType="Topic" MadCap:TargetType="WebHelp" lang="en-us" xml:lang="en-us" MadCap:PathToHelpSystem="../../../" MadCap:HelpSystemFileName="Default.xml" MadCap:SearchType="Stem"> <head><title>PULSIN Example</title> <link href="../../SkinSupport/MadCap.css" rel="stylesheet" /> <link href="../../Resources/Stylesheets/BSE_Help.css" rel="stylesheet" /> <script src="../../SkinSupport/MadCapAll.js" type="text/javascript"> </script> </head> <body> <h1>PULSIN Example</h1> <div class="ImagePlusCaption"> <div class="Col2"> <p> <img src="../../graphics/pgm_icon1.gif" border="0" alt="BS1 icon" title="BS1 icon" /> <img src="../../graphics/pgm_icon2.gif" border="0" alt="BS2 icon" title="BS2 icon" /> <img src="../../graphics/pgm_icon2e.gif" border="0" alt="BS2e icon" title="BS2e icon" /> <img src="../../graphics/pgm_icon2sx.gif" border="0" alt="BS2sx icon" title="BS2sx icon" /> <img src="../../graphics/pgm_icon2p.gif" border="0" alt="BS2p icon" title="BS2p icon" /> <img src="../../graphics/pgm_icon2pe.gif" border="0" alt="BS2pe icon" title="BS2pe icon" /> <img src="../../graphics/pgm_icon2px.gif" border="0" alt="BS2px icon" title="BS2px icon" /> </p> </div> <p style="text-align: right;">Syntax: <a href="../Commands/PULSIN.htm" target="" title="" alt="" class="MCXref_0" xrefformat="{paratext}">PULSIN</a></p> <p> </p> </div> <p class="clear"> </p> <p> </p> <p class="PlainText" style="text-align: center;"> <img src="../../graphics/pulsin_sch.gif" /> </p><pre class="BScode" xml:space="preserve">' PULSIN.BS1 ' This program uses PULSIN to measure a pulse generated by discharging a ' 0.1 uF capacitor through a 1K resistor. Pressing the switch generates ' the pulse, which should ideally be approximately 120 us (12 PULSIN units ' of 10 us) long. Variations in component values may produce results that ' are up to 10 units off from this value. For more information on calculating ' resistor-capacitor timing, see the RCTIME command. ' {$STAMP BS1} ' {$PBASIC 1.0} SYMBOL Pulse = 7 ' pulse input pin SYMBOL time = W1 ' pulse width (10 uS units) Main: PULSIN Pulse, 1, time ' measure positive pulse IF time = 0 THEN Main ' if 0, try again DEBUG CLS, time ' else display result GOTO Main END </pre> <p class="PlainText"> </p> <p>NOTE: The example below is written for the BS2 and will run on any of the BS2-family modules. Modify the $STAMP directive (as required) before downloading to the BS2e, BS2sx, BS2p, BS2pe, or BS2px.</p><pre class="BScode" xml:space="preserve">' PULSIN.BS2 ' This program uses PULSIN to measure a pulse generated by discharging a ' 0.1 uF capacitor through a 1K resistor. Pressing the switch generates ' the pulse, which should ideally be approximately 120 us (60 PULSIN units ' of 2 us) long (for BS2 and BS2e). Variations in component values may ' produce results that are up to 10 units off from this value. For more ' information on calculating resistor-capacitor timing, see the RCTIME ' command. ' {$STAMP BS2} ' {$PBASIC 2.5} Pulse PIN 7 ' pulse input pin #SELECT $STAMP #CASE BS2, BS2E, BS2PE Scale CON $200 ' 2.0 us per unit #CASE BS2SX Scale CON $0CD ' 0.8 us per unit #CASE BS2P Scale CON $0C0 ' 0.75 us per unit #CASE BS2PX Scale CON $0CF ' 0.81 us per unit #ENDSELECT time VAR Word Main: PULSIN Pulse, 1, time ' measure positive pulse IF (time > 0) THEN ' if not 0 DEBUG HOME, DEC time, " units ", CLREOL ' display raw input time = time */ Scale ' adjust for Stamp DEBUG CR, DEC time, " us " ' display microseconds ELSE DEBUG CLS, "Out of Range" ' else error message ENDIF PAUSE 200 GOTO Main END</pre> <div class="Col2"> <div class="MasterFoot"> <p MadCap:conditions="BSEconditions.BSEWebHelp (Primary)-INCLUDE"><a href="../../HomeTopics/HomePage.htm">Go to Welcome page</a> </p> </div> </div> <div class="Col2"> <div class="MasterFoot"> <p style="text-align: right;"><span class="ContactInfoProjectName">BASIC Stamp Help</span> <![CDATA[ ]]><span class="ContactInfoVersion#">Version 2.5.4</span> <![CDATA[ ]]></p> <p style="text-align: right;">Copyright © <span class="ContactInfoCompanyName">Parallax Inc.</span></p> <p style="text-align: right;"><span class="SystemShortDate">8/8/2012</span> </p> </div> </div> <script type="text/javascript">/* <![CDATA[ */ var _gaq = _gaq || []; _gaq.push(['_setAccount', 'UA-285614-1']); _gaq.push(['_trackPageview']); (function() { var ga = document.createElement('script'); ga.type = 'text/javascript'; ga.async = true; ga.src = ('https:' == document.location.protocol ? 'https://ssl' : 'http://www') + '.google-analytics.com/ga.js'; var s = document.getElementsByTagName('script')[0]; s.parentNode.insertBefore(ga, s); })(); /* ]]> */</script> <script type="text/javascript" src="../../SkinSupport/MadCapBodyEnd.js"> </script> </body> </html>