For all who do not wish ro remove the back lashes.
Rem Project: romanclock
Rem Created: 12/02/2005 20:01:29
Rem ***** Main Source File *****
sync on : sync rate 0: draw to back
set text font "arial" : set text size 30
set text to bold
set text opaque
t$= get time$()
do
t$= get time$()
text 100,100,t$
t1$=mid$(t$,8)
if t1$="0"
sec$=""
endif
if t1$="1"
sec$="I"
endif
if t1$="2"
sec$="II"
endif
if t1$="3"
sec$="III"
endif
if t1$="4"
sec$="IV"
endif
if t1$="5"
sec$="V"
endif
if t1$="6"
sec$="VI"
endif
if t1$="7"
sec$="VII"
endif
if t1$="8"
sec$="VIII"
endif
if t1$="9"
sec$="IX"
endif
t2$=mid$(t$,7)
if t2$="0"
sec2$=""
endif
if t2$="1"
sec2$="X"
endif
if t2$="2"
sec2$="XX"
endif
if t2$="3"
sec2$="XXX"
endif
if t2$="4"
sec2$="XL"
endif
if t2$="5"
sec2$="L"
endif
if t2$="6"
sec2$="LX"
endif
t3$=mid$(t$,5)
if t1$="0"
min$=""
endif
if t3$="1"
min$="I"
endif
if t3$="2"
min$="II"
endif
if t3$="3"
min$="III"
endif
if t3$="4"
min$="IV"
endif
if t3$="5"
min$="V"
endif
if t3$="6"
min$="VI"
endif
if t3$="7"
min$="VII"
endif
if t3$="8"
min$="VIII"
endif
if t3$="9"
min$="IX"
endif
t4$=mid$(t$,4)
if t4$="0"
min2$=""
endif
if t4$="1"
min2$="X"
endif
if t4$="2"
min2$="XX"
endif
if t4$="3"
min2$="XXX"
endif
if t4$="4"
min2$="XL"
endif
if t4$="5"
min2$="L"
endif
if t4$="6"
min2$="LX"
endif
t5$=mid$(t$,2)
if t5$="0"
hr$=""
endif
if t5$="1"
hr$="I"
endif
if t5$="2"
hr$="II"
endif
if t5$="3"
hr$="III"
endif
if t5$="4"
hr$="IV"
endif
if t5$="5"
hr$="V"
endif
if t5$="6"
hr$="VI"
endif
if t5$="7"
hr$="VII"
endif
if t5$="8"
hr$="VIII"
endif
if t5$="9"
hr$="IX"
endif
t6$=mid$(t$,1)
if t6$="0"
hr2$=""
endif
if t6$="1"
hr2$="X"
endif
if t6$="2"
hr2$="XX"
endif
if t6$="3"
hr2$="XXX"
endif
if t6$="4"
hr2$="XL"
endif
if t6$="5"
hr2$="L"
endif
if t6$="6"
hr2$="LX"
endif
text 100,150,hr2$+hr$+":"+min2$+min$+":"+sec2$+sec$+" "
sync
loop
anyone know why it did that?
In Space No One can Hear You Scream! (When your comm Line is cut?)