Et voici le lien vers la
vidéo pour "PC DISPLAY"
et le listing du programme BASIC:
10 MODE 0;-1;-2: COLOR 5
20 PATTERN 1,"0080808080808080"
25 PATTERN 2,"8080808080FFFF00"
30 PATTERN 3,"0000000000FFFF00"
35 PATTERN 4,"8080808080800000"
36 PATTERN 4,"8080808080808000"
40 PATTERN 5,"00FFFF8888888888"
45 PATTERN 9,"FFFFFFFF"
50 PATTERN 64,"1824180000000000"
55 VDP(960)=31: VDP(961)=245
60 FOR I=160 TO 736 STEP 192
65 FOR J=0 TO 31
70 VDP(I+J)=9
75 NEXT J
80 NEXT I
100 PRINT @33"PI-21: HTR INLET PRESS (PSI)"
110 PRINT @65"100 160 180"
120 PRINT @225"FIC-20: HTR FLOW (000 GPM)"
130 PRINT @257"6 12 18 OPN CLS"
140 PRINT @417"TI-35: HTR INLET TEMP (@F)"
150 PRINT @449"180 200 220"
160 PRINT @609"TRC-36: HTR OUTLET TEP (@F)"
170 PRINT @641"220 260 280 OPN CLS"
180 FOR I=97 TO 673 STEP 192
190 FOR J=I TO I+21
200 VDP(J)=5: VDP(J+32)=3+J/2*2-J
210 NEXT J
220 VDP(J)=1: VDP(J+32)=4
230 IF J=119: GOTO 290
240 IF J=503: GOTO 290
250 FOR J=I+24 TO I+29
260 VDP(J)=5: VDP(J+32)=3
270 NEXT J
280 VDP(J)=1: VDP(J+32)=4: VDP(I+56)=2
290 NEXT I
300 SPRITE 0,"10101038387C7CFE10387CFEFEFEFEFE10387CFE38383838"
310 FOR I=1 TO 4
320 SPRITE -I,0,8;-I-6,1,12
330 NEXT I
340 SPRITE -5,2,11;-6,2,11: VDP(344)=77: VDP(696)=65
350 MOVE 6
360 Y1=28: SPRITE 7,140,60: MOVE 1,100,0;-1,24720,0
370 Y2=76: SPRITE 8,132,108: MOVE 2,80,0
380 Y3=124: SPRITE 9,80,156: MOVE 3,130,0
390 Y4=172: SPRITE 10,175,204: MOVE 4,50,0
400 Y5=76: MOVE 5,35,0;-5,-14096,0
410 Y6=172: MOVE 6,60,0;-6,-14096,0