Further - Simple Quiz

rem filename:gpio_picaxe_SimpleQuiz.bas
rem Beginner Project - Simple Quiz
rem written by Trevor Olsson
rem © GPIO Support Services LTD MMXVII

main: if pin0 = 1 then P1;
    if pin1 = 1 then P2;
    if pin6 = 1 then P3;
    if pin7 = 1 then P4;
    goto main;

P1:     high B.0
    pause 2000
    low B.0
    goto main;
P2:     high B.1
    pause 2000
    low B.1
    goto main;
P3:     high B.2
    pause 2000
    low B.2
    goto main;
P4:     high B.3
    pause 2000
    low B.3
    goto main;