diff options
author | uruk | 2013-06-18 10:23:29 +0200 |
---|---|---|
committer | uruk | 2013-06-18 10:23:29 +0200 |
commit | 38bc20a0763f0f83ea3c0a94a68a1edea0d08514 (patch) | |
tree | 8d71d5d2dec96e83e2fcce7c5378e9f2da94130e /engines/avalanche/scr_1.cpp | |
parent | a3025b8dad7abfe845c57aee3703451c223fc2e6 (diff) | |
download | scummvm-rg350-38bc20a0763f0f83ea3c0a94a68a1edea0d08514.tar.gz scummvm-rg350-38bc20a0763f0f83ea3c0a94a68a1edea0d08514.tar.bz2 scummvm-rg350-38bc20a0763f0f83ea3c0a94a68a1edea0d08514.zip |
AVALANCHE: Use Artistic Style.
Diffstat (limited to 'engines/avalanche/scr_1.cpp')
-rw-r--r-- | engines/avalanche/scr_1.cpp | 162 |
1 files changed, 93 insertions, 69 deletions
diff --git a/engines/avalanche/scr_1.cpp b/engines/avalanche/scr_1.cpp index 6228bf86f5..5d8bc7d23b 100644 --- a/engines/avalanche/scr_1.cpp +++ b/engines/avalanche/scr_1.cpp @@ -11,7 +11,7 @@ * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of - * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * You should have received a copy of the GNU General Public License @@ -31,86 +31,110 @@ namespace Avalanche { const varying_string<4> codes = " ßÜÛ"; -typedef matrix<'\0','\377',0,15,byte> fonttype; +typedef matrix < '\0', '\377', 0, 15, byte > fonttype; -byte x,xx,y; -string title,fn; +byte x, xx, y; +string title, fn; file<fonttype> f; fonttype font; byte code; -typedef array<1,3840,byte> atype; +typedef array<1, 3840, byte> atype; -void save() -{ - file<atype> f; - word fv; - atype a /*absolute $B800:0*/; -; - assign(f,"TEXT1.SCR"); - rewrite(f); f << a; close(f); +void save() { + file<atype> f; + word fv; + atype a /*absolute $B800:0*/; + ; + assign(f, "TEXT1.SCR"); + rewrite(f); + f << a; + close(f); } -void centre(byte y, string z) -{; - gotoxy(40-length(z) / 2,y); output << z; +void centre(byte y, string z) { + ; + gotoxy(40 - length(z) / 2, y); + output << z; } -int main(int argc, const char* argv[]) -{pio_initialize(argc, argv); -; -/* write('Title?'); readln(title); - write('Font?'); readln(fn); */ - textattr=0; clrscr; - title="Bug Alert!"; fn=""; - for( xx=1; xx <= 77; xx ++) - {; - gotoxy(Random(80)+1,Random(24)+1); - switch (Random(2)) { - case 0: textattr=red; break; - case 1: textattr=lightred; break; - } - switch (Random(4)) { - case 0: output << '*'; break; - case 1: output << '\17'; break; - case 2: output << 'ù'; break; - case 3: output << 'ú'; break; - } - } - textattr=12; - assign(f,"c:\\thomas\\ttsmall.fnt"); - reset(f); f >> font; close(f); - for( y=0; y <= 3; y ++) - {; - for( x=1; x <= length(title); x ++) - {; - for( xx=7; xx >= 0; xx --) - {; - code=(byte)(((1 << xx) & font[title[x]][y*2])>0)+ - (byte)(((1 << xx) & font[title[x]][y*2+1])>0)*2; - gotoxy(1+x*8-xx,y+1); - if (code>0) output << codes[code+1-1]; - } - } - /*if wherex<>1 then writeln;*/ - } - textattr=red; - centre(7,"An internal error has just occurred within the program."); +int main(int argc, const char *argv[]) { + pio_initialize(argc, argv); + ; + /* write('Title?'); readln(title); + write('Font?'); readln(fn); */ + textattr = 0; + clrscr; + title = "Bug Alert!"; + fn = ""; + for (xx = 1; xx <= 77; xx ++) { + ; + gotoxy(Random(80) + 1, Random(24) + 1); + switch (Random(2)) { + case 0: + textattr = red; + break; + case 1: + textattr = lightred; + break; + } + switch (Random(4)) { + case 0: + output << '*'; + break; + case 1: + output << '\17'; + break; + case 2: + output << 'ù'; + break; + case 3: + output << 'ú'; + break; + } + } + textattr = 12; + assign(f, "c:\\thomas\\ttsmall.fnt"); + reset(f); + f >> font; + close(f); + for (y = 0; y <= 3; y ++) { + ; + for (x = 1; x <= length(title); x ++) { + ; + for (xx = 7; xx >= 0; xx --) { + ; + code = (byte)(((1 << xx) & font[title[x]][y * 2]) > 0) + + (byte)(((1 << xx) & font[title[x]][y * 2 + 1]) > 0) * 2; + gotoxy(1 + x * 8 - xx, y + 1); + if (code > 0) output << codes[code + 1 - 1]; + } + } + /*if wherex<>1 then writeln;*/ + } + textattr = red; + centre(7, "An internal error has just occurred within the program."); - textattr=white; gotoxy(26, 9); output << "Error number: "; - textattr=lightred; output << " "; - textattr=white; gotoxy(27,10); output << "at location: "; - textattr=lightred; output << " "; - centre(12,"This screen should never come up..."); - centre(13,"but it just has!"); - textattr=15; - centre(15,"So, please tell Thorsoft about this as soon as"); - centre(16,"possible, so that we can fix it."); - textattr=red; - centre(20,"Thanks..."); - save(); -return EXIT_SUCCESS; + textattr = white; + gotoxy(26, 9); + output << "Error number: "; + textattr = lightred; + output << " "; + textattr = white; + gotoxy(27, 10); + output << "at location: "; + textattr = lightred; + output << " "; + centre(12, "This screen should never come up..."); + centre(13, "but it just has!"); + textattr = 15; + centre(15, "So, please tell Thorsoft about this as soon as"); + centre(16, "possible, so that we can fix it."); + textattr = red; + centre(20, "Thanks..."); + save(); + return EXIT_SUCCESS; } } // End of namespace Avalanche.
\ No newline at end of file |