###################################
### (C) 2004, Tilo Kühn, v1.0
###################################
### BS : Textumbruch Baustein
### bricht einen beliebig langen Text
### auf 4 Zeilen als 14 Byte-Text um
###################################

#5000|"Text"|Remanent(1/0)|Anz.Eingänge|.n.|Anzahl Ausgänge|.n.|.n.
#5001|Anzahl Eingänge|Ausgänge|Offset|Speicher|Berechnung bei Start
#5002|Index Eingang|Default Wert
#5003|Speicher|Initwert|Remanent
#5004|ausgang|Initwert|runden binär (0/1)|typ (1-send/2-sbc)
#5012|abbruch bei bed. (0/1)|bedingung|formel|zeit|pin-ausgang|pin-offset|pin-speicher|pin-neg.ausgang

5000|"#14-Byte-Texte\Textumbruch"|1|3|"Text"|"Text Breite"|"An/Aus"|2|"Zeile"|"Rest"

5001|3|2|0|2|1

## EN[x]

# Text
5002|1|""|1
5002|2|14|0             # Textbreite
5002|3|1|0    	    		# An/Aus

## Ausgänge

# Zeile
5004|1|""|0|2|1
# Rest
5004|2|""|0|2|1

## Speicher
5003|1|0|0							# Text
5003|2|0|0							# Pos

## Logik

# leerzeichen wegschmeißen
5012|0|"EN[3]"|"__import__('string').lstrip(EN[1])"|""|0|0|1|0
# erstes leerzeichen finden -> SN[2]

5012|0|"EN[3] and len(SN[1])<=EN[2]"|"len(SN[1])"|""|0|0|2|0
5012|0|"EN[3] and len(SN[1])>EN[2]"|"__import__('string').rfind(SN[1],' ',0,EN[2]+1)"|""|0|0|2|0

5012|0|"EN[3] and SN[2]>EN[2]"|"EN[2]"|""|0|0|2|0
5012|0|"EN[3] and SN[2]<0"|"len(SN[1])"|""|0|0|2|0

# ergebnisstring bauen
5012|0|"EN[3]"|"''"|""|1|0|0|0
5012|0|"EN[3] and SN[2]>0"|"SN[1][0:SN[2]]"|""|1|0|0|0
5012|0|"EN[3]"|"''"|""|2|0|0|0
5012|0|"EN[3] and SN[2]>0"|"SN[1][SN[2]:len(SN[1])]"|""|2|0|0|0