T.R | Title | User | Personal Name | Date | Lines |
---|
4052.1 | | CRUISE::NDC | Putiput Scottish Folds DTN:297-2313 | Fri Oct 05 1990 15:11 | 117 |
| $!
$!
$!
$! Best not to read this message- just extract/nohead it as PUTIPUT.COM,
$! and @PUTIPUT...
$!
$!
$!
$! Have fun!
$!
$!
$!
$!
$!
$!
$!
$!
$!
$!
$!
$!
$!
$!
$!
$ on control_y then goto the_end
$!
$ ws = "write sys$output"
$!
$ ws "[?25l[2J[5;1H" ! Invisable cursor, clear screen, set active position
$
$ ws " (0lqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqk"
$ ws " x x"
$ ws " x lqqqqqqqqqqqqqqqqqqqqqqqqqk x"
$ ws " x x x x"
$ ws " x x x x"
$ ws " x x x x"
$ ws " x x x x"
$ ws " x x x x"
$ ws " x x x x"
$ ws " x mqqqqqqqqqqqqqqqqqqqqqqqqqj x"
$ ws " x O O O x"
$ ws " mqqwqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqwqqj"
$ ws " mqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqj"
$
$ ws "[?4h[9;14r[8;1H" ! Smooth scroll,scrolling region, position cursor
$
$ ws " x x x x"
$ ws " x x NEED A CAT TO KEEP x x"
$ ws " x x YOU COMPANY? PERHAPS x x"
$ ws " x x YOUR HOUSE IS TOO x x"
$ ws " x x CLEAN AND TIDY? x x"
$ ws " x x x x"
$ wait 00:00:05
$ ws " x x x x"
$ ws " x x x x"
$ ws " x x THE ANSWER TO YOUR x x"
$ ws " x x PROBLEM IS JUST A x x"
$ ws " x x PHONE CALL AWAY. x x"
$ ws " x x x x"
$ wait 00:00:05
$ ws " x x CALL NANCY DC x x"
$ ws " x x DTN 297-2313. x x"
$ ws " x x x x"
$ ws " x x PUTIPUT SCOTTISH x x"
$ ws " x x FOLDS x x"
$ ws " x x x x"
$WAIT 00:00:05
$ ws " x x x x"
$ ws " x x OUR CATS ARE HAPPY, x x"
$ ws " x x WELL ADJUSTED, AND x x"
$ ws " x x HAVE SWEET LITTLE x x"
$ ws " x x FACES. x x"
$ ws " x x x x"
$WAIT 00:00:04
$ ws " x x x x"
$ ws " x x x x"
$ ws " x x THEY'RE SMART, AND x x"
$ ws " x x ARE USED TO BEING x x"
$ ws " x x WITH OTHER CATS. x x"
$ ws " x x x x"
$wait 00:00:03
$ ws " x x x x"
$ ws " x x LOTS OF OTHER CATS! x x"
$ ws " x x x x"
$ ws " x x YOU'LL ENJOY KNOWING x x"
$ ws " x x YOUR FOLD IS PUREBRED,x x"
$ ws " x x AND RATHER UNIQUE. x x"
$wait 00:00:05
$ ws " x x x x"
$ ws " x x ENTER IT IN A CAT x x"
$ ws " x x SHOW, AND GET A x x"
$ ws " x x FELINER BADGE WITH x x"
$ ws " x x EVERY PURCHASE! x x"
$ ws " x x x x"
$wait 00:00:05
$ ws " x x SO, CALL NANCY TODAY. x x"
$ ws " x x THAT NUMBER AGAIN: x x"
$ ws " x x x x"
$ ws " x x DTN: 297-2313 x x"
$ ws " x x HOME: 617-849-9771 x x"
$ ws " x x x x"
$wait 00:00:05
$ ws " x x x x"
$ ws " x x x x"
$ ws " x x x x"
$ ws " x x A PUTIPUT PRODUCTION x x"
$ ws " x x x x"
$ ws " x x (COPYRIGHT 1990) :-) x x"
$ WAIT 00:00:05
$ ws " x x x x[20;1H"
$
$ ws "(B[1;24r[?4l[20;1H[?25h" ! Reset
$ exit ! Logout?
$ the_end:
$ ws"(B[?4l[1;24r[?25h[2J" ! Reset and clear screen
$ exit ! Logout?
|
4052.2 | | WILLEE::MERRITT | | Fri Oct 05 1990 15:52 | 4 |
| Clever..clever...clever. No wonder you keep him around! Only
kidding Jack! It was real cute.....
Sandy
|
4052.3 | technical curio | NAVIER::BRODEUR | | Fri Oct 05 1990 23:16 | 5 |
| Being of the engineering mind now I'd like to make up my own.
What kind of command language are we talking here?
Can I do it for DECwindows?
This could be fun when I get tired of counting cats.
|
4052.4 | clarification here... | ICS::CUNNIFF | | Mon Oct 08 1990 08:58 | 13 |
| Re .3 -
actually, if you read reply .1, you can see that all the text is right
there, you just have to change the "screens" if you want.
And, since you have to @ it to run it, you can infer it's a DCL
program.
Lastly, my wife (in this instance :-) gives me too much credit.
I found the program, and just tweeked it for her/us. Original author
is (I believe) Andre Peters @ JGO.
jack
|
4052.5 | | WR2FOR::CORDESBRO_JO | set home/cat_max=infinity | Mon Oct 08 1990 17:08 | 5 |
| Okay, I had tried this twice and it doesn't work for me. I must
be doing something wrong. Can you give some detailed directions
please?
Jo
|
4052.7 | | JUPITR::KAGNO | | Mon Oct 08 1990 17:23 | 22 |
| Jo,
Go to reply .1 and at the notes prompt, type:
EXTRACT/NOHEAD FILENAME.COM
|
|
Whatever you choose to name the file.
Exit out of notes.
At the $ sign, type DIR [return] and the file should reside in your
user directory.
Now simply type @FILENAME [return] and the program should begin
running.
---------------------------------------------------------------------
I think a lot of folks mistakenly extract the note into a text file
when it should be a COM file.
|
4052.8 | | CRUISE::NDC | Putiput Scottish Folds DTN:297-2313 | Tue Oct 09 1990 08:44 | 4 |
| You don't have to exit notes either. Just issue the command: spawn
and you'll get a regular prompt. @filename and when you're ready to
go back to notes just logout of your spawned session.
Nancy
|
4052.9 | :-) | XNOGOV::LISA | There must be a pony | Tue Oct 09 1990 10:46 | 4 |
| Lets keep this simple, I don't know VMS, I'm an ULTRIX user!
Lisa.
|
4052.10 | There is no hope for me | WR2FOR::CORDESBRO_JO | set home/cat_max=infinity | Tue Oct 09 1990 17:11 | 18 |
| Okay,
When I did this the other day, after I did the extract/nohead and
named the file Putiput.com, a prompt came up that said Notes, but
it was highlighted and flashing for an entry. I just hit a return,
and got a message that the file had been created. When I exited
out of notes to the $, I checked the dir and couldn't find the file.
I tried the @putiput and it said "file not found".
Just now, when I tried the whole thing again, it gave me a message
that ;2 had been created. Again I exited out to the $ and typed
dir. Again I couldn't find the file, but my file count showed another
file had been added. So, I typed @putiput again and again I got
the "file not found" message.
So, I guess I am just in the Bermuda triangle today. :^)
Jo
|
4052.11 | Perhaps the following happened? | JUPITR::KAGNO | | Tue Oct 09 1990 17:28 | 18 |
| Jo, were you working within a subdirectory when accessing notes. For
example:
When I had an All-in-One account in my VAX account I could access notes
from either A1 or VAX. If I accessed notes from A1 and extracted a
note into a file, the file would be created in my A1 sub-directory in
VAX. Understand? If I didn't specify at the notes prompt to extract
the file into [RKAGNO], my user directory, it would put it in
[RKAGNO.OA], my A1 sub-directory. I would then have to (at the dollar
sign) SET DEFAULT [.OA] in order to access the file.
Is this clear? If you accessed notes from a subdirectory of your user
directory and extracted .1, the file probably resides in your
sub-directory.
--Roberta (who can never explain anything in simple terms).
|
4052.12 | | JUPITR::KAGNO | | Tue Oct 09 1990 17:33 | 14 |
| Okay, Jo, I think I know what happened.
Try doing it this way.
Go to reply .1. Make it current on your screen. Then type this entire
command string:
EXTRACT/NOHEAD PUTIPUT.COM
And press return.
You should then get a message that the file has been created without
getting the flashing notes prompt, and proceed as usual.
|
4052.13 | | JUPITR::KAGNO | | Tue Oct 09 1990 17:45 | 11 |
| I meant to add that the file is going to reside wherever your default
is currently at. What I was trying to clumsily say in my last few
notes is that you must specify where you want the file to reside:
EXTRACT/NOHEAD [CORDESBRO_JO]PUTIPUT.COM
The flashing notes prompt was simply asking you which note(s) you wish
to extract into the file. If you do not specify, it takes the
current note and writes it into the file [I haven't actually tested
this; it is merely an assumption :^) ]
|
4052.14 | call software support, I say... | TYGON::WILDE | illegal possession of a GNU | Tue Oct 09 1990 18:41 | 17 |
| if using all-in-1, your default directory is not your top level directory,
but a subdirectory. To find the file, exit ALL-IN-1, and enter:
$ dir [...]filename.ext {the name you gave the file}
then execute the file by entering,
$ @[.subdirectory]filename.ext {whereever it is/whatever you called it}
you may also not have the correct type of terminal -- in that case, if you
find the file and execute it, you will get strange and wonderful garbage on
your screen -- means you cannot use the features (usually graphics) that are
used in the command file.
D
|
4052.15 | was beginning to think it was me | WR2FOR::CORDESBRO_JO | set home/cat_max=infinity | Tue Oct 09 1990 19:49 | 4 |
| Thanks for all your help. I did what Roberta suggested and it worked!
I feel much better now that I was able to do it. :^)
Jo
|
4052.16 | | JUPITR::KAGNO | | Tue Oct 09 1990 20:59 | 5 |
| re:.14
I recall stating that A1 is a subdirectory and that Jo would have to
call up that subdirectory in order to access the file.
|
4052.17 | didn't see the answer before answering | TYGON::WILDE | illegal possession of a GNU | Tue Oct 09 1990 21:38 | 7 |
| >> I recall stating that A1 is a subdirectory and that Jo would have to
>> call up that subdirectory in order to access the file.
sorry, but I simply popped back into the conference, got Jo's question as
the first NEXT UNSEEN and answered it...I didn't read on to find the other
answers. Had the system been responding better, I would have known you had
it well in hand...I would have read all replies before replying myself.
|
4052.18 | Glad it worked for you | JUPITR::KAGNO | | Wed Oct 10 1990 09:35 | 6 |
| No problem, D.!!
Jo -- which instructions did you follow that worked? The sub-directory
ones or the one which simply said to make the note current and extract
it from there with one entire command string?
|
4052.19 | | WR2FOR::CORDESBRO_JO | set home/cat_max=infinity | Wed Oct 10 1990 13:02 | 3 |
| I used the one entire command string.
Jo
|