itext$,nr$ Z"Schnelleinstieg in Profan" ;I1,~=(0,15,15) P0,0-640,480H"Tms Rmn",48,0,1,0,0m~=(31,0,0),-1G248,28,"Profan" G168,73,"Der Schnelleinstieg"m~=(8,0,0),-1G250,30,"Profan" G170,75,"Der Schnelleinstieg"m0,-1H"System",0,0,0,0,0W"Knopf1",10,10A10,10-32,32>10,10-64,32;0G20,18,"Zurⁿck" I1,32767kx1%=216kx2%=435Qx1%,144-x2%,180;6,6Qx1%,189-x2%,225;6,6Qx1%,234-x2%,270;6,6Qx1%,279-x2%,315;6,6Qx1%,324-x2%,360;6,6Qx1%,369-x2%,405;6,6 H"System",0,0,0,1,0kx1%=249kx2%=171W"TEXT",x2%,144Gx1%,153,"Einfⁿhrung"W"TEXT",x2%,189Gx1%,198,"Installation"W"TEXT",x2%,234Gx1%,243,"Editor"W"TEXT",x2%,279Gx1%,288,"Drucken"W"TEXT",x2%,324Gx1%,333,"Programm ansehen"W"TEXT",x2%,369 Gx1%,378,"Das erste Programm" I1,~=(31,31,16)P30,210-144,294H"System",0,0,0,0,0G39,222,"Bitte einen"G39,237,"Menⁿpunkt"G39,252,"oder ein Icon"G39,267,"anklicken!" !WAITFORINPUT: g kx1%=171kx2%=435"Ω~B(x1%,144-x2%,180):9"Einfⁿhrung"$Ω~B(x1%,189-x2%,225):9"Installation" Ω~B(x1%,234-x2%,270):9"Editor" Ω~B(x1%,279-x2%,315):9"Druck" Ω~B(x1%,324-x2%,360):9"Start" Ω~B(x1%,369-x2%,405):9"Programm"Ω~B(10,10-65,41):9"Ende"Ω~A(0)::"NoHit"9"WaitForInput" !NOHIT: 0l"Bitte einen Menⁿpunkt anwΣhlen!","HINWEIS:",167 !ENDE: e !EINF▄HRUNG: kText$="EINF.TXT":"Textausgabe"9"WaitForInput" !INSTALLATION: kText$="INST.TXT":"Textausgabe"9"WaitForInput" !EDITOR: kText$="EDIT.TXT":"Textausgabe"9"WaitForInput" !DRUCK: kText$="DRUCK.TXT":"Textausgabe"9"WaitForInput" !START: 7kText$=~K("Welches Programm wollen Sie sehen?","*.PRF") Ω~6(Text$):<~2("NOTEPAD ",Text$)9"WaitForInput"
!PROGRAMM: gkText$="▄ber den Menⁿpunkt '╓ffnen' im Menⁿ 'Datei' kann das Programm 'ERSTES.PRF' geladen werden. Von" ikText$=~2(Text$," diesem ausgehend k÷nnen Sie problemlos Ihre erste eigene Windowsanwendung entwickeln.")lText$,"HINWEIS 1/3",64 _kText$="Um das Programm auszuprobieren, wΣhlen Sie den Menⁿpunkt 'Ausfⁿhren' im Menⁿ 'Profan'." LkText$=~2(Text$," WΣhlen Sie als auszufⁿhrendes Programm 'ERSTES.PRF' aus.")lText$,"HINWEIS 2/3",64 pkText$="Mit dem Menⁿpunkt 'PRC-Datei' erzeugen Sie eine kompilierte Version, die z.B. mit 'PROFRUN ERSTES.PRC' " okText$=~2(Text$,"gestartet werden kann. Mit dem Menⁿpunkt 'EXE-Date' erzeugen Sie das selbststΣndige Programm")!kText$=~2(Text$," 'ERSTES.EXE'.")lText$,"HINWEIS 3/3",64 <"SHPROFED"Ω%IOResult:<"PROFED ERSTES"9"WaitForInput" !TEXTAUSGABE: W"Knopf1",595,372H"System",0,0,0,0,0 m32767,-1G602,380,"OK"'10,50-580,400 ^#1,text$b#1kFehler%=%IoResult2Fehler% *l~2(text$," nicht gefunden."),"FEHLER:",32$3Fehler%kx1%=15~D(1) j#1,Text$ kNr$=~.(x1%)4~)(~6(Nr$),4)kNr$=~2(" ",Nr$)6+~2(~2(Nr$,": "),text$)kx1%=~!(x1%,1)65~B(595,372-628,405)g6$)J5,0,0I1,~=(0,15,15)P595,372-628,4057
