CONVERT BASp22 ikdiskette einlegen, Taste druecken..."  (d#################################(n# #(x# ArtWorx Converter #(# #(# written by Roland Weigelt #(# #(################################# () 9|TAP"!" |DIS ,"convert.bin",Г ,  ,   {(P,);J ( )"A R T W O R X C O N V E R T E R written by Roland Weigelt" {(P,)] ( )" (1) Mode2-Bild (640x200) -> 1/1 ArtWorx-Screen (Proportionen bleiben richtig)"\ ( )" (2) Mode2-Bild (640x200) -> 1/2 ArtWorx-Screen (Bild in X-Richtung verzerrt)"] ( )" (3) Mode1-Bild (320x200) -> 1/1 ArtWorx-Screen (Proportionen bleiben richtig)"] ( )" (4) Mode1-Bild (320x200) -> 1/4 ArtWorx-Screen (---'----'--- -'---'- -'---'-)""\, ( )" (5) Giga-Cad-Bild (640x200, einfache Aufloesung) -> ArtWorx-Screen (640x400)"\6 ( )" (6) Giga-Cad-Bild (640x400, doppelte Aufloesung) -> ArtWorx-Screen (640x400)"%@ ( )" Bitte waehlen -> ";<JC "" "1" "6" J  )T () ,,X,,4,\ ^ )h----------------------------------rmode 2 -> Screen 1/1|  ! ,   filenam, ӓ ,  ( artwnam".awx", ,,})----------------------------------mode 2 -> Screen 1/2J"Soll das Bild in einen bestehenden Screen eingefuegt werden (J/N)?"Q(C) ""   "N"    "J" 0    artwnam".awx",  M"Soll das Bild in die (O)bere oder (U)ntere Haelfte eingefuegt werden?"U(C) ""   "O"   "U"   4 ,   filenam, ֓,  ,  U& artwnam".awx", ,,}artwnam".bak"|ER,@(0 artwnam".awx", ,,}):----------------------------------Dmode 1 -> Screen 1/1NX  !b ,   filenam,l ٓ ,v  ( artwnam".awx", ,,})----------------------------------mode 1 -> Screen 1/4J"Soll das Bild in einen bestehenden Screen eingefuegt werden (J/N)?"Q(C) ""   "N"    "J" 0    artwnam".awx",  ;"In welches Viertel soll das Bild eingefuegt werden?"J"(1) Oben links, (2) Oben rechts, (3) Unten links, (4) Unten rechts"OC ""   "1" "4"   ()14 ,   filenam, ܓ,  ,  U artwnam".awx", ,,}artwnam".bak"|ER,@(  artwnam".awx", ,,})----------------------------------' Giga-Cad (640x200) -> Screen 1/1*.4   ,   Г,@filenam> ߓ ,  (H artwnam".awx", ,,}'RGiga-Cad (640x400) -> Screen 1/1f\   ,  filenameu(filenam,(filenam))((y(filenam,)))9f ,@filenam,@filename ,  (p artwnam".awx", ,,})z----------------------------------Unterroutinen)Filename holen -------------------@ "Filename des Bildes (mit Extension):",filenam)ArtWorx-Filename holen -----------J "Filename des ArtWorx-Screens (ohne Extension):",artwnam)ArtWorx Disk ---------------------B"ArtWorx-Bilderdiskette einlegen, Taste druecken..." (Bilder Disk ---------------------:"Grafikdiskette einlegen, Taste druecken..."  03