Web   ·   Wiki   ·   Activities   ·   Blog   ·   Lists   ·   Chat   ·   Meeting   ·   Bugs   ·   Git   ·   Translate   ·   Archive   ·   People   ·   Donate
summaryrefslogtreecommitdiffstats
path: root/tutorial/new30.xaf
blob: 4a51edfd7cb13f876aaa87e39ff4c496d405e3cf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
; Whats new in versuib 3.0 by Jan Hubicka
; Version 1.0 done for XaoS 3.0 in July 1997
; Use xaos -play to see it :)
(load "head.xhf")

(clearscreen)
(textposition 'center 'middle)
(message "new")
(textsleep)
(clearscreen)
(message "speed")
(usleep 5000000)
(clearscreen)
(message "speed1")
(textsleep)
(clearscreen)
(message "speed2")
(textsleep)
(clearscreen)
(message "speed3")
(textsleep)
(clearscreen)
(message "speed4")
(textsleep)
(clearscreen)
(message "speed5")
(wait)
(display)
(maxiter 1000000)
(message "speed6")
(textsleep)
(clearscreen)
(message "speed7")
(textsleep)
(clearscreen)
(message "speed8")
(textsleep)
(clearscreen)
(maxiter 170)
(message "speed9")
(textsleep)
(clearscreen)

(load "pause.xhf")

(clearscreen)
(message "new2")
(usleep 5000000)

(load "filter.xhf")

(load "pause.xhf")

(clearscreen)
(message "new3")
(usleep 5000000)

(load "outnew.xhf")

(load "pause.xhf")

(clearscreen)
(message "new4")
(usleep 5000000)

(load "innew.xhf")

(load "pause.xhf")

(clearscreen)
(message "new5")
(usleep 5000000)

(load "truecol.xhf")

(load "pause.xhf")

(clearscreen)
(message "new6")
(usleep 5000000)

(load "anim.xhf")

(message "newend")
(textsleep)
(display)