rebol

Rebol是我专业课程的必修课,但之前总觉得没啥用处,一直都没有上心。直到现在要做大作业了,才渐渐发现这个语言也很有意思。

关于rebol的安装、语法等细节在此不做介绍,请参考官网http://www.rebol.com/

先放一个官网上的例子——时钟clock

时钟clock

REBOL [
	Title: "Resizable Digital Clock"
	Version: 1.3.3
	Author: "Carl Sassenrath"
]

f: layout [
	origin 0
	b: banner 140x32 rate 1
		effect [gradient 0x1 0.0.150 0.0.50]
		feel [engage: func [f a e] [set-face b now/time]]
]

resize: does [
	b/size: max 20x20 min 1000x200 f/size
	b/font/size: max 24 f/size/y - 40
	b/text: "Resize Me"
	b/size/x: 1024 ; for size-text
	b/size/x: 20 + first size-text b
	f/size: b/size
	show f
]

view/options/new f 'resize
resize
insert-event-func [
	if event/type = 'resize [resize]
	event
]
do-events


点击打开rebol文件,就会出现上述视图。


评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值