Warning, /education/kturtle/scripts/kde.turtle is written in an unsupported language. File is not indexed.
0001 kturtle-script-v1.0 0002 # The KDE Logo 0003 # SPDX-FileCopyrightText: 2008 Andy Teijelo <ateijelo@gmail.com> 0004 # SPDX-License-Identifier: GPL-2.0-or-later 0005 0006 0007 # turnright and forward in one 0008 @(learn) trfw $tr@(,) $fw { 0009 @(turnright) $tr 0010 @(forward) $fw 0011 } 0012 0013 # initialization 0014 @(reset) 0015 @(canvassize) 620@(,) 480 0016 @(canvascolor) 10@(,) 50@(,) 200 0017 @(pencolor) 255@(,) 255@(,) 255 0018 @(penwidth) 3 0019 0020 # "K" 0021 @(penup) 0022 @(go) 294@(,) 280 0023 @(pendown) 0024 trfw 81@(,) 50 0025 trfw -81@(,) 90 0026 trfw 145@(,) 120 0027 trfw -72@(,) 55 0028 trfw -108@(,) 116 0029 trfw 73@(,) 112 0030 trfw -115@(,) 55 0031 trfw -65@(,) 113 0032 trfw 142@(,) 92 0033 trfw -96@(,) 50 0034 trfw -84@(,) 209 0035 0036 # gear 0037 @(penup) 0038 @(go) 358@(,) 322 0039 @(direction) 243 0040 @(pendown) 0041 @(repeat) 4 { 0042 @(repeat) 3 { 0043 trfw 3.75@(,) 6 0044 } 0045 trfw -59.25@(,) 43 0046 trfw 39@(,) 3 0047 trfw 39@(,) 32 0048 trfw 39@(,) 3 0049 trfw 39@(,) 43 0050 trfw -63@(,) 6 0051 } 0052 trfw 4@(,) 4 0053 trfw 112.5@(,) 25 0054 trfw 58@(,) 11 0055 @(repeat) 25 { 0056 trfw -8@(,) 11 0057 } 0058 trfw -8@(,) 7 0059 trfw 117@(,) 33 0060 trfw -70@(,) 9 0061 trfw 71@(,) 27 0062 trfw 39@(,) 3 0063 trfw 39@(,) 32 0064 trfw 39@(,) 3 0065 trfw 39@(,) 43 0066 trfw -62@(,) 8 0067 0068 # border 0069 @(penup) 0070 @(go) 142@(,) 59 0071 @(direction) 0 0072 @(penwidth) 5 0073 @(pendown) 0074 @(repeat) 4 { 0075 @(repeat) 6 { 0076 trfw 15@(,) 4 0077 } 0078 @(forward) 320 0079 } 0080 0081 # move turtle below 0082 @(penup) 0083 @(go) 320@(,) 440