home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1996 September / PCWK996.iso / demo / wgelectr / pk51demo / files.2 / EXAMPLES / TRAFFIC / DSCOPE.INI < prev    next >
Encoding:
Text File  |  1995-10-09  |  535 b   |  24 lines
  1. load 8052.dll
  2. load traffic
  3. include dbg_tiny.dsw
  4. /* define watch variables */
  5. ws red   
  6. ws yellow
  7. ws green 
  8. ws stop  
  9. ws walk  
  10. /* set P1.5 to zero:  Key Input */
  11. STIME=1
  12. PORT1 &= ~0x20;
  13.  
  14. /* define a debug function for the pedestrian push button */
  15.  
  16. signal void pushbutton (void)  {
  17.   PORT1 |= 0x20;       /* set Port1.5   */
  18.   twatch (50000);      /* wait 50 ms    */
  19.   PORT1 &= ~0x20;      /* reset Port1.5 */
  20. }
  21.  
  22. /* define tool bar button as call to pushbutton () */
  23. define button "Push Button","pushbutton ()"
  24.