HP3000-L Archives

November 2009, Week 3

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"Johnson, Tracy" <[log in to unmask]>
Reply To:
Johnson, Tracy
Date:
Tue, 17 Nov 2009 20:25:04 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (115 lines)
Unfortunately, no one does Chinese ASCII Art holidays.

(They'd probably be double-byte anyway.)

-----Original Message-----
From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On
Behalf Of Tracy Pierce
Sent: Tuesday, November 17, 2009 7:15 PM
To: [log in to unmask]
Subject: Re: [HP3000-L] OT:Turkey ASCII art

http://www.ascii-art.de/ascii/t/turkey.txt same turkey with author
credit.


YODA:MANAGER.SYS,PUB:help seasonal
USER DEFINED COMMAND FILE:  SEASONAL.PUB.SYS

COMMENT SEASONAL posts cutesy holiday messages for
comment Thanksgiving, Christmas, St Patty's,
comment moved from SYSUDC to command file on 031802 KTP
  IF !HPMONTH=11
    IF ( !HPDAY=2 AND !HPDATE>=19 AND !HPDATE<=25 ) OR ( !HPDAY=3 AND
!HPDATE>=20 AND !HPDATE<=26 ) OR ( !HPDAY=4 AND !HPDATE>=21 AND
!HPDATE<=27 ) OR ( !HPD
AY=5 AND !HPDATE>=22 AND !HPDATE<=28 )
      CONTINUE
      PRINT TURKEY.PUB.SYS;PAGE=0
      PAUSE 3
    ENDIF
  ENDIF
  CONTINUE
  IF !HPMONTH=12 AND !HPDATE>=20 AND !HPDATE<26
     CONTINUE
     PRINT XMASTREE.PUB.SYS;PAGE=0
     PAUSE 3
  ENDIF
  CONTINUE
  IF !HPMONTH=3 AND !HPDATE >=14 AND !HPDATE<=17
     if !hpdate=17
        continue
        print stpat.pub.sys;page=0
     else
     CONTINUE
     PRINT CLOVER.PUB.SYS;PAGE=0
     PAUSE 3
     endif
  ENDIF
  IF !HPMONTH=2 AND !HPDATE >=12 AND !HPDATE <=14
     CONTINUE
     PRINT HEART.PUB.SYS;PAGE=0
     PAUSE 3
  ENDIF
  IF !HPMONTH=10 AND !HPDATE >=24
     PRINT PUMPKIN.PUB.SYS;PAGE=0
     PAUSE 3
  ENDIF
YODA:MANAGER.SYS,PUB:

> -----Original Message-----
> From: HP-3000 Systems Discussion [mailto:[log in to unmask]] On
Behalf Of Keven
> Miller
> Sent: Tuesday, November 17, 2009 2:06 PM
> To: [log in to unmask]
> Subject: Re: OT:Turkey ASCII art
> 
> ----- Original Message -----
> From: "Kim Borgman" <[log in to unmask]>
> To: <[log in to unmask]>
> Sent: Tuesday, November 17, 2009 02:31 PM
> Subject: Re: [HP3000-L] OT:Turkey ASCII art
> 
> 
> now someone remind me how to pause the signon with something like a
'pause
> 6' so that the users can enjoy the turkey.  I checked the 'welcome'
command,
> and tried putting a ":pause 6" in the file....
> 
> As I recall, some vendor had a bunch of sayings, and you could
randomly
> display one of those on the screen at signon for something like 5
> seconds....
> 
> 
> [Keven]
> I was going to say similar (like the cookie program),
> you need to run a program to get random quotes.
> So you need a logon udc in place, that you could run such program.
> 
> Of course, then, it doesn't have to be a program.
> It could be a list of ECHO commands; with a PAUSE 6 following.
> 
> My thoughts also went to the quote program. You would need to be
> an HP terminal -- there is an <esc>@  which is a 1 sec delay that you
can
> put in your quote/message.
> 
> Which now comes full circle, if you logon with an HP terminal (or
emulator),
> you could put the <esc>@ in your welcome msg as well.
> (Just checked, it works).
> 
> Keven Miller
> 
> * To join/leave the list, search archives, change list settings, *
> * etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2