/usr/share/games/trackballs/levels/mhm3.scm is in trackballs-data 1.2.4-1.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
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 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 | ;;; The Castle
(set-track-name (_ "The Castle"))
(set-author "Warren D. Ober")
(set-start-position 101.5 167.5)
(start-time 600)
(restart-time 30)
;;Weather conditions.
(day)
;;Set ball velocity.
(define speed 0.3)
(cond
((= (difficulty) *easy*) (set! speed 0.20))
((= (difficulty) *normal*) (set! speed 0.30))
((= (difficulty) *hard*) (set! speed 0.40)))
;Warning sign.
(set-primary-color (sign (_ "Stay on the path or else!") 2.0 -0.1 4.0 113.0 172.0 -3.5) 0.9 0.6 0.0 1.0)
;Pipe over drawbridge
(define pipe1(pipe 144.0 171.5 -0.5 144.0 166.5 -0.5 1.5))
(set-primary-color pipe1 0.9 0.6 0.0 1.0)
;palace guards.
(define mr1 (new-mr-black 153 172))
(set-acceleration mr1 3.0)
(set-primary-color mr1 1. 1. 1. 1.0)
(define mr2 (new-mr-black 151 165))
(set-acceleration mr2 4.0)
(set-primary-color mr2 1. 1. 1. 1.0)
(define mr3 (new-mr-black 177 140))
(set-acceleration mr3 7.0)
(set-primary-color mr3 1. 1. 1. 1.0)
(define mr4 (new-mr-black 183 136))
(set-acceleration mr4 4.0)
(set-primary-color mr4 1. 1. 1. 1.0)
(define mr5 (new-mr-black 162 195))
(set-acceleration mr5 4.0)
(set-primary-color mr5 1. 1. 1. 1.0)
(define mr6 (new-mr-black 175 195))
(set-acceleration mr6 4.0)
(set-primary-color mr6 1. 1. 1. 1.0)
(define mr7 (new-mr-black 177 165))
(set-acceleration mr7 4.0)
(set-primary-color mr7 1. 1. 1. 1.0)
(define mr8 (new-mr-black 148 59))
(set-acceleration mr8 5.0)
(set-primary-color mr8 1. 1. 1. 1.0)
(define mr9 (new-mr-black 144 136))
(set-acceleration mr9 7.0)
(set-primary-color mr9 1. 1. 1. 1.0)
(define mr10 (new-mr-black 144 200))
(set-acceleration mr10 7.0)
(set-primary-color mr10 1. 1. 1. 1.0)
;hidden power-up
(add-modpill 183 171 *mod-jump* 50 50)
;flags on Aromory and Keep.
(add-flag 151 179 100 #t 0.1)
(add-flag 153 179 100 #t 0.1)
(add-flag 152 178 100 #t 0.1)
(add-flag 151 177 100 #t 0.1)
(add-flag 153 177 100 #t 0.1)
(add-flag 152 176 100 #t 0.1)
(add-flag 153 175 100 #t 0.1)
(add-flag 151 175 100 #t 0.1)
(add-flag 148 161 100 #t 0.1)
(add-flag 150 161 100 #t 0.1)
(add-flag 149 160 100 #t 0.1)
(add-flag 150 159 100 #t 0.1)
(add-flag 148 159 100 #t 0.1)
(add-flag 149 158 100 #t 0.1)
(add-flag 150 157 100 #t 0.1)
(add-flag 148 157 100 #t 0.1)
;savepoints.
(diamond 155.5 140.5)
(diamond 158.5 184.5)
;fountains in garden.
(fountain 167 170.5 -2.0 0.03 0.0 200.0)
(fountain 167 169.5 -2.0 0.03 0.0 200.0)
;; wave in garden.
;(add-heightmodifier corner x y min max freq phase [not1] [not2] [not3])
(add-heightmodifier 10 172 179 -1.2 1.0 0.2 -0.4)
(add-heightmodifier 10 173 179 -1.2 1.0 0.2 -0.4)
(add-heightmodifier 10 174 179 -1.2 1.0 0.2 -0.4)
(add-heightmodifier 10 172 178 -1.4 0.8 0.2 0.0)
(add-heightmodifier 10 173 178 -1.4 0.8 0.2 0.0)
(add-heightmodifier 10 174 178 -1.4 0.8 0.2 0.0)
(add-heightmodifier 10 172 177 -1.6 0.6 0.2 0.4)
(add-heightmodifier 10 173 177 -1.6 0.6 0.2 0.4)
(add-heightmodifier 10 174 177 -1.6 0.6 0.2 0.4)
(add-heightmodifier 10 172 176 -1.8 0.4 0.2 0.8)
(add-heightmodifier 10 173 176 -1.8 0.4 0.2 0.8)
(add-heightmodifier 10 174 176 -1.8 0.4 0.2 0.8)
(add-heightmodifier 10 172 175 -2.0 0.2 0.2 1.2)
(add-heightmodifier 10 173 175 -2.0 0.2 0.2 1.2)
(add-heightmodifier 10 174 175 -2.0 0.2 0.2 1.2)
(add-heightmodifier 10 172 174 -2.2 0.0 0.2 1.6)
(add-heightmodifier 10 173 174 -2.2 0.0 0.2 1.6)
(add-heightmodifier 10 174 174 -2.2 0.0 0.2 1.6)
(add-heightmodifier 10 172 173 -2.4 -0.2 0.2 2.0)
(add-heightmodifier 10 173 173 -2.4 -0.2 0.2 2.0)
(add-heightmodifier 10 174 173 -2.4 -0.2 0.2 2.0)
(add-heightmodifier 10 172 172 -2.6 -0.4 0.2 2.4)
(add-heightmodifier 10 173 172 -2.6 -0.4 0.2 2.4)
(add-heightmodifier 10 174 172 -2.6 -0.4 0.2 2.4)
(add-heightmodifier 10 172 171 -2.8 -0.6 0.2 2.8)
(add-heightmodifier 10 173 171 -2.8 -0.6 0.2 2.8)
(add-heightmodifier 10 174 171 -2.8 -0.6 0.2 2.8)
(add-heightmodifier 10 172 170 -3.0 -0.8 0.2 3.2)
(add-heightmodifier 10 173 170 -3.0 -0.8 0.2 3.2)
(add-heightmodifier 10 174 170 -3.0 -0.8 0.2 3.2)
(add-heightmodifier 10 172 169 -3.2 -1.0 0.2 3.6)
(add-heightmodifier 10 173 169 -3.2 -1.0 0.2 3.6)
(add-heightmodifier 10 174 169 -3.2 -1.0 0.2 3.6)
(add-heightmodifier 10 172 168 -3.4 -1.2 0.2 4.0)
(add-heightmodifier 10 173 168 -3.4 -1.2 0.2 4.0)
(add-heightmodifier 10 174 168 -3.4 -1.2 0.2 4.0)
(add-heightmodifier 10 172 167 -3.4 -1.2 0.2 4.4)
(add-heightmodifier 10 173 167 -3.4 -1.2 0.2 4.4)
(add-heightmodifier 10 174 167 -3.4 -1.2 0.2 4.4)
(add-heightmodifier 10 172 166 -3.2 -1.0 0.2 4.8)
(add-heightmodifier 10 173 166 -3.2 -1.0 0.2 4.8)
(add-heightmodifier 10 174 166 -3.2 -1.0 0.2 4.8)
(add-heightmodifier 10 172 165 -3.0 -0.8 0.2 5.2)
(add-heightmodifier 10 173 165 -3.0 -0.8 0.2 5.2)
(add-heightmodifier 10 174 165 -3.0 -0.8 0.2 5.2)
(add-heightmodifier 10 172 164 -2.8 -0.6 0.2 5.6)
(add-heightmodifier 10 173 164 -2.8 -0.6 0.2 5.6)
(add-heightmodifier 10 174 164 -2.8 -0.6 0.2 5.6)
(add-heightmodifier 10 172 163 -2.6 -0.4 0.2 6.0)
(add-heightmodifier 10 173 163 -2.6 -0.4 0.2 6.0)
(add-heightmodifier 10 174 163 -2.6 -0.4 0.2 6.0)
(add-heightmodifier 10 172 162 -2.4 -0.2 0.2 6.4)
(add-heightmodifier 10 173 162 -2.4 -0.2 0.2 6.4)
(add-heightmodifier 10 174 162 -2.4 -0.2 0.2 6.4)
(add-heightmodifier 10 172 161 -2.2 0.0 0.2 6.8)
(add-heightmodifier 10 173 161 -2.2 0.0 0.2 6.8)
(add-heightmodifier 10 174 161 -2.2 0.0 0.2 6.8)
(add-heightmodifier 10 172 160 -2.0 0.2 0.2 7.2)
(add-heightmodifier 10 173 160 -2.0 0.2 0.2 7.2)
(add-heightmodifier 10 174 160 -2.0 0.2 0.2 7.2)
(add-heightmodifier 10 172 159 -1.8 0.4 0.2 7.6)
(add-heightmodifier 10 173 159 -1.8 0.4 0.2 7.6)
(add-heightmodifier 10 174 159 -1.8 0.4 0.2 7.6)
(add-heightmodifier 10 172 158 -1.6 0.6 0.2 8.0)
(add-heightmodifier 10 173 158 -1.6 0.6 0.2 8.0)
(add-heightmodifier 10 174 158 -1.6 0.6 0.2 8.0)
(add-heightmodifier 10 172 157 -1.4 0.8 0.2 8.4)
(add-heightmodifier 10 173 157 -1.4 0.8 0.2 8.4)
(add-heightmodifier 10 174 157 -1.4 0.8 0.2 8.4)
(add-heightmodifier 10 172 156 -1.2 1.0 0.2 8.8)
(add-heightmodifier 10 173 156 -1.2 1.0 0.2 8.8)
(add-heightmodifier 10 174 156 -1.2 1.0 0.2 8.8)
;blinker & ramp.
(define blinker (add-colormodifier 3 159 148 0.5 1.0 0.5 1.0))
(trigger-once 158.5 147.5 0.5 (lambda ()
(set-cell-heights 164 184 164 186 -0.5 -0.5 0.0 0.0)
(set-cell-heights 165 184 165 186 0.0 0.0 0.5 0.5)
(set-cell-heights 166 184 166 186 0.5 0.5 1.0 1.0)
(set-primary-color (sign "You may cross the Garden." 0.8 1.0 -0.1 159 148) 0.9 0.6 0.0 1.0)
(set-onoff blinker #f)
))
;;pipe out of garden.
(define pipe1(pipe 168 182.5 1.5 168 181.5 1.5 0.6))
(set-primary-color pipe1 0.9 0.6 0.0 1.5)
(set-primary-color (pipe-connector 168 181.5 1.5 0.6) 0.9 0.6 0.0 1.0)
(define pipe2(pipe 168 181.5 1.4 168.0 180.5 -4.9 0.5))
(set-primary-color pipe2 0.9 0.6 0.0 1.0)
(set-wind pipe2 -12.0 -6.0)
(set-primary-color (pipe-connector 168.0 180.5 -4.9 0.5) 0.9 0.6 0.0 1.0)
(define pipe3(pipe 168.0 180.5 -4.9 168 173.5 -4.9 0.5))
(set-primary-color pipe3 0.9 0.6 0.0 1.0)
;;End of level
(add-goal 183 141 #f "")
|