mirror of
https://github.com/deater/dos33fsprogs.git
synced 2024-09-10 08:54:51 +00:00
mode7: update text_demo
This commit is contained in:
parent
5889cca76b
commit
d506bff1a0
@ -2,40 +2,135 @@
|
||||
#include <stdlib.h>
|
||||
#include <unistd.h>
|
||||
|
||||
#include <string.h>
|
||||
|
||||
#include "gr-sim.h"
|
||||
|
||||
#define STEPS 10
|
||||
|
||||
#define NUM_CREDITS 10
|
||||
|
||||
#if 0
|
||||
0 1 2 3
|
||||
0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9
|
||||
**************************************************
|
||||
** T H A N K S T O : **
|
||||
**************************************************
|
||||
**************** A L L M S T I E S E V E R Y W H E R E *****************
|
||||
**************************************************
|
||||
#endif
|
||||
|
||||
char credits[NUM_CREDITS][22]={
|
||||
"FROGGYSUE",
|
||||
"PIANOMAN08",
|
||||
"UTOPIA BBS",
|
||||
"THE 7HORSEMEN",
|
||||
"WEAVE'S WORLD TALKER",
|
||||
"STEALTHSUSIE",
|
||||
"ECE GRAD BOWLING",
|
||||
"CORNELL GCF",
|
||||
"ALL MSTIES EVERYWHERE",
|
||||
"...",
|
||||
};
|
||||
|
||||
int main(int argc, char **argv) {
|
||||
|
||||
int ch,i;
|
||||
char string[]="HELLO WORLD!";
|
||||
int ch,i,j,k;
|
||||
|
||||
grsim_init();
|
||||
|
||||
home();
|
||||
gr();
|
||||
|
||||
basic_htab(10);
|
||||
color_equals(15);
|
||||
hlin_double(PAGE0,7,32,38);
|
||||
|
||||
basic_inverse();
|
||||
for(i=0;i<8;i++) {
|
||||
basic_htab(i+1);
|
||||
basic_vtab(23);
|
||||
basic_print(" ");
|
||||
|
||||
basic_htab(i+33);
|
||||
basic_vtab(23);
|
||||
basic_print(" ");
|
||||
}
|
||||
|
||||
for(i=7;i<33;i++) {
|
||||
basic_htab(i+1);
|
||||
basic_vtab(22);
|
||||
basic_print(" ");
|
||||
|
||||
basic_htab(i+1);
|
||||
basic_vtab(24);
|
||||
basic_print(" ");
|
||||
}
|
||||
|
||||
basic_htab(8);
|
||||
basic_vtab(21);
|
||||
basic_print(" ");
|
||||
|
||||
basic_htab(33);
|
||||
basic_vtab(21);
|
||||
basic_print(" ");
|
||||
|
||||
basic_normal();
|
||||
|
||||
basic_htab(12);
|
||||
basic_vtab(21);
|
||||
basic_print("SPECIAL THANKS TO:");
|
||||
|
||||
|
||||
|
||||
while(1) {
|
||||
ch=grsim_input();
|
||||
if (ch!=0) break;
|
||||
}
|
||||
for(k=0;k<NUM_CREDITS;k++) {
|
||||
for(i=0;i<strlen(credits[k]);i++) {
|
||||
credits[k][i]-=STEPS;
|
||||
if (credits[k][i]<0x20) credits[k][i]+=0x40;
|
||||
}
|
||||
}
|
||||
|
||||
while(1) {
|
||||
basic_htab(14);
|
||||
basic_vtab(21);
|
||||
basic_print(string);
|
||||
for(k=0;k<NUM_CREDITS;k++) {
|
||||
|
||||
grsim_update();
|
||||
basic_htab(9);
|
||||
basic_vtab(23);
|
||||
basic_print(" ");
|
||||
|
||||
for(j=0;j<STEPS;j++) {
|
||||
for(i=0;i<strlen(credits[k]);i++) {
|
||||
credits[k][i]++;
|
||||
if (credits[k][i]>0x5f) credits[k][i]=0x20;
|
||||
}
|
||||
|
||||
basic_htab( ((40-strlen(credits[k]))/2)+1 );
|
||||
basic_vtab(23);
|
||||
basic_print(credits[k]);
|
||||
|
||||
grsim_update();
|
||||
|
||||
ch=grsim_input();
|
||||
if (ch!=0) break;
|
||||
|
||||
usleep(80000);
|
||||
|
||||
}
|
||||
|
||||
ch=grsim_input();
|
||||
if (ch!=0) break;
|
||||
|
||||
if (ch=='q') break;
|
||||
|
||||
usleep(100000);
|
||||
|
||||
sleep(1);
|
||||
}
|
||||
|
||||
while(1) {
|
||||
grsim_update();
|
||||
ch=grsim_input();
|
||||
if (ch!=0) break;
|
||||
usleep(100000);
|
||||
}
|
||||
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
Loading…
Reference in New Issue
Block a user