Early Bird numbers

[Warut Roonguthai]

FYI, here's my Ubasic program for generating the early bird sequence:

10   X=""
20   for N=1 to 396
30   A=cutspc(str(N))
40   if instr(X,A)>0 then print N;
50   X+=A
60   next N

Warut