BASIC : The Language of Love

REM The BASIC Language of Love
REM Main programme follows

LET programme START HERE
    INPUT ‘effort’
DATA 1 = ‘lover’
READ love letters.
IF moved
THEN smile
ELSE cry
RESTORE smile
    DO things you like, LOOP
    GOSUB ‘dinner’, ‘dance’, ‘hold hands’ RETURN   

GOTO START
    WHILE loved WEND together
REPEAT ALL UNTIL 

END