10 COL 0,30,0
15 CLS 
18 MBOUND 0,0,639,479
20 CROFF 
30 MOUSE 1,34
31 BUTTON t(11,0,33,1,2,"Knopf11")
32 BUTTON t(12,0,155,20,2,"Knopf12")
33 BUTTON t(13,0,166,30,2,"Knopf13")
34 BUTTON t(15,0,188,5,25,"Ende->")
35 BUTTON t(14,0,199,20,25,"Knopf14")
40 BUTTON t(1,0,44,1,5,"Knopf1")
41 BUTTON t(2,0,44,1,10,"Knopf2")
42 BUTTON t(3,0,44,1,15,"Knopf3")
43 BUTTON t(4,0,55,20,5,"Knopf4")
44 BUTTON t(5,0,66,20,10,"Knopf5")
45 BUTTON t(6,0,77,30,5,"Knopf6")
46 BUTTON t(7,0,88,30,10,"Knopf7")
47 BUTTON t(8,0,99,30,15,"Knopf8")
48 BUTTON t(9,0,68,30,20,"Knopf9")
49 BUTTON t(10,0,111,30,25,"Knopf10")
50 a=MB 0
52 POS 2,22:PRINT "X:";MGET (1),"Y:";MGET (2);" "
55 IF a>0 THEN GOSUB 100
60 IF a=15 THEN CLS :END 
70 GOTO 50
100 POS 19,22:PRINT "Knopf:";a;"  "
110 RETURN