Revcloud/Hatch Macro

Below is a button macro I've used for years...

^C^C-LA;N;CLOUD;S;CLOUD;C;1;CLOUD;;Revcloud

Create a new layer called: CLOUD
Set it to: Current
Set it's color to: RED
Run: REVCLOUD command

I also have a button that will
^C^C_hatch ansi131;2;0

There was a time when I used both of these macros in one button and all was
fine with the world. Then we changed to ACAD 2004 and things went whicky
with the macro combo.

I've tried using several variations to initiate the hatch command at the
end; from just a space between Revcloud and _hatch to ^C^C and everything
else I can think of. I even created a small lisp routine for the hatch and
just called the lisp routine at the end. Nothin'

What I end up with is one of three things.

1) The layer gets created/set current/Color set and then the macro hangs
waiting for an enter at
[?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/Unlock/stAt
e]:

2) The layer gets created/set current/Color set and the Revcloud command is
executed only to be canceled out by the _hatch command.

3) The hatch command is the first command executed.

Any insight to this little problem would be appreciated. This is a daily use
command that I miss somethin' fierce.

J. Logan

 

Observations:
I tried the -LA;N;...... macro works OK in R2004. Does the layers and then calls up revcloud. (little .lsp I made to simulate).
1. The 'echo' on your screen:
[?/Make/Set/New/ON/OFF/Color/Ltype/LWeight/Plot/Freeze/Thaw/LOck/Unlock/s tAt
e]:
...... is merely a screen echo, that the macro answers with a ":" - and all is well.

2. Once the 'revcloud' (a lisp program) is running, AND you
pick the Hatch macro (menu pick / button pick), the Macro has ^c^c - which is equivalent to (cancel)(cancel)..which interrupts the revcloud routine.
In other words, you cannot call the ^c^c_Hatch... macro while the revcloud is running..

Bob

 

I figured that much out through testing. I've also tried any number of other
variations

(^C^C-L;N; ... Revcloud _hatch...)
or
(^C^C-L;N; ... Revcloud \_hatch...)
or
(^C^C-L;N; ... Revcloud \C^C^_hatch...)
or
(^C^C-L;N; ... Revcloud;;_hatch...)

And variations on these I can't seem to get around why it would work in 2000
but not in 2004?

J. Logan

 

Are you using the R2000 version of revcloud ? on R2004 ?
I think there was a problem with that, search this News Group for 'revcloud' and see what pops up.

Bob

 

I already addressed that too. I might have to revisit that to make sure.

J. Logan

'revcloud' and see what pops up.

 

Try this macro:
^C^C-LA;N;CLOUD;S;CLOUD;C;1;CLOUD;;(C:Revcloud)(command "_hatch")

Bob

 

Or more fully qualified Hatch..

C^C-LA;N;CLOUD;S;CLOUD;C;1;CLOUD;;(C:Revcloud)(command "_hatch" "ansi131" "2" "0")

Bob

 

That works Bob,

Thanks. The hatch is ansi31 (not 131) which was my fault for posting it
wrong in the first place.

Thanks again

J. Logan

 

You are very welcome.
I thought 131 was wrong, but didn't check.


Bob