gPiOBox

Further - Simple Quiz

Nov 9th, 2017
879
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. rem filename:gpio_picaxe_SimpleQuiz.bas
  2. rem Beginner Project - Simple Quiz
  3. rem written by Trevor Olsson
  4. rem © GPIO Support Services LTD MMXVII
  5.  
  6. main: if pin0 = 1 then P1; 
  7.     if pin1 = 1 then P2;
  8.     if pin6 = 1 then P3;
  9.     if pin7 = 1 then P4;
  10.     goto main;
  11.  
  12. P1:     high B.0
  13.     pause 2000
  14.     low B.0
  15.     goto main;
  16. P2:     high B.1
  17.     pause 2000
  18.     low B.1
  19.     goto main;
  20. P3:     high B.2
  21.     pause 2000
  22.     low B.2
  23.     goto main;
  24. P4:     high B.3
  25.     pause 2000
  26.     low B.3
  27.     goto main;
RAW Paste Data