1;;; level child4
2;;; This is an easy and short level for young children.
3;;; This level was created for my little goddaughter.
4
5
6(day)
7(fog 0.1)
8
9(set-track-name (_ "Big Jump"))
10(set-author "Attila Boros")
11
12;; Start
13(set-start-position 242 252)
14(start-time 300)
15(cond
16 ((= (difficulty) *easy*)   (start-time 300))
17 ((= (difficulty) *normal*) (start-time 180))
18 ((= (difficulty) *hard*)   (start-time 120))
19)
20
21;; Goal
22(add-goal 242 226 #f "child5")
23
24;; Do not jump
25(jump 0.1)
26
27
28(add-cyclic-platform 245 247 245 247 -3.0 0.0 1.0 0.5)
29
30(add-cyclic-platform 249 241 249 241 -2.0 2.0 1.0 0.8)
31
32(define pipe1(pipe 246.4  252  0.5 249.6 252.0 0.5 0.5))
33(set-primary-color pipe1 .3 .7 .9 .5)
34
35(define pipe2(pipe 249.7  246.7  0.5 247.0 244.0 -1.5 0.5))
36(set-primary-color pipe2 .3 .7 .9 .5)
37
38(define pipe3(pipe 250.0  235.1  3.0 248. 229.5 -6.5 0.5))
39(set-primary-color pipe3 .3 .7 .9 .5)
40(set-wind pipe3 20.0 20.0)
41(define pc1(pipe-connector 248. 229.5 -6.5 0.5))
42(define pipe4(pipe 248. 229.5 -6.5 246.0 227.5 -6.0 0.5))
43(set-primary-color pipe4 .3 .7 .9 .5)
44(set-wind pipe4 40.0 40.0)
45(define pc2(pipe-connector 246.0 227.5  -6.0 0.5))
46(define pipe5(pipe 246.0 227.5 -6.0 245.0 227.5 -1.0 0.5))
47(set-primary-color pipe5 .3 .7 .9 .5)
48(set-wind pipe5 60.0 60.0)
49(define pc3(pipe-connector 245.0 227.5 -1.0 0.5))
50(set-primary-color pc1 .3 .7 .9 .4)
51(set-primary-color pc2 .3 .7 .9 .4)
52(set-primary-color pc3 .3 .7 .9 .4)
53(define pipe5(pipe 245.0 227.5 -1.0 242.0 227.5 0.0 0.5))
54(set-primary-color pipe5 .3 .7 .9 .5)
55(set-wind pipe5 2.0 2.0)
56
57(define pipe6(pipe 250.6  228.0 -3.6 244.0 230.0 -3.6 0.5))
58(set-primary-color pipe6 .9 .3 .7 .5)
59
60(set-cell-wall-colors 0 0 255 255 0 .9 .6 .0)
61
62(set-cell-water-heights 0 0 255 255 -9 -9 -9 -9 -9)
63
64(diamond 250 241)
65
66(add-flag 246 238 30 #t .2)
67(add-flag 244 238 30 #t .2)
68(add-flag 235 231 20 #t .2)
69(add-flag 235 227 20 #t .2)
70(add-flag 239 227 20 #t .2)
71
72