Date manipulation: Difference between revisions

(add RPL)
Line 2,786:
'''IF''' DUP2 TYPE SWAP TYPE == '''THEN'''
'''IF''' DUP TYPE 2 ≠ '''THEN''' SWAP 10 * '''END''' +
'''ENDELSE'''
'''ELSE''' ROT ROT + SWAP
ROT ROT + SWAP'''IF''' DUP ‘x’ SAME '''THEN''' DROP '''END'''
'''IF'''END DUP ‘x’ SAME '''THEN''' DROP '''END'''
'''END END'''
'''NEXT'''
≫ ≫ '<span style="color:blue">ALPHANUM</span>' STO
1,151

edits