100 REM * EFFEKT MIT
110 REM * DIREKTPROGRAMMIERTEN
120 REM * PM-GRAPHIK
130 REM * P.FINZEL '87
200 HPOSP0=53248:SIZEP0=53256
210 GRAFP0=53261:PCOLR0=704
220 GRACTL=53277:GPRIOR=623
250 GRAPHICS 2+16:SETCOLOR 4,0,0
260 SETCOLOR 0,0,14
280 POKE GPRIOR,1
300 REM * PLAYERS VORBEREITEN
310 FOR I=0 TO 3
320 POKE SIZEP0+I,3
330 POKE GRAFP0+I,255
340 POKE PCOLR0+I,0
350 NEXT I
400 POKE HPOSP0,64
410 POKE HPOSP0+1,96
420 POKE HPOSP0+2,128
430 POKE HPOSP0+3,160
440 POSITION 5,4:PRINT #6;"COMPUTER-"
450 POSITION 5,5:PRINT #6;"KONTAKT"
460 POSITION 6,7
470 PRINT #6;"IST SPITZE"
500 FOR I=0 TO 64
510 POKE HPOSP0+1,96-I
520 POKE HPOSP0,64-I
530 POKE HPOSP0+2,128+I
540 POKE HPOSP0+3,160+I
550 FOR J=0 TO 50:NEXT J
560 NEXT I
600 FOR I=64 TO 0 STEP -1
610 POKE HPOSP0,64-I
620 POKE HPOSP0+1,96-I
630 POKE HPOSP0+3,160+I
640 POKE HPOSP0+2,128+I
650 FOR J=0 TO 10:NEXT J
660 NEXT I
700 END