DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦30d4fa868⟧ TextFile

    Length: 404 (0x194)
    Types: TextFile
    Names: »kline.c«

Derivation

└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
    └─⟦this⟧ »EUUGD18/General/Empire/kline.c«

TextFile

#include <curses.h>

/*
 * Changes jector (0->9) to ki (x offset) and line (returned) * 100
 */
kline_(ki, jector)
	int	*ki, *jector;
{
	int	ject;

	*ki = 0;
	ject = *jector;
	if ( *jector > 4) {
		*ki = 100 - (COLS - 10);
		if (*ki < 0)
			*ki = 0;
		ject = ject - 5;
	}
	ject = ject * 10;
	if (ject + LINES - 4 > 60) {
		ject = 60 - (LINES - 4);
		if (ject < 0)
			ject = 0;
	}
	return (ject * 100);
}