ۥ-'@E-]&$$$$$$$$$$$$$ $ $$(%%%%%%%%%,%,X%,%%%%%4&l%[$%%   Macro RALFSPM., Copyright (c) 1993, mikroTaurus GmbH BerlinD Gustav-Meyer-Allee 25(_& 1000 Berlin 65 (PLZ ab 1.7.93: 13355)+) Postfach 65 03 31 (PLZ ab 1.7.93: 13303)<: ********A C H T U N G ***********************************LJ Bitte aktualisieren Sie den Pfad fr RALF.EXE in der 1.Zeile der FunktionCKA PLZDDEOpen, wenn Sie RALF von diesem Macro starten lassen wollen:8 *******************************************************EC Macro zum Umwandeln einer spaltenweise (mit der rechten Maustaste MK oder mit Shift-F8) markierten Adresse mit einer alten PLZ in eine Adresse JfH mit einer neuen PLZ. Der markierte Bereich wird durch die neue Adresse  berschriebenHF Wenn Sie Ihre Adresse im Zeilenmodus markieren wollen (mit der linkenLJ Maustaste bzw. mit Shift-Cursortasten), dann benutzen Sie bitte das Makro e RALFZLM.su?wA IstAnwGeladenPkernelName$4CHGetModuleHandle/0 RalfPfad$ /0tmpWin /0tmpCap$ /0txtWin "/0txtCap$6/0ddeKanal K/0AdrAlt$ _/0AdrNeu$suw PLZDDEOpen  RalfPfad$ ralf.exe&  IstAnwGeladenRALF   RalfPfad$  ,-* OpenError1#  dde RALFKONVERT3 *OpenEnde D OpenError1Q Err \ dde  gOpenEnder  PLZDDEOpen dde(PLZDDERequest$kanalAdrAlt$ ,-* RequestError# a$ kanalAdrAlt$ * RequestEnde RequestError $ a$ / RequestEnde= a$ !T PLZDDERequest$ AdrAlt$r  z PLZDDERequest$ a$ 20 Kopieren des markierten Bereichs ins Clipboard: CopyToClip W  ! tmpWin "7 tmpCap$  ztmpWinZ  v X   AdrAlt$ r H G H G AdrNeu$ in tmpWin einfuegen5 NeuEinfuegenG Zeilen U Anf1 a Anf2 m reMax z maxZeile < Pos1 /Anf1AdrAlt$j j  !Pos1 Zeilen Zeilen  =9 Zeile1$ nAdrAlt$Anf1Pos1Anf1,  End1 Zeile1$E  End1@[  Pos2 /Anf2AdrNeu$j j   Pos25  ) Leerzeichen und Tabs rechts abschneiden:,  c$  nZeile1$End1@  ! /j j c$  8  End1 End13S  c$  nZeile1$End1 {  "1  Zeile1$  lZeile1$End1  :End1=  Zeile2$ nAdrNeu$Anf2Pos2Anf2  4Zeile2$   >4  reRand "R  reRandreMax r  maxZeile Zeilen  reMax reRand     Anf2 Pos2      Anf1 Pos1>  Pos1 /Anf1AdrAlt$j j  9  = J  <Z  "b d  Gv    #i $Zeilen   i maxZeile  >    <  &  W  txtCap$%  :  XP Y [ ] MAINg DDETerminate(1)y {  ddeKanal  PLZDDEOpen  ddeKanal   txtWin   txtCap$ ztxtWin  m K   m   CopyToClip<% AdrNeu$ PLZDDERequest$ddeKanalAdrAlt$X  NeuEinfuegen l x ddeKanal tmpCap$      Macro RALFZLM., Copyright (c) 1993, mikroTaurus GmbH BerlinD Gustav-Meyer-Allee 25(_& 1000 Berlin 65 (PLZ ab 1.7.93: 13355)+) Postfach 65 03 31 (PLZ ab 1.7.93: 13303)<: ********A C H T U N G ***********************************LJ Bitte aktualisieren Sie den Pfad fr RALF.EXE in der 1.Zeile der FunktionCKA PLZDDEOpen, wenn Sie RALF von diesem Macro starten lassen wollen:8 *******************************************************DB Macro zum Umwandeln einer zeilenweise (normal) markierten Adresse:8 mit einer alten PLZ in eine Adresse mit einer neuen PLZBR@ der markierte Bereich wird durch die neue Adresse berschriebenHF Wenn Sie Ihre Adresse im BlockModus markieren wollen (mit der rechtenB@ Maustaste oder mit Shift-F8), dann benutzen Sie bitte das Makro , RALFSPM.:?<A IstAnwGeladenPkernelName$4CHGetModuleHandle/0 RalfPfad$/0ddeKanal /0AdrAlt$ /0AdrNeu$ PLZDDEOpen  RalfPfad$ ralf.exe&  IstAnwGeladenRALF B  RalfPfad$Z df ,-* OpenError1# dde RALFKONVERT *OpenEnde  OpenError1 Err  dde  OpenEnde  PLZDDEOpen dde  (PLZDDERequest$kanalAdrAlt$8 ,-* RequestError#V a$ kanalAdrAlt$z * RequestEnde RequestError  a$  RequestEnde a$ ! PLZDDERequest$ AdrAlt$   PLZDDERequest$ a$  $&(*MAIN4DDETerminate(1)FH ddeKanal  PLZDDEOpena ddeKanal z AdrAlt$ r: AdrNeu$ PLZDDERequest$ddeKanalAdrAlt$ 4AdrNeu$ ddeKanal   MAIN!  RalfSpMGlobal:RalfSpM6 MAIN!  RalfZlMGlobal:RalfZlM6 .A MAIN!  RalfSpMNormal:RalfSpM6MAIN!  RalfZlMNormal:RalfZlM6.A 25(_& 1000 Berlin 65 (PLZ aQSW[]df$krt """e#$$@SY[]ft" F MAIN  ,-*Fehler!! RalfSpMNormal:RalfSpMYM 1Das Makro RalfSpM wurde in NORMAL.DOT installiertRalf - Installation@  *Ende Fehler g ?Das Makro RalfSpM konnte nicht in NORMAL.DOT installiert werdenRalf - Installation@)Ende0.A MAIN  ,-*Fehler&!  Ralf:RalfSpMNormal:RalfSpMYR 1Das Makro RalfSpM wurde in NORMAL.DOT installiertRalf - Installation@  *Ende Fehler g ?Das Makro RalfSpM konnte nicht in NORMAL.DOT installiert werdenRalf - Installation@.Ende5MAIN  ,-*Fehler&!  Ralf:RalfZlMNormal:RalfZlMYR 1Das Makro RalfZlM wurde in NORMAL.DOT installiertRalf - Installation@  *Ende Fehler g ?Das Makro RalfZlM konnte nicht in NORMAL.DOT installiert werdenRalf - Installation@.Ende5>.A MAIN  ,-*Fehler&!  Ralf:RalfSpMNormal:RalfSpMYR 1Das Makro RalfSpM wurde in NORMAL.DOT installiertRalf - Installation@  *Ende Fehler g ?Das Makro RalfSpM konnte nicht in NORMAL.DOT installiert werdenRalf - Installation@.Ende5MAIN  ,-*Fehler&!  Ralf:RalfZlMNormal:RalfZlMYR 1Das Makro RalfZlM wurde in NORMAL.DOT installiertRalf - Installation@  *Ende Fehler g ?Das Makro RalfZlM konnte nicht in NORMAL.DOT installiert werdenRalf - Installation@.Ende5>.A$ $ "(Times New Roman Symbol&Arial RalfSpMRca0(080K0RalfSpMRalfZlM InstallSpM InstallZlMXc""e#W["6%%lRalf - PLZ Umwandlung 1993)Makros fr die DDE-Kommunikation mit Ralf Harry Gbel Harry Gbel