Alte Spiele braucht das Land

[PingKong]

Auch gute erinnerung

haste Angst, dass er bald ganz weg ist?

 

[Herbert Trinkernagel]

haste Angst, dass er bald ganz weg ist?

Nein bin zu eng und als digges kellerkind ist er gut im fettpad verstaut haha

 

[Prolaps Proll]

Vong sowas wird man später 1 Homo

Hat mein jüngster Bruder als erstes PC Game im Kindergarten Alter gespielt. Ist dreifacher Vater und seine Frau nun erfolgreich das 4te Mal dick gebumst...

 

[Stinkachu]

Ich hatte damals einen Gumbl, übrigens der erste in meinem Freundeskreis mit Pentium II mit 333MHz, voll übl, richtich schnell. Jedenfalls hatte er damals das Spiel Luna Inside:

Spielprinzip war im Brinzip ein Tamagotchi. Aber man konnte beim Start des Spiels so drei, vier Mal machen was man will. Also saßen wir zwei frühpubertären Buben mit unseren Chipsfingern, weil Chipszange gab's damals noch nicht, und haben immer auf den Ficken-Knopf gedrückt, bis Luna Aufmerksamkeit wollte und dann das Spiel einfach neu gestartet.

 

[PingKong]

Ich hatte damals einen Gumbl, übrigens der erste in meinem Freundeskreis mit Pentium II mit 333MHz, voll übl, richtich schnell. Jedenfalls hatte er damals das Spiel Luna Inside:

Spielprinzip war im Brinzip ein Tamagotchi. Aber man konnte beim Start des Spiels so drei, vier Mal machen was man will. Also saßen wir zwei frühpubertären Buben mit unseren Chipsfingern, weil Chipszange gab's damals noch nicht, und haben immer auf den Ficken-Knopf gedrückt, bis Luna Aufmerksamkeit wollte und dann das Spiel einfach neu gestartet.

einzig richtige Art das zu spielen

 

[Herbert Trinkernagel]

hab gerade gesehen das des heute noch beliebt ist in asien.

Wusste gar net mehr das man dort den Rudi spielen konnte haha

 

[Herbert Trinkernagel]

Das auch eine absolut geil gewesen vll kennt des noch ainer

 

[Herbert Trinkernagel]

 

[Murphy]

Inhalt Ausgabe 4/84 | 64'er Magazin

www.64er-magazin.de

 

[Murphy]

1 REM BY ANDREAS LERCH
10 POKE52,28OKE56,28:CLR
20 PRINT"{CLR}{RVON}{DOWN}{DOWN}"CHR$(8);OKE36879,25
30 FORI=1TO21
40 POKE646,RND(1)*6+2RINT" ";
50 NEXT
60 PRINT"{BLK}{DOWN}{DOWN}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RVON} "
70 PRINT"{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RVON} VC-20 "
80 PRINT"{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RVON} "
90 PRINT"{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RVON} AUTO "
100 PRINT"{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RVON} "
110 PRINT"{RVON}{DOWN}{DOWN}"CHR$(8);OKE3679,25
120 FORI=1TO21
130 POKE646,RND(1)*6+2RINT" ";
140 NEXT
150 POKE36878,13:FORT=255TO128STEP-1OKE36875,T:NEXTTOKE36875,0
160 PRINT"{BLK}{DOWN}{DOWN}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}SPIELSTAERKE?"
170 PRINT"{DOWN}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}(1-9)"
180 GETA$:IFA$=""THEN180
190 N=(VAL(A$)-1)*10
200 POKE36879,25RINT"{CLR}{BLK}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{RGHT}****BITTE WARTEN****"
210 PL%=7168:H%=7176
220 RESTORE
230 FORI=0TO511OKEPL%+I,PEEK(32768+I):NEXT
240 FORY=1TO5
250 FORI=0TO7:READAOKEH%+I,A:NEXTI
260 H%=H%+8:NEXTY
270 DATA0,204,204,254,205,254,204,204
280 DATA8,20,127,127,20,20,127,127
290 DATA51,51,127,179,127,51,51,0
300 DATA254,254,40,40,254,254,40,16
310 DATA63,33,127,191,140,156,172,76
320 POKE36869,255
330 E=1:W=5:Z=6
340 S=8112
350 POKE36879,25
360 PRINT"{CLR}{RVON}U{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}I ";
370 PRINT"{RVON}{SHIFT--} {SHIFT--}"
380 PRINT"{RVON}{SHIFT--} {SHIFT--}"
390 PRINT"{RVON}{SHIFT--} U{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}I J{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}I";
400 PRINT"{SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--}";
410 PRINT"{SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--}";
420 PRINT"{SHIFT--} {SHIFT--} J{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}I {SHIFT--}";
430 PRINT"{SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--}";
440 PRINT"{SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--}";
450 PRINT"{SHIFT--} J{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-R}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}I{SHIFT--} {SHIFT--}";
460 PRINT"{SHIFT--} {SHIFT--} {SHIFT--}{SHIFT--} {SHIFT--}";
470 PRINT"{SHIFT--} {SHIFT--} {SHIFT--}{SHIFT--} {SHIFT--}";
480 PRINT"{SHIFT--} U{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{CBM-E}{SHIFT-*}{SHIFT-*}{SHIFT-*}I {SHIFT--}{SHIFT--} {SHIFT--}";
490 PRINT"{SHIFT--} {SHIFT--} {SHIFT--} {SHIFT--}{SHIFT--} {SHIFT--}";
500 PRINT"{SHIFT--} {SHIFT--} U{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}K {SHIFT--}{SHIFT--} {SHIFT--}";
510 PRINT"{SHIFT--} J{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}K{$A0} {SHIFT--}{SHIFT--} {SHIFT--}";
520 PRINT"{SHIFT--} {SHIFT--}{SHIFT--} {SHIFT--}";
530 PRINT"{SHIFT--} U{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}K{SHIFT--} {SHIFT--}";
540 PRINT"J{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}I J{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}K {SHIFT--}";
550 PRINT" {SHIFT--} I {SHIFT--}";
560 PRINT" {SHIFT--} I {SHIFT--}";
570 PRINT" J{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}{SHIFT-*}K";
580 POKE7856+7,5OKE7856+9,5OKE7856+11,5
590 E=1
600 S=8112
610 REM
620 PRINT"{HOME}{DOWN}"
630 PRINT"{DOWN}{DOWN}{DOWN}{DOWN}{DOWN}{RGHT}{RGHT}{RGHT}{RGHT}{RVON}WAGEN :"W
640 PRINT"{DOWN}{DOWN}{RGHT}{RGHT}{RGHT}{RGHT}{RVON}RUNDEN:"R
650 IFD=1THENRETURN
660 POKES,E
670 M(1)=1:M(2)=-22:M(3)=-1:M(4)=22
680 M(E)=1
690 GETA$
700 FORY=1TON:NEXTY
710 IFA$="L"THENGOSUB790
720 IFA$="R"THENGOSUB810
730 IFPEEK(S+M(E))=160THENGOTO750
740 GOTO830
750 S=S+M(E)
760 POKES,EOKES-M(E),160
770 POKE36878,10OKE36876,200OKE36876,0
780 GOTO690
790 E=E+1:IFE=5THENE=1
800 RETURN
810 E=E-1:IFE=0THENE=4
820 RETURN
830 IFPEEK(S+M(E))<>137THEN870
840 POKE36878,14:FORI=1TO2OKE36876,235:FORT=1TO9:NEXTOKE36876,231:FORT=1TO9:NEXTT,I
850 R=R+1OKE36878,0OKE36876,0:GOSUB1130:Z=Z-1:IFZ=0THENGOTO940
860 GOTO930
870 IFS+M(E)=7910ORS+M(E)=7932THENGOTO1230
880 GOSUB910
890 POKE36878,13:FORT=150TO220
900 POKE36877,T:FORG=1TO5:NEXTG,TOKE36877,0OKE36878,0:GOTO920
910 POKES,32+128: POKES+M(E),73:RETURN
920 W=W-1:IFW=0THENGOTO940
930 D=0OKE198,0:GOTO350
940 PRINT"{CLR}"OKE36878,14:FORT=128TO255OKE36876,T:NEXTOKE36876,0:
950 POKE36869,240
960 IFPEEK(828)<RTHENPOKE828,R
970 POKE36879,8
980 PRINT"{RVON}{DOWN}{DOWN}"CHR$(8);OKE3679,8
990 FORI=1TO21
1000 POKE646,RND(1)*6+2RINT" ";
1010 NEXT
1020 PRINT"{RVOF}{DOWN}{RGHT}{RGHT}{WHT}DEIN SCORE:"R
1030 PRINT"{DOWN}{DOWN}{RGHT}HIGHSCORE:";PEEK(828)
1040 PRINT"{RVON}{DOWN}{DOWN}"CHR$(8);OKE3679,8
1050 FORI=1TO21
1060 POKE646,RND(1)*6+2RINT" ";
1070 NEXT
1080 PRINT"{DOWN}{DOWN}{RGHT}{RGHT}{RGHT}{RGHT}{WHT}NOCH EIN SPIEL?"
1090 PRINT"{DOWN}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}{RGHT}(J/N)"
1100 GETA$:IFA$="J"THEND=0:R=0RINT"{CLR}":SC=0:GOTO200
1110 IFA$="N"THENEND
1120 GOTO1100
1130 IFR/5<>INT(R/5)THENRETURN
1140 POKE36878,13
1150 FORI=1TO4
1160 F=195:GOSUB1180:F=207:GOSUB1180:F=251:GOSUB1180:F=225:GOTO1200
1180 POKE36876,F:GOSUB1220:RETURN
1200 NEXTI
1210 POKE36876,0OKE36878,0:RETURN
1220 FORY=1TO20:NEXTY:RETURN
1230 Z=6:FORT=1TO4500:NEXTOKES,96+128:S=S+2OKES,EOKES-1,221:GOTO690

 

[Murphy]

Lol der Smeili

 

[Unbedingst]

Hast du das aus ner alten 64er?

 

[Murphy]

Ja, gerade abgetippt

 

[PingKong]

Ja, gerade abgetippt

Aber warum?

 

[Murphy]

Langeweile

 

[Opeltfahrer]

Hab als Kind natürlich schon aufm C64 mit 6502 Assembly Spiele geschrieben und nicht mit diesem BASIC-Schrott

 

[Murphy]

Comal beste

 

[Unbedingst]

Hab als Kind natürlich schon aufm C64 mit 6502 Assembly Spiele geschrieben und nicht mit diesem BASIC-Schrott

Für ein Spiel hat es bei mir nur in Basic gereicht, aber in Assembler konnte ich immerhin nen Interrupt umbiegen und ne Rasterzeilenabfrage einschieben und dann auf der Bildschirmhälfte die Hintergrundsfarbe ändern. Scheiße war so Bargeld.

 

[BSKartoffel]

 

[Briegel]

Lel die tote Vorlesestimme.