ssg

{ NE Lister }
uses XTypes,Dos,Objects;

var
  dirinfo:SearchRec;
  T:TDosStream;
  H:TEXEHeader;
  w:word;
  l:longint;
  b:byte;

ssg

{$M $4000,0,0}
{$G+}
uses xstr,crt,dos;

const

  statusx = 64;

  log : array[1..9] of string[20] =
('     GGG  GGGG','  GGGGGG  G   GGG',' GGGGGGG  G      G',

ssg

uses GDrivers,XIO,Objects,XTypes;

var
  I,O:TDosStream;
  BC:TBMPCore;
  BX:TBMPExtra;
  Quad:QuadPal;
  RGB:PalType;
  BS:TBMPSimple;
  s,d:FNameStr;

ssg

{ BMP Header Dumper }
uses Objects,XIO,XTypes;

(*
type
  TBitmapFileHeader = record
    bfType: Word;
    bfSize: Longint;
    bfReserved1: Word;
    bfReserved2: Word;

ssg

{
Name            : DAMN! 1.00a
Purpose         : Dynamic Architectured data ManagemeNt
Date            : 25th May 94
Coder           : SSG

Update Info:
------------
25th May 94 - 02:00 - Starting at start...
}

ssg

{ Module Lister 1.00 - (c) 1994 SSG }
uses Debris,Dos,Objects,XIO,XStream;

type

  TModuleHeader = record
    Name        : string[20];
    Coder       : string[20];
    Date        : string[11];
    Time        : string[5];

ssg

{
topic    = Objects in resources
problem  = Realizing object

store is easy but the most diffucult part is to load it...
How will I know the object's type I read from stream...
and how will I call the proper object's load constructor????
}

{

ssg

{
Name            : X/VOC 1.00a
Purpose         : Sound Blaster interface routines
Date            : 29th May 94
Time            : 19:18
}

unit XVoc;

interface

ssg

www.linkedin.com##:xpath(//span[contains(text(), 'Promoted') or contains(text(), 'Suggested') or contains(text(), 'Recommended for you')]/ancestor::div[@class='relative'])

ssg

#!/bin/bash
# progress bar function
prog() {
    local w=80 p=$1;  shift
    # create a string of spaces, then change them to dots
    printf -v dots "%*s" "$(( $p*$w/100 ))" ""; dots=${dots// /\#};
    # print those dots on a fixed-width space plus the percentage etc.
    printf "\r\e[K|%-*s| %3d %% %s" "$w" "$dots" "$p" "$*";
}
# test loop