Home » Personal collection » Acorn hard disk » apps » Lego » !CtrlLab/LogoFunct

!CtrlLab/LogoFunct

This website contains an archive of files for the Acorn Electron, BBC Micro, Acorn Archimedes, Commodore 16 and Commodore 64 computers, which Dominic Ford has rescued from his private collection of floppy disks and cassettes.

Some of these files were originally commercial releases in the 1980s and 1990s, but they are now widely available online. I assume that copyright over them is no longer being asserted. If you own the copyright and would like files to be removed, please contact me.

Tape/disk: Home » Personal collection » Acorn hard disk » apps » Lego
Filename: !CtrlLab/LogoFunct
Read OK:
File size: 08EC bytes
Load address: 0000
Exec address: 0000
File contents
ask 1
elementlist 2
talkto 3
tto 3
bg 20
create 21
hideframe 22
hidename 23
pos 24
remove 25
setbg 26
setname 27
setpos 28
setsize 29
showframe 30
showname 31
size 32
bottom 40
cleartext 41
ct 41
font 42
fontsize 43
gettext 44
insert 45
loadtext 46
print 47
pr 47
setfont 48
setfontsize 49
setstyle 50
settc 51
style 52
tc 53
top 54
activate 60
deactivate 61
setmonfunction 62
setbuttonmode 80
setofffunction 81
setonfunction 82
cg 100
closeshape 101
delshape 102
drawingpos 103
lineto 104
moveto 105
openshape 106
renameshape 107
resetpicture 108
setcolour 109
setpenpat 110
setpenwidth 111
setshape 112
setwallpaper 113
shape 114
shapelist 115
limits 120
setlimits 121
setsliderfunction 122
setvalue 123
value 124
clearcurve 140
clearcurves 141
datalist 142
hidescales 143
loaddata 144
sampling? 145
savedata 146
setcurvefunction 147
setdata 148
setinterval 149
setxorg 150
setyaxis 151
showscales 152
startsample 153
stopsample 154
show 160
type 161
clearpage 180
cp 180
clearproject 181
closeproject 182
erpage 183
getpage 184
gp 184
loadprocs 185
loadshapes 186
namepage 187
np 187
newpage 188
newproject 189
loadtools 190
cc 200
hidecc 201
hidetools 202
showcc 203
showtools 204
printnames 220
cd 240
chdir 240
currentdir 241
erasefile 242
erfile 242
erproject 243
getproject 244
nameproject 245
pagelist 246
prefix 241
projectlist 247
restoreproject 248
saveproject 249
savetext 250
setprefix 240
textlist 251
printpage 260
printproject 261
printtext 262
setcomma 270
setpoint 271
resett1 280
resett2 281
resett3 282
resett4 283
timer1 284
timer2 285
timer3 286
timer4 287
tone 288
wait 289
angle 300
boolean 301
celsius 302
counter 303
fahrenheit 304
key? 305
mousebutton? 306
mousepos 307
option? 308
percent 309
raw 310
resetcounter 312
resetrotation 313
rotation 314
setdd 315
shift? 316
alloff 320
ao 320
flash 321
off 322
on 323
onfor 324
power 325
rd 326
setleft 327
setpower 328
setright 329
fontlist 340
# angle5 360
# angle6 361
# angle7 362
# angle8 363
# light5 364
# light6 365
# light7 366
# light8 367
# temp1 368
# temp2 369
# temp3 370
# temp4 371
# touch1 372
# touch2 373
# touch3 374
# touch4 375
launch 380
forever 381
errormessage 382
sensor1 400
sensor2 401
sensor3 402
sensor4 403
sensor5 404
sensor6 405
sensor7 406
sensor8 407
cos 500
sin 501
tan 502
00000000  61 73 6b 20 31 0a 65 6c  65 6d 65 6e 74 6c 69 73  |ask 1.elementlis|
00000010  74 20 32 0a 74 61 6c 6b  74 6f 20 33 0a 74 74 6f  |t 2.talkto 3.tto|
00000020  20 33 0a 62 67 20 32 30  0a 63 72 65 61 74 65 20  | 3.bg 20.create |
00000030  32 31 0a 68 69 64 65 66  72 61 6d 65 20 32 32 0a  |21.hideframe 22.|
00000040  68 69 64 65 6e 61 6d 65  20 32 33 0a 70 6f 73 20  |hidename 23.pos |
00000050  32 34 0a 72 65 6d 6f 76  65 20 32 35 0a 73 65 74  |24.remove 25.set|
00000060  62 67 20 32 36 0a 73 65  74 6e 61 6d 65 20 32 37  |bg 26.setname 27|
00000070  0a 73 65 74 70 6f 73 20  32 38 0a 73 65 74 73 69  |.setpos 28.setsi|
00000080  7a 65 20 32 39 0a 73 68  6f 77 66 72 61 6d 65 20  |ze 29.showframe |
00000090  33 30 0a 73 68 6f 77 6e  61 6d 65 20 33 31 0a 73  |30.showname 31.s|
000000a0  69 7a 65 20 33 32 0a 62  6f 74 74 6f 6d 20 34 30  |ize 32.bottom 40|
000000b0  0a 63 6c 65 61 72 74 65  78 74 20 34 31 0a 63 74  |.cleartext 41.ct|
000000c0  20 34 31 0a 66 6f 6e 74  20 34 32 0a 66 6f 6e 74  | 41.font 42.font|
000000d0  73 69 7a 65 20 34 33 0a  67 65 74 74 65 78 74 20  |size 43.gettext |
000000e0  34 34 0a 69 6e 73 65 72  74 20 34 35 0a 6c 6f 61  |44.insert 45.loa|
000000f0  64 74 65 78 74 20 34 36  0a 70 72 69 6e 74 20 34  |dtext 46.print 4|
00000100  37 0a 70 72 20 34 37 0a  73 65 74 66 6f 6e 74 20  |7.pr 47.setfont |
00000110  34 38 0a 73 65 74 66 6f  6e 74 73 69 7a 65 20 34  |48.setfontsize 4|
00000120  39 0a 73 65 74 73 74 79  6c 65 20 35 30 0a 73 65  |9.setstyle 50.se|
00000130  74 74 63 20 35 31 0a 73  74 79 6c 65 20 35 32 0a  |ttc 51.style 52.|
00000140  74 63 20 35 33 0a 74 6f  70 20 35 34 0a 61 63 74  |tc 53.top 54.act|
00000150  69 76 61 74 65 20 36 30  0a 64 65 61 63 74 69 76  |ivate 60.deactiv|
00000160  61 74 65 20 36 31 0a 73  65 74 6d 6f 6e 66 75 6e  |ate 61.setmonfun|
00000170  63 74 69 6f 6e 20 36 32  0a 73 65 74 62 75 74 74  |ction 62.setbutt|
00000180  6f 6e 6d 6f 64 65 20 38  30 0a 73 65 74 6f 66 66  |onmode 80.setoff|
00000190  66 75 6e 63 74 69 6f 6e  20 38 31 0a 73 65 74 6f  |function 81.seto|
000001a0  6e 66 75 6e 63 74 69 6f  6e 20 38 32 0a 63 67 20  |nfunction 82.cg |
000001b0  31 30 30 0a 63 6c 6f 73  65 73 68 61 70 65 20 31  |100.closeshape 1|
000001c0  30 31 0a 64 65 6c 73 68  61 70 65 20 31 30 32 0a  |01.delshape 102.|
000001d0  64 72 61 77 69 6e 67 70  6f 73 20 31 30 33 0a 6c  |drawingpos 103.l|
000001e0  69 6e 65 74 6f 20 31 30  34 0a 6d 6f 76 65 74 6f  |ineto 104.moveto|
000001f0  20 31 30 35 0a 6f 70 65  6e 73 68 61 70 65 20 31  | 105.openshape 1|
00000200  30 36 0a 72 65 6e 61 6d  65 73 68 61 70 65 20 31  |06.renameshape 1|
00000210  30 37 0a 72 65 73 65 74  70 69 63 74 75 72 65 20  |07.resetpicture |
00000220  31 30 38 0a 73 65 74 63  6f 6c 6f 75 72 20 31 30  |108.setcolour 10|
00000230  39 0a 73 65 74 70 65 6e  70 61 74 20 31 31 30 0a  |9.setpenpat 110.|
00000240  73 65 74 70 65 6e 77 69  64 74 68 20 31 31 31 0a  |setpenwidth 111.|
00000250  73 65 74 73 68 61 70 65  20 31 31 32 0a 73 65 74  |setshape 112.set|
00000260  77 61 6c 6c 70 61 70 65  72 20 31 31 33 0a 73 68  |wallpaper 113.sh|
00000270  61 70 65 20 31 31 34 0a  73 68 61 70 65 6c 69 73  |ape 114.shapelis|
00000280  74 20 31 31 35 0a 6c 69  6d 69 74 73 20 31 32 30  |t 115.limits 120|
00000290  0a 73 65 74 6c 69 6d 69  74 73 20 31 32 31 0a 73  |.setlimits 121.s|
000002a0  65 74 73 6c 69 64 65 72  66 75 6e 63 74 69 6f 6e  |etsliderfunction|
000002b0  20 31 32 32 0a 73 65 74  76 61 6c 75 65 20 31 32  | 122.setvalue 12|
000002c0  33 0a 76 61 6c 75 65 20  31 32 34 0a 63 6c 65 61  |3.value 124.clea|
000002d0  72 63 75 72 76 65 20 31  34 30 0a 63 6c 65 61 72  |rcurve 140.clear|
000002e0  63 75 72 76 65 73 20 31  34 31 0a 64 61 74 61 6c  |curves 141.datal|
000002f0  69 73 74 20 31 34 32 0a  68 69 64 65 73 63 61 6c  |ist 142.hidescal|
00000300  65 73 20 31 34 33 0a 6c  6f 61 64 64 61 74 61 20  |es 143.loaddata |
00000310  31 34 34 0a 73 61 6d 70  6c 69 6e 67 3f 20 31 34  |144.sampling? 14|
00000320  35 0a 73 61 76 65 64 61  74 61 20 31 34 36 0a 73  |5.savedata 146.s|
00000330  65 74 63 75 72 76 65 66  75 6e 63 74 69 6f 6e 20  |etcurvefunction |
00000340  31 34 37 0a 73 65 74 64  61 74 61 20 31 34 38 0a  |147.setdata 148.|
00000350  73 65 74 69 6e 74 65 72  76 61 6c 20 31 34 39 0a  |setinterval 149.|
00000360  73 65 74 78 6f 72 67 20  31 35 30 0a 73 65 74 79  |setxorg 150.sety|
00000370  61 78 69 73 20 31 35 31  0a 73 68 6f 77 73 63 61  |axis 151.showsca|
00000380  6c 65 73 20 31 35 32 0a  73 74 61 72 74 73 61 6d  |les 152.startsam|
00000390  70 6c 65 20 31 35 33 0a  73 74 6f 70 73 61 6d 70  |ple 153.stopsamp|
000003a0  6c 65 20 31 35 34 0a 73  68 6f 77 20 31 36 30 0a  |le 154.show 160.|
000003b0  74 79 70 65 20 31 36 31  0a 63 6c 65 61 72 70 61  |type 161.clearpa|
000003c0  67 65 20 31 38 30 0a 63  70 20 31 38 30 0a 63 6c  |ge 180.cp 180.cl|
000003d0  65 61 72 70 72 6f 6a 65  63 74 20 31 38 31 0a 63  |earproject 181.c|
000003e0  6c 6f 73 65 70 72 6f 6a  65 63 74 20 31 38 32 0a  |loseproject 182.|
000003f0  65 72 70 61 67 65 20 31  38 33 0a 67 65 74 70 61  |erpage 183.getpa|
00000400  67 65 20 31 38 34 0a 67  70 20 31 38 34 0a 6c 6f  |ge 184.gp 184.lo|
00000410  61 64 70 72 6f 63 73 20  31 38 35 0a 6c 6f 61 64  |adprocs 185.load|
00000420  73 68 61 70 65 73 20 31  38 36 0a 6e 61 6d 65 70  |shapes 186.namep|
00000430  61 67 65 20 31 38 37 0a  6e 70 20 31 38 37 0a 6e  |age 187.np 187.n|
00000440  65 77 70 61 67 65 20 31  38 38 0a 6e 65 77 70 72  |ewpage 188.newpr|
00000450  6f 6a 65 63 74 20 31 38  39 0a 6c 6f 61 64 74 6f  |oject 189.loadto|
00000460  6f 6c 73 20 31 39 30 0a  63 63 20 32 30 30 0a 68  |ols 190.cc 200.h|
00000470  69 64 65 63 63 20 32 30  31 0a 68 69 64 65 74 6f  |idecc 201.hideto|
00000480  6f 6c 73 20 32 30 32 0a  73 68 6f 77 63 63 20 32  |ols 202.showcc 2|
00000490  30 33 0a 73 68 6f 77 74  6f 6f 6c 73 20 32 30 34  |03.showtools 204|
000004a0  0a 70 72 69 6e 74 6e 61  6d 65 73 20 32 32 30 0a  |.printnames 220.|
000004b0  63 64 20 32 34 30 0a 63  68 64 69 72 20 32 34 30  |cd 240.chdir 240|
000004c0  0a 63 75 72 72 65 6e 74  64 69 72 20 32 34 31 0a  |.currentdir 241.|
000004d0  65 72 61 73 65 66 69 6c  65 20 32 34 32 0a 65 72  |erasefile 242.er|
000004e0  66 69 6c 65 20 32 34 32  0a 65 72 70 72 6f 6a 65  |file 242.erproje|
000004f0  63 74 20 32 34 33 0a 67  65 74 70 72 6f 6a 65 63  |ct 243.getprojec|
00000500  74 20 32 34 34 0a 6e 61  6d 65 70 72 6f 6a 65 63  |t 244.nameprojec|
00000510  74 20 32 34 35 0a 70 61  67 65 6c 69 73 74 20 32  |t 245.pagelist 2|
00000520  34 36 0a 70 72 65 66 69  78 20 32 34 31 0a 70 72  |46.prefix 241.pr|
00000530  6f 6a 65 63 74 6c 69 73  74 20 32 34 37 0a 72 65  |ojectlist 247.re|
00000540  73 74 6f 72 65 70 72 6f  6a 65 63 74 20 32 34 38  |storeproject 248|
00000550  0a 73 61 76 65 70 72 6f  6a 65 63 74 20 32 34 39  |.saveproject 249|
00000560  0a 73 61 76 65 74 65 78  74 20 32 35 30 0a 73 65  |.savetext 250.se|
00000570  74 70 72 65 66 69 78 20  32 34 30 0a 74 65 78 74  |tprefix 240.text|
00000580  6c 69 73 74 20 32 35 31  0a 70 72 69 6e 74 70 61  |list 251.printpa|
00000590  67 65 20 32 36 30 0a 70  72 69 6e 74 70 72 6f 6a  |ge 260.printproj|
000005a0  65 63 74 20 32 36 31 0a  70 72 69 6e 74 74 65 78  |ect 261.printtex|
000005b0  74 20 32 36 32 0a 73 65  74 63 6f 6d 6d 61 20 32  |t 262.setcomma 2|
000005c0  37 30 0a 73 65 74 70 6f  69 6e 74 20 32 37 31 0a  |70.setpoint 271.|
000005d0  72 65 73 65 74 74 31 20  32 38 30 0a 72 65 73 65  |resett1 280.rese|
000005e0  74 74 32 20 32 38 31 0a  72 65 73 65 74 74 33 20  |tt2 281.resett3 |
000005f0  32 38 32 0a 72 65 73 65  74 74 34 20 32 38 33 0a  |282.resett4 283.|
00000600  74 69 6d 65 72 31 20 32  38 34 0a 74 69 6d 65 72  |timer1 284.timer|
00000610  32 20 32 38 35 0a 74 69  6d 65 72 33 20 32 38 36  |2 285.timer3 286|
00000620  0a 74 69 6d 65 72 34 20  32 38 37 0a 74 6f 6e 65  |.timer4 287.tone|
00000630  20 32 38 38 0a 77 61 69  74 20 32 38 39 0a 61 6e  | 288.wait 289.an|
00000640  67 6c 65 20 33 30 30 0a  62 6f 6f 6c 65 61 6e 20  |gle 300.boolean |
00000650  33 30 31 0a 63 65 6c 73  69 75 73 20 33 30 32 0a  |301.celsius 302.|
00000660  63 6f 75 6e 74 65 72 20  33 30 33 0a 66 61 68 72  |counter 303.fahr|
00000670  65 6e 68 65 69 74 20 33  30 34 0a 6b 65 79 3f 20  |enheit 304.key? |
00000680  33 30 35 0a 6d 6f 75 73  65 62 75 74 74 6f 6e 3f  |305.mousebutton?|
00000690  20 33 30 36 0a 6d 6f 75  73 65 70 6f 73 20 33 30  | 306.mousepos 30|
000006a0  37 0a 6f 70 74 69 6f 6e  3f 20 33 30 38 0a 70 65  |7.option? 308.pe|
000006b0  72 63 65 6e 74 20 33 30  39 0a 72 61 77 20 33 31  |rcent 309.raw 31|
000006c0  30 0a 72 65 73 65 74 63  6f 75 6e 74 65 72 20 33  |0.resetcounter 3|
000006d0  31 32 0a 72 65 73 65 74  72 6f 74 61 74 69 6f 6e  |12.resetrotation|
000006e0  20 33 31 33 0a 72 6f 74  61 74 69 6f 6e 20 33 31  | 313.rotation 31|
000006f0  34 0a 73 65 74 64 64 20  33 31 35 0a 73 68 69 66  |4.setdd 315.shif|
00000700  74 3f 20 33 31 36 0a 61  6c 6c 6f 66 66 20 33 32  |t? 316.alloff 32|
00000710  30 0a 61 6f 20 33 32 30  0a 66 6c 61 73 68 20 33  |0.ao 320.flash 3|
00000720  32 31 0a 6f 66 66 20 33  32 32 0a 6f 6e 20 33 32  |21.off 322.on 32|
00000730  33 0a 6f 6e 66 6f 72 20  33 32 34 0a 70 6f 77 65  |3.onfor 324.powe|
00000740  72 20 33 32 35 0a 72 64  20 33 32 36 0a 73 65 74  |r 325.rd 326.set|
00000750  6c 65 66 74 20 33 32 37  0a 73 65 74 70 6f 77 65  |left 327.setpowe|
00000760  72 20 33 32 38 0a 73 65  74 72 69 67 68 74 20 33  |r 328.setright 3|
00000770  32 39 0a 66 6f 6e 74 6c  69 73 74 20 33 34 30 0a  |29.fontlist 340.|
00000780  23 20 61 6e 67 6c 65 35  20 33 36 30 0a 23 20 61  |# angle5 360.# a|
00000790  6e 67 6c 65 36 20 33 36  31 0a 23 20 61 6e 67 6c  |ngle6 361.# angl|
000007a0  65 37 20 33 36 32 0a 23  20 61 6e 67 6c 65 38 20  |e7 362.# angle8 |
000007b0  33 36 33 0a 23 20 6c 69  67 68 74 35 20 33 36 34  |363.# light5 364|
000007c0  0a 23 20 6c 69 67 68 74  36 20 33 36 35 0a 23 20  |.# light6 365.# |
000007d0  6c 69 67 68 74 37 20 33  36 36 0a 23 20 6c 69 67  |light7 366.# lig|
000007e0  68 74 38 20 33 36 37 0a  23 20 74 65 6d 70 31 20  |ht8 367.# temp1 |
000007f0  33 36 38 0a 23 20 74 65  6d 70 32 20 33 36 39 0a  |368.# temp2 369.|
00000800  23 20 74 65 6d 70 33 20  33 37 30 0a 23 20 74 65  |# temp3 370.# te|
00000810  6d 70 34 20 33 37 31 0a  23 20 74 6f 75 63 68 31  |mp4 371.# touch1|
00000820  20 33 37 32 0a 23 20 74  6f 75 63 68 32 20 33 37  | 372.# touch2 37|
00000830  33 0a 23 20 74 6f 75 63  68 33 20 33 37 34 0a 23  |3.# touch3 374.#|
00000840  20 74 6f 75 63 68 34 20  33 37 35 0a 6c 61 75 6e  | touch4 375.laun|
00000850  63 68 20 33 38 30 0a 66  6f 72 65 76 65 72 20 33  |ch 380.forever 3|
00000860  38 31 0a 65 72 72 6f 72  6d 65 73 73 61 67 65 20  |81.errormessage |
00000870  33 38 32 0a 73 65 6e 73  6f 72 31 20 34 30 30 0a  |382.sensor1 400.|
00000880  73 65 6e 73 6f 72 32 20  34 30 31 0a 73 65 6e 73  |sensor2 401.sens|
00000890  6f 72 33 20 34 30 32 0a  73 65 6e 73 6f 72 34 20  |or3 402.sensor4 |
000008a0  34 30 33 0a 73 65 6e 73  6f 72 35 20 34 30 34 0a  |403.sensor5 404.|
000008b0  73 65 6e 73 6f 72 36 20  34 30 35 0a 73 65 6e 73  |sensor6 405.sens|
000008c0  6f 72 37 20 34 30 36 0a  73 65 6e 73 6f 72 38 20  |or7 406.sensor8 |
000008d0  34 30 37 0a 63 6f 73 20  35 30 30 0a 73 69 6e 20  |407.cos 500.sin |
000008e0  35 30 31 0a 74 61 6e 20  35 30 32 0a              |501.tan 502.|
000008ec