Annagramme erzeugen

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
DataMiner
Beiträge: 220
Registriert: 10.10.2004 18:56

Beitrag von DataMiner »

Also, so ganz begreife ich nicht, was du da machst (???)
Meinst du Spiegelschrift oder ein Anagramm?
Ein Anagramm wäre Helm -> Mehl, also durch umstellen der Buchstaben kann aus dem Ursprung ein neues Wort gebildet werden.
Einen Satz in Spiegelschrift würde ich so darstellen:

Code: Alles auswählen

;- Spiegelschrift
String.s="Das ist ein Test"
max=CountString(String, " ")
For i=1 To max+1
  wort.s=StringField(String, i, " ")
  For j=Len(wort) To 1 Step -1
    spiegelwort.s=spiegelwort+Mid(wort, j, 1)
  Next
  spiegelsatz.s=spiegelsatz+spiegelwort+" "
  spiegelwort=""
Next
spiegelsatz=Trim(spiegelsatz)
Debug spiegelsatz
Hilft das?
__________________________________________
Weniger glauben - mehr wissen!
------------------------------------------------------
Proud beneficial owner of SpiderBasic, PureBasic 3.x, 4.x, 5.x and PureVisionXP
Antworten