Warning, /education/kturtle/scripts/ad.turtle is written in an unsupported language. File is not indexed.

0001 kturtle-script-v1.0
0002 # KTurtle advertisement :)
0003 
0004 @(reset)
0005 @(canvassize) 400@(,)190
0006 @(penwidth) 10
0007 
0008 @(learn) K $x@(,)$y {
0009   @(dir) 0
0010   @(pu)
0011   @(go) $x@(,)$y
0012   @(pd)
0013   @(bw) 75
0014   @(go) $x+40@(,)$y
0015   @(dir) -140
0016   @(fw) 60
0017   @(bw) 10
0018   @(tl) 85
0019   @(fw) 50
0020 }
0021 
0022 @(learn) T $x@(,)$y {
0023   @(pu)
0024   @(go) $x@(,)$y
0025   @(pd)
0026   @(dir) 90
0027   @(fw) 50
0028   @(bw) 25
0029   @(dir) 180
0030   @(fw) 70
0031 }
0032 
0033 @(learn) u $x@(,)$y {
0034   @(pu)
0035   @(go) $x@(,)$y
0036   @(pd)
0037   @(dir) 180
0038   @(fw) 47
0039   @(tl) 45
0040   @(fw) 7
0041   @(tl) 45
0042   @(fw) 20
0043   @(tl) 45
0044   @(fw) 7
0045   @(tl) 45
0046   @(fw) 47
0047 }
0048 
0049 @(learn) r $x@(,)$y {
0050   @(pu)
0051   @(go) $x@(,)$y
0052   @(pd)
0053   @(dir) 180
0054   @(fw) 55
0055   @(go) $x@(,)$y+15
0056   @(dir) 45
0057   @(penup)
0058   @(fw) 4
0059   @(pendown)
0060   @(fw) 10
0061   @(tr) 45
0062   @(fw) 10
0063 }
0064 
0065 @(learn) t $x@(,)$y {
0066   @(pu)
0067   @(dir) 180
0068   @(pd)
0069   @(go) $x@(,)$y
0070   @(fw) 67
0071   @(tl) 45
0072   @(fw) 7
0073   @(tl) 45
0074   @(fw) 10
0075   @(go) $x@(,)$y+30
0076   @(dir) 90
0077   @(fw) 10
0078 }
0079 
0080 @(learn) l $x@(,)$y {
0081   @(pu)
0082   @(dir) 180
0083   @(pd)
0084   @(go) $x@(,)$y
0085   @(fw) 77
0086 }
0087 
0088 @(learn) e $x@(,)$y {
0089   @(pu)
0090   @(go) $x@(,)$y+30
0091   @(pd)
0092   @(dir) 90
0093   @(fw) 50
0094   @(tl) 90
0095   @(fw) 15
0096   @(tl) 45
0097   @(fw) 15
0098   @(tl) 45
0099   @(fw) 20
0100   @(tl) 45
0101   @(fw) 15
0102   @(tl) 45
0103   @(fw) 25
0104   @(tl) 45
0105   @(fw) 15
0106   @(tl) 45
0107   @(fw) 25
0108 }
0109 
0110 
0111 K 50@(,)30
0112 T 108@(,)35
0113 u 167@(,)50
0114 r 220@(,)50
0115 t 256@(,)30
0116 l 289@(,)30
0117 e 305@(,)50
0118 
0119 @(penup)
0120 @(go) 12@(,)115 
0121 @(pendown)
0122 @(dir) 0
0123 @(fontsize) 18
0124 @(print) "Educative Programming Environment"
0125 
0126 @(spritehide)
0127 @(wait) 1
0128 @(spriteshow)
0129 
0130 @(penup)
0131 @(go) 120@(,)145
0132 @(pendown)
0133 @(dir) 80
0134 @(penwidth) 5
0135 @(pencolor) 255@(,)0@(,)0
0136 @(fw) 130
0137 
0138 @(wait) 0.5
0139 @(penup)
0140 @(go) 180@(,)135
0141 @(pendown)
0142 @(dir) 0
0143 @(pencolor) 0@(,)0@(,)0
0144 @(print) "play"
0145 
0146 @(go) 238@(,)160
0147 @(wait) 0.5