---

hallo an alle lispler
hab mich in der letzten zeit ein wenig mit autolisp beschäftigt, die tutorials aufmerksam gelesen und soweit auch alles was ich mir vorgenomen hab weitesgehendgeschafft.
Nur ein problem bleibt. Ich möchhte einen beliebig langen string in seine bestandteile zerlegen. bei dem string handelt es sich nicht um eine liste sondern nur eine zeichenfolge die mit leerzeichen oder auch nicht versehen sein können. nun möchte ich alle zeichen, egal ob leerzeichen oder nicht in einer liste von einzelnen zeichen ausgeben.
Nur wie? kann mir dabei viellicht jemand helfen?
wäre sehr dankbar dafür...

Lg

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Baumhaus,

erstmal herzlich Willkommen im Forum 

Zu Deiner Frage, sieh Dir mal die Funktion (substr ... ) an, die kann Dir Teile der Zeichenkette liefern.
(substr deine_zeichenkette 1 1) liefert Dir das erste Zeichen
(substr deine_zeichenkette 2) liefert alles außer dem ersten Zeichen.
Das ganze in eine Schleife (z. b ein repeat mit der Länge der ursprunglichen Zeichenkette (strlen ... ) ) sollte in die Richtung führen.
Oder vielleicht nutzt Dir auch die (vl-string->list ... ) Funktion, die liefert die eine Liste der Ascii-Codes der Zeichen.

HTH
Viele Grüße
Thomas

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

hallo,
danke ertsmal
das könnte es schon sein nur eine frage hab ich noch an dich, spider_dd:
wennn ich jetzt nicht weiß wie lang die zeichenkette ist und eine while bzw repeat- schleife mache, wie, wann beende ich sie dann.

vielleicht hast du darauf noch eine antwort für mich?

Lg

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

ah ok...
sorry
hab erst grad gesehn dass du mir eigentlich schon eine antwort auf meine frage gegeben hast. 

Danke, werds jetzt mal versuchen...

Lg und shönes wochenende

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

ganz kurz:
(mapcar 'chr (vl-string->list "Guten Abend"))
ergibt
("G" "u" "t" "e" "n" " " "A" "b" "e" "n" "d")

beim Teilen an Leerzeichen oder so, würd ich sowas nehmen

(defun DT:STR-DIVS(STRING SEPARATOR / POS OFFSET LISTE)
  (if(and(=(type STRING) 'STR)(=(type SEPARATOR) 'STR))
    (progn
      (setq POS    (vl-string-search SEPARATOR STRING))
      (setq OFFSET (1+(strlen SEPARATOR)))
      (while POS
        (setq LISTE  (cons (substr STRING 1 POS) LISTE)
              STRING (substr string (+ POS OFFSET))
              POS    (vl-string-search SEPARATOR STRING)
        )
      )
      (reverse (cons STRING LISTE))
    )
  )
)

(DT:STR-DIVS "Guten Abend Leute" " ")
liefert dann
("Guten" "Abend" "Leute")

------------------
      - Thomas -
"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Lg,

im "Kochbuch für Autolisp", gibt es zu diesem Thema schöne Beispiele.

Gruß
Theodor Schönwald

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP