TI-Basic (TI-84), 1111 10 bytes
WhileRepeat startTmr=startTmrcheckTmr(startTmr Disp 1 End the program can only end when the check startTmr=startTmrcheckTmr(startTmr happens between two seconds (the second checkTmr(startTmr) = 1 will be greater than the first oneinstead of 0). This way, any number of ones is possible (the shortest I got was 53 ones, the longest printed during approx 10 seconds)
Repeat always executes the loop the first time, so the empty string is not included (repeat until or do while not)
For calculators without time (TI-83), replace startTmr=startTmrcheckTmr(startTmr with rand>.19 (-1 byte) but but it's not true randomness (same output on each reset of the calculator)