ich glaube nicht das das einer rausbekommt:
wie gehts weiter??
1
11
21
1211

3321?

leider nein

[k]mal schaun ob die zaubertinte klappt

122111???

nein, die nächste zahl ist:
1
11
21
1211
111221

erklär mal das system

so früh auflösen??

ne nagut, mach ma weita

Als nächstes müsste 312211 kommen.

@ matthias: kanntest du das schon?? oder hast du geschummelt?? wenn du das rausgefunden hast bist sehr gut!!

hier die reihe nochmal: (sie geht endlos weiter)
1
11
21
1211
111221
312211

Ich habe nicht geschummelt, ich habe mir das ganze lange genug angeschaut. Und man darf einfach nicht zu Mathematisch denken.

Wie funktioniert das??

ich glaub ich habs raus ,kommt jetzt 13112221 ?

@ biest: richtig

die lösung in es ist eigentlich ganz einfach: am anfang steht eine 1, also steht in der zweiten zeile 11 (eine eins). in der zweiten zeile stehen jetzt 2 einsen, also steht in der 3. zeile 21 (2 mal die eins)
in der 4. zeile steht dann 1211 (einmal die 2, einmal die 1) usw.

hoffe ^^ das war verständlich ;)
nochmal die reihe
1
11
21
1211
111221
312211
13112221
1113213211

1
11
21
1211
111221
312211
13112221
1113213211
31131211131221
13211311123113112211
usw. *kicher*

1
11
21
1211
111221
312211
13112221
1113213211
31131211131221
13211311123113112211
11131221133112132113212221
3113112221232112111312211312113211
1321132132111213122112311311222113111221131221

Weiterführung:

11
21
1211
111221
312211
13112221
1113213211
31131211131221
13211311123113112211
11131221133112132113212221
3113112221232112111312211312113211
1321132132111213122112311311222113111221131221
11131221131211131231121113112221121321132132211331222113112211
311311222113111231131112132112311321322112111312211312111322212311322113212221
132113213221133112132113311211131221121321131211132221123113112221131112311332111213211322211312113211

Für alle, welche es nicht im Kopf rechnen wollen, hab ich ein kleines Script geschrieben.
Um es ausführen zu können, geht wie folgt vor:
+ Öffnet "Notepad"
+ Fügt den Code unten ein
+ Speichert das ganze mit der Dateiendung "vbs"
+ Doppelklick

Code:
'#########################
'# knowJack 4 m0g3lp0W3r #
'#########################



'#########################
'# DEKLARATIONEN #
'#########################

'Benutzereingabe wird gespeichert
Private sInput



'#########################
'# METHODEN #
'#########################

'Startet das Programm
Call sStart

Private Sub sStart()

'Variables
Dim nCount
Dim nCountWhole
Dim nCounter
Dim sStringCurrent
Dim sStringInput
Dim sStringOutput
Dim sStringResult

'Startwert
sStringInput = "1"

'Wieviele Reihen berechnet werden sollen (:hier 10)
For nCountWhole = 1 To 10

'Nächster Wert herausfinden
Do

'Zähler rücksetzen
nCounter = 0

'Aktuellen Buchstaben setzen
sStringCurrent = Mid(sStringInput, 1, 1)

'Zahlenanzahl herausbekommen
For nCount = 1 To Len(sStringInput)
'Ziffer ist die gleiche wie das letzte
If (Mid(sStringInput, nCount, 1) = sStringCurrent) Then
'Zählen
nCounter = nCounter + 1
Else
'Speichern und vom String entfernen
sStringResult = sStringResult & CStr(nCounter) & sStringCurrent
sStringInput = Mid(sStringInput, (nCounter + 1))
'Schleife verlassen
Exit For
End If

'Letzer Schritt der Schleife?
If (nCount = Len(sStringInput)) Then
'Speichern und vom String entfernen
sStringResult = sStringResult & CStr(nCounter) & sStringCurrent
sStringInput = Mid(sStringInput, (nCounter + 1))
End If
Next
Loop Until (Len(sStringInput) = 0)

'Werte speichern
sStringOutput = sStringOutput & vbCrLf & sStringResult

'Neuer Wert zuweisen
sStringInput = sStringResult

'Werte löschen
sStringResult = ""

Next

'Endwert ausgeben
Call MsgBox(sStringOutput, , "Ausgabe:")

End Sub

Ich hoffe es ist hier erlaubt, bei Mogelpower Code zu posten. Wenn nicht, habe ich Pech gehabt.

^^klappt irgendwie nicht, hab xp

Gerade da muss es ohne Probleme klappen :)
Einfach alles was UNTERHALB von Code: liegt in eine Datei und als MEINEDATEI.vbs speichern.

der sagt:

der prozedureinsprungpunkt "" wurde in der dll user32.dll nicht gefunden

Oh, das ist aber ein sehr komischer Fehler, vorallem weil ich keine Funktionen nutze, welche in der user32.dll stehen.

der gibt danach eine kette aus, aber ich kann nicht wählen von welcher zahl die kette sein soll

'Startwert
sStringInput = "1"

'Wieviele Reihen berechnet werden sollen (:hier 10)
For nCountWhole = 1 To 10


Einfach die Zahlen in diesen beiden Zeilen ändern!

des stimmt nur bis 17 :-(:-(

da is irgendein Fehler :-( :-(

16. Generation:
111312211312111322212321121113122123211223113112221121113122113111231133221121321132132211331121321231231121113122113322113111221131221
@ Knowjack
Hab's nix gerafft.
Aber nur 2 min gebraucht.

Hey, jetzt sind ja alle Beiträge gestreckt worden.
:(
Am besten beim nächsten mal 2-3-zeilig schreiben.

Hi Leute. Ich bin neu und habe eine frage. Ich habe das spiel parasite eve 2 für play station 1, wie kann ich denn die codes für unendlich munition eingeben etc ?

du musst alt + f4 drücken (gleichzeitig) um die console zu öffnen