17 条评论
-
赫敏·格兰杰 LV 10 @ 2009-10-05 18:39:33
LS.............
-
@ 2009-10-05 18:08:10
beep，可是，有人会关注由代码到汇编到机器再到物理层面上的实现吗？
说开来，殊不知，当我们轻松地听着音乐时，当我们兴奋地玩着游戏时，当我们聚精会神地看着电影时，当我们思绪不断地编写程序时，我们我们耳旁，我们眼前，我们手下，这一切，在暗流涌动着。伴随着不同内涵的电信号，伴随着无数次寄存器的累加与计数，伴随着不同输出设备的数模转换，伴随着众多外存的频繁读入写入，这一切就在一块寸尺见方的地盘上，默默地进行着，进行着。。。 -
@ 2009-10-05 17:03:01
口误Ing
-
@ 2009-10-05 17:01:46
LS……
你得告诉大家加上uses windows才成啊……
话说这些是偶们四年级的时候玩的…… -
@ 2009-10-05 16:59:13
呵呵
大家用dos单元
使用下beep(1000,1000)
试试 -
@ 2009-10-05 16:52:40
write(#7)也可以的
-
@ 2009-10-05 15:28:25
来个有周期的。
var
s,k:longint;
begin
repeat
s:=0;
while k -
@ 2009-10-05 15:03:26
既然这样我就不试了
-
@ 2009-10-05 14:21:36
Orz
while true do write(chr(7));
之后机子崩溃了 -
@ 2009-10-05 13:28:42
响铃……~~~~~
嘿嘿还好~我把lz的1000改成10后运行滴
-
@ 2009-10-05 12:25:11
火星……
-
@ 2009-10-05 12:18:52
= =
你可以搞个周期。。。。我通常玩都是while true do 的。。。
-
@ 2009-10-05 11:56:00
Chr(7) 的意义就是响铃啦……
响铃1000下……
LZ真WD…… -
@ 2009-10-05 11:48:31
好吵人！
-
@ 2009-10-05 11:35:17
那会怎样
RT
-
@ 2009-10-05 11:35:12
真的是一串长鸣.......
-
@ 2009-10-05 11:33:18
一阵长鸣
RT
- 1
