Fix mutil loading vertigo.dat

wwiv · Feb 25, 2017 · 52bae2e · 52bae2e
1 parent d933036
commit 52bae2e
Show file tree

Hide file tree

Showing 2 changed files with 255 additions and 255 deletions.
diff --git a/vertigo/src/mis_ansiwfc.pas b/vertigo/src/mis_ansiwfc.pas
@@ -1,44 +1,44 @@
-Procedure DrawStatusScreen;
-Const
-  IMAGEDATA_WIDTH=80;
-  IMAGEDATA_DEPTH=25;
-  IMAGEDATA_LENGTH=518;
-  IMAGEDATA : array [1..518] of Char = (
-     #1,#23,' ','G','u','a','r','d','i','a','n',' ','B','B','S',' ','S',
-    'e','r','v','e','r',' ',' ',' ',#25,#30, #0,'t','e','l','n','e','t',
-    '/','s','m','t','p','/','p','o','p','3','/','f','t','p','/','n','n',
-    't','p',' ',#24, #8,#16,#26,'O','°',#24,'°', #1,'Ú',' ', #7,'C','o',
-    'n','n','e','c','t','i','o','n','s',' ', #1,#26,'%','Ä','¿', #8,'°',
-     #1,'Ú',' ', #7,'S','t','a','t','i','s','t','i','c','s',' ', #1,#26,
-     #9,'Ä','¿', #8,'°',#24,'°', #1,'³',#25,'2','³', #8,'°', #1,'³',#25,
-    #21,'³', #8,'°',#24,'°', #1,'³',#25,'2','³', #8,'°', #1,'³',#25, #5,
-     #7,'P','o','r','t', #8,':',#25,#10, #1,'³', #8,'°',#24,'°', #1,'³',
-    #25,'2','³', #8,'°', #1,'³',#25, #6, #7,'M','a','x', #8,':',#25,#10,
-     #1,'³', #8,'°',#24,'°', #1,'³',#25,'2','³', #8,'°', #1,'³',#25, #3,
-     #7,'A','c','t','i','v','e', #8,':',#25,#10, #1,'³', #8,'°',#24,'°',
-     #1,'³',#25,'2','³', #8,'°', #1,'³',#25, #2, #7,'B','l','o','c','k',
-    'e','d', #8,':',#25,#10, #1,'³', #8,'°',#24,'°', #1,'³',#25,'2','³',
-     #8,'°', #1,'³',#25, #2, #7,'R','e','f','u','s','e','d', #8,':',#25,
-    #10, #1,'³', #8,'°',#24,'°', #1,'³',#25,'2','³', #8,'°', #1,'³',#25,
-     #4, #7,'T','o','t','a','l', #8,':',#25,#10, #1,'³', #8,'°',#24,'°',
-     #1,'³',#25,'2','³', #8,'°', #1,'³',#25,#21,'³', #8,'°',#24,'°', #1,
-    'À',#26,'2','Ä','Ù', #8,'°', #1,'À',#26,#21,'Ä','Ù', #8,'°',#24,#26,
-    'O','°',#24,'°', #1,'Ú',' ', #7,'S','e','r','v','e','r',' ','S','t',
-    'a','t','u','s',' ', #1,#26,'<','Ä','¿', #8,'°',#24,'°', #1,'³',#25,
-    'K','³', #8,'°',#24,'°', #1,'³',#25,'K','³', #8,'°',#24,'°', #1,'³',
-    #25,'K','³', #8,'°',#24,'°', #1,'³',#25,'K','³', #8,'°',#24,'°', #1,
-    '³',#25,'K','³', #8,'°',#24,'°', #1,'³',#25,'K','³', #8,'°',#24,'°',
-     #1,'³',#25,'K','³', #8,'°',#24,'°', #1,'³',#25,'K','³', #8,'°',#24,
-    '°', #1,'À',#26,'K','Ä','Ù', #8,'°',#24,#26,'O','°',#24,#23,' ', #1,
-    'T','A','B','/','S','w','i','t','c','h',' ','W','i','n','d','o','w',
-    #25, #2,' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',#25, #2,'S','P',
-    'A','C','E','/','L','o','c','a','l',#25, #2,'A','L','T','-','K','/',
-    'K','i','l','l',' ','U','s','e','r',#25, #2,'E','S','C','/','S','h',
-    'u','t','d','o','w','n',' ',#24);
-Begin
-  Console.LoadScreenImage(ImageData, ImageData_Length, ImageData_Width, 1, 1);
-
-  //Console.WriteXY (25, 1, 113, strPadC(mysVersionText, 30, ' '));
-
-  Console.WriteXY (1, 25, 113, strPadC('SPACE/Local TELNET     TAB/Switch     ESC/Shutdown', 79, ' '));
-End;
+Procedure DrawStatusScreen;
+Const
+  IMAGEDATA_WIDTH=80;
+  IMAGEDATA_DEPTH=25;
+  IMAGEDATA_LENGTH=518;
+  IMAGEDATA : array [1..518] of Char = (
+     #1,#23,' ','V','e','r','t','i','g','o',' ','B','B','S',' ',' ','S',
+    'e','r','v','e','r',' ',' ',' ',#25,#30, #0,'t','e','l','n','e','t',
+    '/','s','m','t','p','/','p','o','p','3','/','f','t','p','/','n','n',
+    't','p',' ',#24, #8,#16,#26,'O','°',#24,'°', #1,'Ú',' ', #7,'C','o',
+    'n','n','e','c','t','i','o','n','s',' ', #1,#26,'%','Ä','¿', #8,'°',
+     #1,'Ú',' ', #7,'S','t','a','t','i','s','t','i','c','s',' ', #1,#26,
+     #9,'Ä','¿', #8,'°',#24,'°', #1,'³',#25,'2','³', #8,'°', #1,'³',#25,
+    #21,'³', #8,'°',#24,'°', #1,'³',#25,'2','³', #8,'°', #1,'³',#25, #5,
+     #7,'P','o','r','t', #8,':',#25,#10, #1,'³', #8,'°',#24,'°', #1,'³',
+    #25,'2','³', #8,'°', #1,'³',#25, #6, #7,'M','a','x', #8,':',#25,#10,
+     #1,'³', #8,'°',#24,'°', #1,'³',#25,'2','³', #8,'°', #1,'³',#25, #3,
+     #7,'A','c','t','i','v','e', #8,':',#25,#10, #1,'³', #8,'°',#24,'°',
+     #1,'³',#25,'2','³', #8,'°', #1,'³',#25, #2, #7,'B','l','o','c','k',
+    'e','d', #8,':',#25,#10, #1,'³', #8,'°',#24,'°', #1,'³',#25,'2','³',
+     #8,'°', #1,'³',#25, #2, #7,'R','e','f','u','s','e','d', #8,':',#25,
+    #10, #1,'³', #8,'°',#24,'°', #1,'³',#25,'2','³', #8,'°', #1,'³',#25,
+     #4, #7,'T','o','t','a','l', #8,':',#25,#10, #1,'³', #8,'°',#24,'°',
+     #1,'³',#25,'2','³', #8,'°', #1,'³',#25,#21,'³', #8,'°',#24,'°', #1,
+    'À',#26,'2','Ä','Ù', #8,'°', #1,'À',#26,#21,'Ä','Ù', #8,'°',#24,#26,
+    'O','°',#24,'°', #1,'Ú',' ', #7,'S','e','r','v','e','r',' ','S','t',
+    'a','t','u','s',' ', #1,#26,'<','Ä','¿', #8,'°',#24,'°', #1,'³',#25,
+    'K','³', #8,'°',#24,'°', #1,'³',#25,'K','³', #8,'°',#24,'°', #1,'³',
+    #25,'K','³', #8,'°',#24,'°', #1,'³',#25,'K','³', #8,'°',#24,'°', #1,
+    '³',#25,'K','³', #8,'°',#24,'°', #1,'³',#25,'K','³', #8,'°',#24,'°',
+     #1,'³',#25,'K','³', #8,'°',#24,'°', #1,'³',#25,'K','³', #8,'°',#24,
+    '°', #1,'À',#26,'K','Ä','Ù', #8,'°',#24,#26,'O','°',#24,#23,' ', #1,
+    'T','A','B','/','S','w','i','t','c','h',' ','W','i','n','d','o','w',
+    #25, #2,' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',' ',#25, #2,'S','P',
+    'A','C','E','/','L','o','c','a','l',#25, #2,'A','L','T','-','K','/',
+    'K','i','l','l',' ','U','s','e','r',#25, #2,'E','S','C','/','S','h',
+    'u','t','d','o','w','n',' ',#24);
+Begin
+  Console.LoadScreenImage(ImageData, ImageData_Length, ImageData_Width, 1, 1);
+
+  //Console.WriteXY (25, 1, 113, strPadC(mysVersionText, 30, ' '));
+
+  Console.WriteXY (1, 25, 113, strPadC('SPACE/Local TELNET     TAB/Switch     ESC/Shutdown', 79, ' '));
+End;