1
0
mirror of https://github.com/abakh/nbsdgames.git synced 2024-12-04 14:46:22 -05:00
nbsdgames/miketron.c

575 lines
12 KiB
C

/*
|\/|
| |IKETRON
Authored by abakh <abakh@tuta.io>
No rights are reserved and this software comes with no warranties of any kind to the extent permitted by law.
compile with -lncurses
*/
#include <curses.h>
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <limits.h>
#include <time.h>
#include <signal.h>
#include <unistd.h>
#include <stdbool.h>
#include "config.h"
#define SAVE_TO_NUM 10
#define MINLEN 10
#define MAXLEN 24
#define MINWID 40
#define MAXWID 80
enum {UP=1,RIGHT,DOWN,LEFT,FLIGHT,NOTRAIL,BOMB,SPAWN,STOP,SUPERFOOD,TRAIL};
typedef signed char byte;
/* The Plan9 compiler can not handle VLAs and usleep is a POSIX function */
#ifdef Plan9
#define len 10
#define wid 40
int usleep(long usec) {
int second = usec/1000000;
long nano = usec*1000 - second*1000000;
struct timespec sleepy = {0};
sleepy.tv_sec = second;
sleepy.tv_nsec = nano;
nanosleep(&sleepy, (struct timespec *) NULL);
return 0;
}
#else
int len,wid;
#endif
int py,px;
int immunity,flight,notrail;
byte direction;
long score;
chtype colors[6]={0};
byte pse_msg=100;
//no need to a epilepsy variable like in muncher as zeroing the colors suffices
FILE *scorefile;
char error[150]={0};
void move_tron(void){
switch(direction){
case UP:
--py;
break;
case DOWN:
++py;
break;
case LEFT:
--px;
break;
case RIGHT:
++px;
break;
}
if(py==-1)
py=len-1;
else if(py==len)
py=0;
if(px==-1)
px=wid-1;
else if(py==len)
py=0;
}
void logo(void){
mvaddstr(1,0,"|\\/|");
mvaddstr(2,0,"| |IKETRON");
}
byte scorewrite(void){// only saves the top 10, returns the place in the chart
bool deforno;
if( !getenv("MT_SCORES") && (scorefile= fopen(MT_SCORES,"r")) ){
deforno=1;
}
else{
deforno=0;
if( !(scorefile = fopen(getenv("MT_SCORES"),"r")) ){
sprintf(error,"No accessible score files found. You can make an empty text file in %s or set MT_SCORES to such a file to solve this.",MT_SCORES);
return -1;
}
}
char namebuff[SAVE_TO_NUM][60];
long scorebuff[SAVE_TO_NUM];
memset(namebuff,0,SAVE_TO_NUM*60*sizeof(char) );
memset(scorebuff,0,SAVE_TO_NUM*sizeof(long) );
long fuckingscore=0;
char fuckingname[60]={0};
byte location=0;
while( fscanf(scorefile,"%59s : %ld\n",fuckingname,&fuckingscore) == 2 && location<SAVE_TO_NUM ){
strcpy(namebuff[location],fuckingname);
scorebuff[location] = fuckingscore;
++location;
memset(fuckingname,0,60);
fuckingscore=0;
}
if(deforno)
scorefile = fopen(MT_SCORES,"w+");//get rid of the previous text first
else
scorefile = fopen(getenv("MT_SCORES"), "w+") ;
if(!scorefile){
strcpy(error, "The file cannot be opened in w+. ");
return -1;
}
byte itreached=location;
byte ret = -1;
bool wroteit=0;
for(location=0;location<=itreached && location<SAVE_TO_NUM-wroteit;++location){
if(!wroteit && (location>=itreached || score>=scorebuff[location]) ){
fprintf(scorefile,"%s : %ld\n",getenv("USER"),score);
ret=location;
wroteit=1;
}
if(location<SAVE_TO_NUM-wroteit && location<itreached)
fprintf(scorefile,"%s : %ld\n",namebuff[location],scorebuff[location]);
}
fflush(scorefile);
return ret;
}
void showscores(byte playerrank){
erase();
logo();
if(*error){
mvaddstr(3,0,error);
printw("\nHowever, your score is %ld.",score);
refresh();
return;
}
if(playerrank == 0){
char formername[60]={0};
long formerscore=0;
rewind(scorefile);
fscanf(scorefile,"%*s : %*d\n");
move(3,0);
byte b=0;
if ( fscanf(scorefile,"%s : %ld\n",formername,&formerscore)==2){
halfdelay(1);
printw("*****CONGRATULATIONS!****\n");
printw(" You bet the\n");
printw(" previous\n");
printw(" record\n");
printw(" of\n");
printw(" %14ld\n",formerscore);
printw(" held by\n");
printw(" %11s\n",formername);
printw(" \n");
printw(" \n");
printw("*************************\n");
printw("Press a key to proceed:");
Effect:
move(4,0);
attron(colors[b]);
mvprintw(4,0, " _____ ");
mvprintw(5,0, " .' |");
mvprintw(6,0, " .' |");
mvprintw(7,0, " | .| |");
mvprintw(8,0, " |.' | |");
mvprintw(9,0, " | |");
mvprintw(10,0," ___| |___");
mvprintw(11,0," | |");
mvprintw(12,0," |____________|");
attroff(colors[b]);
b=(b+1)%6;
if(getch()==ERR)
goto Effect;
nocbreak();
cbreak();
erase();
logo();
}
}
//scorefile is still open with w+
move(3,0);
char pname[60] = {0};
long pscore=0;
byte rank=0;
rewind(scorefile);
printw(">*>*>Top %d<*<*<\n",SAVE_TO_NUM);
while( rank<SAVE_TO_NUM && fscanf(scorefile,"%s : %ld\n",pname,&pscore) == 2){
if(rank == playerrank)
printw(">>>");
printw("%d) %s : %ld\n",rank+1,pname,pscore);
++rank;
}
addch('\n');
refresh();
}
void put_stuff(byte board[len][wid],byte num){
byte y,x;
for(byte n=0;n<num;++n){
do{
y=rand()%len;
x=rand()%wid;
}while(y==py&&x==px);
board[y][x]=STOP;
if(!rand())
board[y][x]=SUPERFOOD;
else if(!(rand()%20))
board[y][x]=SPAWN;
else if(!(rand()%10))
board[y][x]=BOMB;
else if(!(rand()%10))
board[y][x]=NOTRAIL;
else if(!(rand()%4))
board[y][x]=FLIGHT;
}
}
void rectangle(void){
for(int y=0;y<=len;++y){
mvaddch(3+y,0,ACS_VLINE);
mvaddch(4+y,1+wid,ACS_VLINE);
}
for(int x=0;x<=wid;++x){
mvaddch(3,x,ACS_HLINE);
mvaddch(4+len,x,ACS_HLINE);
}
mvaddch(3,0,ACS_ULCORNER);
mvaddch(4+len,0,ACS_LLCORNER);
mvaddch(3,1+wid,ACS_URCORNER);
mvaddch(4+len,1+wid,ACS_LRCORNER);
}
void draw(byte board[len][wid]){
int y,x;
static byte effect=0;
chtype prnt;
rectangle();
for(y=0;y<len;++y){
for(x=0;x<wid;++x){
if(board[y][x]<0){
prnt=' '|A_STANDOUT|colors[abs(board[y][x])%6];
board[y][x]++;
}
else if(y==py && x==px){
prnt=ACS_PLUS;
if(immunity)
prnt|=colors[effect];
else if(flight)
prnt|=A_BOLD;
else if(!notrail)
prnt|=A_STANDOUT;
}
else if(board[y][x]==TRAIL)
prnt=ACS_PLUS;
else if(board[y][x]==NOTRAIL)
prnt='&';
else if(board[y][x]==FLIGHT)
prnt='?';
else if(board[y][x]==SUPERFOOD)
prnt='%'|colors[effect];
else if(board[y][x]==STOP)
prnt='S';
else if(board[y][x]==SPAWN)
prnt='B';
else if(board[y][x]==BOMB)
prnt='8';
else
prnt= ' ';
mvaddch(4+y,x+1,prnt);
}
}
if(pse_msg>0){
mvprintw(len+5,0,"Suffering PSE? Press e.");
--pse_msg;
}
effect=(effect+1)%6;
}
void explode(byte board[len][wid],int by,int bx){
board[by][bx]=0;//prevent endless recursion
int sy=by-2;
int sx=bx-4;
int ey=by+2;
int ex=bx+4;
if(ey>=len)
ey-=len;
if(ex>=wid)
ex-=wid;
if(sy<0)
sy+=len;
if(sx<0)
sx+=wid;
int y=sy;
int x=sx;
while(y!=ey){
while(x!=ex){
++x;
if(x==wid)
x=0;
if(board[y][x]==BOMB)
explode(board,y,x);
board[y][x]=-10;
}
x=sx;
++y;
if(y==len)
y=0;
}
}
void help(void){
nocbreak();
cbreak();
erase();
logo();
attron(A_BOLD);
mvprintw(3,0," **** THE CONTROLS ****");
attroff(A_BOLD);
mvprintw(4,0,"hjkl/ARROW KEYS : Change direction");
mvprintw(5,0,"q : Quit");
mvprintw(6,0,"F1 & F2: Help on controls & gameplay");
mvprintw(8,0,"Press a key to continue");
refresh();
getch();
erase();
halfdelay(1);
}
void gameplay(void){
nocbreak();
cbreak();
erase();
logo();
attron(A_BOLD);
mvprintw(3,0," **** THE GAMEPLAY ****");
attroff(A_BOLD);
move(4,0);
printw("You are controlling a strange vechile which can \n");
printw("survive explosions but cannot cross the trail it has\n");
printw("left behind. Keep it running as much as you can.");
refresh();
getch();
erase();
halfdelay(1);
}
void sigint_handler(int x){
endwin();
puts("Quit.");
exit(x);
}
int main(int argc, char** argv){
#ifndef Plan9
bool autoset=0;
signal(SIGINT,sigint_handler);
if(argc>3 || (argc==2 && !strcmp("help",argv[1])) ){
printf("Usage: %s [len wid]\n",argv[0]);
return EXIT_FAILURE;
}
if(argc==2){
puts("Give both dimensions.");
return EXIT_FAILURE;
}
if(argc==3){
bool lool = sscanf(argv[1],"%d",&len) && sscanf(argv[2],"%d",&wid);
if(!lool){
puts("Invalid input.");
return EXIT_FAILURE;
}
if(len<MINLEN || wid<MINWID || len>500 || wid>500){
puts("At least one of your given dimensions is either too small or too big.");
return EXIT_FAILURE;
}
}
else{
autoset=1;
}
#endif
initscr();
#ifndef Plan9
if(autoset){
len=LINES-7;
if(len<MINLEN)
len=MINLEN;
else if(len>MAXLEN)
len=MAXLEN;
wid=COLS-5;
if(wid<MINWID)
wid=MINWID;
else if(wid>MAXWID)
wid=MAXWID;
}
#endif
srand(time(NULL)%UINT_MAX);
byte board[len][wid];
int prex,prey;
bool halfspeed=0;
const int constant=150*(80*24)/(len*wid);//that is added to score
initscr();
noecho();
cbreak();
keypad(stdscr,1);
if(has_colors()){
start_color();
use_default_colors();
init_pair(1,COLOR_BLUE,-1);
init_pair(2,COLOR_GREEN,-1);
init_pair(3,COLOR_YELLOW,-1);
init_pair(4,COLOR_CYAN,-1);
init_pair(5,COLOR_MAGENTA,-1);
init_pair(6,COLOR_RED,-1);
for(byte b= 0;b<6;++b){
colors[b]=COLOR_PAIR(b+1);
}
}
Start:
immunity=flight=notrail=0;
curs_set(0);
halfdelay(1);
score=0;
direction=LEFT;
py=len/2;
px=wid/2;
memset(board,0,len*wid);
put_stuff(board,20);
int preinput,input;
while(1){
erase();
logo();
mvprintw(1,12,"Score:%ld",score);
if(immunity)
mvprintw(2,12,"Immunity:%ld",immunity);
else if(flight)
mvprintw(2,12,"Flight:%ld",flight);
else if(notrail)
mvprintw(2,12,"NoTrail:%ld",notrail);
draw(board);
refresh();
preinput=input;
input = getch();
if(input!=ERR)//hide message when a key is entered
pse_msg=0;
if(board[py][px]==SPAWN)
put_stuff(board,5);
else if(board[py][px]==BOMB){
explode(board,py,px);
for(byte b=0;b<10;++b){
draw(board);
refresh();
usleep(100000);
}
}
else if(board[py][px]==STOP){
mvaddch(4+py,px+1,ACS_PLUS|A_STANDOUT);
refresh();
nocbreak();
cbreak();
preinput=input;
input=getch();
halfdelay(1);
}
else if(board[py][px]==SUPERFOOD)
immunity+=len+wid;
else if(board[py][px]==FLIGHT)
flight+=8;
else if(board[py][px]==NOTRAIL)
notrail+=15;
else
goto NoFeatures;
board[py][px]=0;//if one of conditions is true, it executes! keep nagging about goto being redundant!
NoFeatures:
if(board[py][px]==TRAIL){
if(immunity)
board[py][px]=0;
else if(!flight)
break;
}
if( input == KEY_F(1) || input=='?' )
help();
if( input == KEY_F(2) )
gameplay();
halfspeed=!halfspeed;
if( (input=='k' || input==KEY_UP) ){
direction=UP;
halfspeed=1;
}
else if( (input=='j' || input==KEY_DOWN) ){
direction=DOWN;
halfspeed=1;
}
else if( (input=='h' || input==KEY_LEFT) )
direction=LEFT;
else if( (input=='l' || input==KEY_RIGHT) )
direction=RIGHT;
if( input=='q')
sigint_handler(0);
if(input=='e'){
for(int b=0;b<6;++b){
colors[b]=0;
}
pse_msg=0;
}
if(input!=ERR){
if(preinput==input){//if it wasn't there, hitting two keys in less than 0.1 sec would not work
usleep(100000);
flushinp();
}
}
if( !((direction==UP||direction==DOWN)&&!halfspeed) && !immunity && !flight && !notrail)
board[py][px]=TRAIL;
if(direction==UP && halfspeed){
--py;
if(py==-1)
py=len-1;
halfspeed=1;
}
else if(direction==DOWN && halfspeed){
++py;
if(py==len)
py=0;
}
else if(direction==LEFT){
--px;
if(px==-1)
px=wid-1;
}
else if(direction==RIGHT){
++px;
if(px==wid)
px=0;
}
++score;
if(!(score%100))
put_stuff(board,5);
if(immunity)
--immunity;
else if(flight)
--flight;
else if(notrail)
--notrail;
}
nocbreak();
cbreak();
draw(board);
refresh();
mvprintw(len+5,0,"Game over! Press a key to see the high scores:");
getch();
showscores(scorewrite());
printw("Game over! Wanna play again?(y/n)");
curs_set(1);
input=getch();
if( input!= 'N' && input!= 'n' && input!='q')
goto Start;
endwin();
return EXIT_SUCCESS;
}