PureGolf mit Scrollender Matrix

[Deeem2031]

Wie wärs denn damit?

Code: Alles auswählen

B.s=#PB_Compiler_File 
OpenFile(0,B) 
A.s=Space(999) 
FileSeek(0,206) 
ReadData(0,@A,485) 
WriteString(FileSeek(0,0),ReplaceString(A,";","")) 
RunProgram("PBCompiler",GetFilePart(B),GetPathPart(b)) 
;Dim A(InitSprite())    
; 
;OpenScreen(800,600,8,"") 
; 
;While GetKeyState_(27)>>1=0 
;  StartDrawing(ScreenOutput()) 
;  i=4800 
;  While i 
;    j=i*2 
;    x=j+1 
;    DrawText(i%80*10,i/8,Chr(A(j)),A(x)<<8,0) 
;    a=Random(255) 
;    If b<j 
;      A(b)=a%222+33 
;      b+1 
;    ElseIf i>79 
;      If a&4 
;        A(x)=A(j-79) 
;      EndIf 
;    Else 
;      A(x)=a 
;    EndIf 
;    i-1 
;  Wend 
;  StopDrawing() 
;  FlipBuffers() 
;Wend 
;End

[Sylvia]

[Batze]

Somit hätten wir das Thema PureGolf für immer erledigt.

[Sylvia]

Nein. Nur die Regeln müssen geändert werden.

Immerhin hat sich Stefan mit dieser Idee UNSTERBLICH in der Erinnerung
aller PureGolfer gemacht.

[freedimension]

Somit hätten wir das Thema PureGolf für immer erledigt.

Wieso? Du musst doch nur unter die entsprechende Anzahl Zeichen kommen.

[Batze]

Gut stimmt, aber Regeln ändern ist wohl besser.

[Sylvia]

Eigentlich muss nur das Zählprogramm geändert werden um Kommentare
auch mitzuzählen.
Ist das überhaupt das "offizielle" Zählprogramm was wir benutzten ?