Rebol 3 工具的学习

1. 將0x0000-0xFFFF的全部Unicode列出

rebol[
    file: 'unicode.r'
]

for i 0 4095 1 [
    prin rejoin [ 
        newline to-hex/size i 3 "0 " 
    ]
    for j 0 15 1 [
        prin [ 
            to-char to-hex/size i * 16 + j 4 " " 
        ]
    ]
    wait .01
]

 

 运行rebol3 输入 do %unicode.r