Pomodoro Program - Printable Version +- Discussion Forum for all things Microbee (https://microbeetechnology.com.au/forum) +-- Forum: Microbee Forum (https://microbeetechnology.com.au/forum/forum-1.html) +--- Forum: Microbee Software and Documentation (https://microbeetechnology.com.au/forum/forum-7.html) +--- Thread: Pomodoro Program (/thread-1021.html)

Pomodoro Program - Graham72 - 04-05-2026 Here is a quick and dirty program for the Pomodoro Method.  https://en.wikipedia.org/wiki/Pomodoro_Technique 00100 REM pomodoro for the  m'bee 2026 00110 CLS:PRINT:PRINT:PRINT,,"POMODORO for Microbee 2026" 00120 PRINT 00130 INPUT "press ENTER to begin 25 minute work session:"W1$ 00140 S=0:F=S 00150 X=IN(12):IF(X AND 32)=32 THEN 150 00160 X=IN(12):IF(X AND 32)=0 THEN 160 00170 F=F+1:IF F<50THEN150 00180 CURS 960:F=0:S=S+1:PRINT 2210-FLT(S);:IF S<2210 THEN 150 00190 PLAY 8,4: PLAY 13,4:PLAY 16,8 00200 PRINT "Twenty Five Minutes Up, Have a Break" 00210 INPUT "press ENTER when break finished"G1$ 00220 RUN 00230 SAVE "POMO"