1 ' Double height
2 ' Leighton Derrick
3 ' Amstrad Action   Dec 86
4 '
10 INK 0,0:INK 1,24:PAPER 0:BORDER 0
20 CLS:TAG:PLOT 1,15,1
40 PRINT"DOUBLE HEIGHT";
50 FOR X=0 TO (8*26)*1
60 FOR Y=1 TO 16
70 IF TEST(X,Y)=0 THEN 90
80 PLOT X+180,(Y*2)+200,1
90 NEXT Y:NEXT X
110 PLOT 1,15,0:PRINT"DOUBLE HEIGHT";