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 - download
Index: ┃ T o

⟦b766fb6b0⟧ TextFile

    Length: 1089 (0x441)
    Types: TextFile
    Names: »output1.c«

Derivation

└─⟦87ddcff64⟧ Bits:30001253 CPHDIST85 Tape, 1985 Autumn Conference Copenhagen
    └─ ⟦this⟧ »cph85dist/wirewrap/output1.c« 

TextFile

#include "wirewrap.h"
output1()
{
char currentsig[12],outline[80], sig[12], wrap, newstring[80];
int count, i;

currentsig[0] = 0;
count = 0;
outline[0] = 0;
while(count < nextfree)
  {
  for(i=0;i<12;i++)sig[i] = pinarray[count].signalname->signalname[i];
  if(namecmp(sig,currentsig))
    {
    insertname(sig,outline,1);
    if((pinarray[count].signalname->special) != 0)
      insertx("Special",outline,2+NAMELENGTH);
    mywrite(outline);
    outline[0]=0;
    for(i=0;i<12;i++)currentsig[i]=sig[i];
    wrap='T';
    }
  if(wrap == 'T')wrap='B'; else wrap='T';
  newstring[0]=0;
  insertname(pinarray[count].mychip->name,outline,10);
  sprintf(newstring,"%d",pinarray[count].pinnum);
  insertx(newstring,outline,12+NAMELENGTH);
  insertname(pinarray[count].mychip->position,outline,17+NAMELENGTH);
  sprintf(newstring,"(%d,%d)",pinarray[count].row, pinarray[count].col);
  insertx(newstring,outline,30+NAMELENGTH);
  if(namecmp(sig,NULLSIGNAL) && (!pinarray[count].signalname->special))
    insertx(wrap,outline,39+NAMELENGTH);
  mywrite(outline);
  outline[0] = 0;
  count++;
  }
}