Ping-Pong
Nach all den vielen Tips und Tricks noch ein zusätzliches Bonbon für Sie: Das erste Telespiel der Welt, gespielt auf Ihrem C 64.
Tapfer haben Sie sich durch dieses Sonderheft durchgearbeitet. Zur Entspannung bieten wir Ihnen noch ein kleines Spielchen an. Es ist eine Nachahmung des ersten Telespieles überhaupt: eine einfache Tennis-Simulation. Dabei übt gerade seine Einfachheit einen besonderen Reiz aus. Gesteuert wird das Spiel mit zwei Joysticks, für jeden Spieler einen. Will man alleine spielen, kann man eine Mauer aus reversen Leerzeichen bauen, von der der Ball abgelenkt wird. Man muß hierbei nur darauf achten, daß bis zur Spalte 29 der Ball nur nach rechts, ab der 31. Spalte der Ball nach links abgelenkt wird.
»PONG 64« war ein Beitrag zum Wettbewerb »Bildschirmseite«. Deshalb erscheint das Programm im Listing extrem kompakt und undurchschaubar. Dennoch lassen sich ein paar Parameter verändern. Zum einen ist das die Geschwindigkeit des Balles. Mit POKE 49335,V wird die Geschwindigkeit verändert. Dabei ist 18 der Standardwert. Zum anderen der Winkel des Balles. Ihn flacht man mit POKE 49263,2 ab (normaler Inhalt ist 1). Diese Änderungen sind am besten zwischen den Zeilen 2 bis 8 anzubringen.
(Tek-Seng The/Ewald Mack/og)0 print"{clr}{rvon}{yel}";:fori=0to39:print" ";:next:v=49152:forj=1to7:reada$:fori=1to36
1 pokev,10*(asc(mid$(a$,i*2-1,1))-65)+val(mid$(a$,i*2,1)):v=v+1:next:next
2 v=832:fori=vto960:pokei,0:next:fori=0to20:pokev+i*3,255:next:v=53248:poke2,0
8 pokev+16,2:pokev+4,0:pokev+21,7:q=(peek(2)and3):p(q)=p(q)+1:print"{home}{rvon}"p(2);
9 printspc(25);p(1):sys49152:goto8
50 dataq9o3o1a1u8o1a3u8q9a0o1d3u8o1c3u8o1c9u8q9h2o1a2u8q9d2o1a0u8q2b3o2y9a7o2y8
51 dataa7x2o2z0a7x2o2n1a3o2n4a3q2a4o2e0u8x2o2d9u8x2o2m8a3o2n7a3x2o2d2u8q9r3o1a2
52 datat2o1a5t2q9f0o1s5t2r4a1u8r3a0w0d2w1t2o2a1u8r4a3u8r3a1w0d2w1t2o2a3u8u6z5u7
53 datau8d4q9a1o1z5u7r4a5u8r3z0t2u8b0u2w4f9r6b3x8z0t2u8a8x2w4y7o4a3u6z0t2o2a5u8
54 datar3b6u8e1a4r2y9t2u8b5x8a4u8u8c3h4u8g6q9a6o1b6u8u8b3u6a4u8u8a8b0y0f4q9a2o1
55 datab6u8q2b8q0z5n6u8z3u2u8y8r3d1u8u8a8r3d0u8y0b6u6s5t2r3b6u8x8y9t2e1a4u8a3o1
56 datay9t2h6i1t2k6o4b1k6o4b5j6n3a2j6q9a1u8y9u2w4f8r6y3x2j6x2w4x0o4x6u2j6a1a1z5