OpenOffice.org Forum at OOoForum.orgThe OpenOffice.org Forum
 
 [Home]   [FAQ]   [Search]   [Memberlist]   [Usergroups]   [Register
 [Profile]   [Log in to check your private messages]   [Log in

screenplay macro
Goto page Previous  1, 2, 3, 4, 5, 6, 7, 8  Next
 
Post new topic   Reply to topic    OOoForum.org Forum Index -> OpenOffice.org Writer
View previous topic :: View next topic  
Author Message
spindoctor
General User
General User


Joined: 20 May 2003
Posts: 17

PostPosted: Tue May 27, 2003 3:53 am    Post subject: screenplay font Reply with quote

There's also the rather farty screenplay matter of fonts. Windows' very own Courier New is generally considered too light, and these are better: http://www.neosoft.com/~bmiller/courier.htm. They're free. The other thing to remember is that they're not proportional; each letter takes up the same space. There are industry reasons for this which needn't bother techies Very Happy but these are the fonts that should be in any template.

Oh, and in Europe we use A4, not Letter. Smile
Back to top
View user's profile Send private message
spindoctor
General User
General User


Joined: 20 May 2003
Posts: 17

PostPosted: Tue May 27, 2003 10:55 am    Post subject: styles to keystrokes macro Reply with quote

It's probably me, as I know nearly nothing about macro language, but having set up the template and macros as per instructions, when I invoke the macro I get a syntax error on the first 'dim' command. It seems to be expecting a comma after

Code:
 dim document   as object


I've checked out the syntax to this command and there are some apparently optional controls you can add, but in the absence of these, I don't understand why it wants the comma.

Any wiser and more macro-literate type have any ideas?

(I'm using OpenOffice.1.0.2 on Windows XP, if that makes any difference)
Back to top
View user's profile Send private message
Apostata
General User
General User


Joined: 12 May 2003
Posts: 11
Location: Toronto

PostPosted: Tue May 27, 2003 11:50 am    Post subject: Reply with quote

For sake of argument, regarding font, I've also been asked to use Bookman (or Bookman Old Style) for some script work. Thought I'd mention that, fyi.

I'm really quite blown-away by the interest so far in this...it's very encouraging. Keep up the great work.
Back to top
View user's profile Send private message
tom ash
Guest





PostPosted: Wed May 28, 2003 4:01 am    Post subject: Reply with quote

This macro works with template from Geoff Doty:

Code:
sub slugline
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Template"
args2(0).Value = "Slugline"
args2(1).Name = "Family"
args2(1).Value = 2

dispatcher.executeDispatch(document, ".uno:StyleApply", "", 0, args2())


end sub


sub action
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Template"
args2(0).Value = "Action"
args2(1).Name = "Family"
args2(1).Value = 2

dispatcher.executeDispatch(document, ".uno:StyleApply", "", 0, args2())


end sub


sub character
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Template"
args2(0).Value = "Character"
args2(1).Name = "Family"
args2(1).Value = 2

dispatcher.executeDispatch(document, ".uno:StyleApply", "", 0, args2())


end sub


sub dialog
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Template"
args2(0).Value = "Dialog"
args2(1).Name = "Family"
args2(1).Value = 2

dispatcher.executeDispatch(document, ".uno:StyleApply", "", 0, args2())


end sub


sub fadein
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Template"
args2(0).Value = "FADE IN"
args2(1).Name = "Family"
args2(1).Value = 2

dispatcher.executeDispatch(document, ".uno:StyleApply", "", 0, args2())


end sub


sub fadeout
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Template"
args2(0).Value = "FADE OUT"
args2(1).Name = "Family"
args2(1).Value = 2

dispatcher.executeDispatch(document, ".uno:StyleApply", "", 0, args2())


end sub


sub actordirection
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Template"
args2(0).Value = "Actor Direction"
args2(1).Name = "Family"
args2(1).Value = 2

dispatcher.executeDispatch(document, ".uno:StyleApply", "", 0, args2())


end sub


sub camera
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Template"
args2(0).Value = "Camera"
args2(1).Name = "Family"
args2(1).Value = 2

dispatcher.executeDispatch(document, ".uno:StyleApply", "", 0, args2())


end sub


sub parentheses
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Template"
args2(0).Value = "Parentheses"
args2(1).Name = "Family"
args2(1).Value = 2

dispatcher.executeDispatch(document, ".uno:StyleApply", "", 0, args2())

rem ----------------------------------------------------------------------
dim args3(0) as new com.sun.star.beans.PropertyValue
args3(0).Name = "Text"
args3(0).Value = "()"

dispatcher.executeDispatch(document, ".uno:InsertText", "", 0, args3())

rem ----------------------------------------------------------------------
dim args4(1) as new com.sun.star.beans.PropertyValue
args4(0).Name = "Count"
args4(0).Value = 1
args4(1).Name = "Select"
args4(1).Value = false

dispatcher.executeDispatch(document, ".uno:GoLeft", "", 0, args4())


end sub


sub transition
rem ----------------------------------------------------------------------
rem define variables
dim document   as object
dim dispatcher as object
rem ----------------------------------------------------------------------
rem get access to the document
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

rem ----------------------------------------------------------------------
dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

rem ----------------------------------------------------------------------
dim args2(1) as new com.sun.star.beans.PropertyValue
args2(0).Name = "Template"
args2(0).Value = "Transition"
args2(1).Name = "Family"
args2(1).Value = 2

dispatcher.executeDispatch(document, ".uno:StyleApply", "", 0, args2())


end sub


Simply paste it in Macro editor, assign keys and it's ready to work!
Here you can download template (from Geoff Doty) already with added macros:

http://utenti.lycos.it/forumnp/forum/OOScript.stw

Perhaps it should be posted also on: http://www.geocities.com/n2geoff/OO/oo.html
Back to top
negative9
General User
General User


Joined: 22 May 2003
Posts: 15

PostPosted: Wed May 28, 2003 12:08 pm    Post subject: I went away for a few days, and WOW...see what happens Reply with quote

First things first, I had updated the "PROJECT SITE":

http://www.geocities.com/n2geoff/OO/oo.html

Now includes a download with Tom Ash's Macros(from dfrech's example?), for lack of better versioning name, I had called it ME for "Macro Edition".

An updated readme file is included.

Next, dfrench had stated
Quote:
You will need OO.o1.1beta or later for the macro recorder.


Does that go both ways for using Macro enable pages?

The original page templates I had done were on OOo 1.0.3.1. / Windows XP

My question is more like this, should all those that wish to USE, TEST, and ADD to the project be using the same version of OpenOffice?

spindoctor stated he uses
Quote:
...OpenOffice.1.0.2 on Windows XP


I hope to play with the template at greater lengh this coming weekend, but until then, MY THANKS goes out to all those in this THREAD that had provided thier HELP, INSIGHT, and ENCOURAGEMENT to keep this project going. Excellent work all, keep the ideas flowing.

//negative9//
Back to top
View user's profile Send private message
teleflux
Guest





PostPosted: Fri Jun 06, 2003 1:29 pm    Post subject: You guys are great! Reply with quote

I've been looking for a native linux screenplay formatter for some time and your macro is the best thing I've found... I do have a question though... is there a way to assign hotkeys to the different styles?
Back to top
tom ash
Guest





PostPosted: Sat Jun 07, 2003 12:19 am    Post subject: Reply with quote

Download file:
http://www.geocities.com/n2geoff/OO/ooScript11ME.zip

Unpack and run OOScript11ME.stw

open Tools -> Macros -> Macro

In Macro from window select: Untitled1 -> Standard -> Module1

Then You see in Existing macros in: Module1 macros responsible for different formating types.
Highlight macros You want and select Assign

In Category window select (if is not selected allready) Untitled1 BASIC macros-> Standard -> Module1. In Function window You can select formating macros, then in Shortcut keys window highlight key You want (or keys combination) and click modify button.

And ready!
tom ash
Back to top
teleflux
Guest





PostPosted: Sat Jun 07, 2003 8:42 am    Post subject: Reply with quote

thanks a lot
Back to top
spindoctor
General User
General User


Joined: 20 May 2003
Posts: 17

PostPosted: Sun Jun 08, 2003 6:08 am    Post subject: syntax errors abound Reply with quote

On each of the three macros that have been posted I'm getting a syntax error as soon as I try to run them, on what seems to be the first line of code. My programming experience is strictly limited to mid-80s BASIC so I don't really have any idea what's going on. Any thoughts, anyone?

(I'm using OOo 1.0.2 on XP, by the way)

All help much appreciated.
Back to top
View user's profile Send private message
teleflux
Guest





PostPosted: Sun Jun 08, 2003 12:14 pm    Post subject: yeah Reply with quote

I tried the thing with the keyboard and whenever I try to use it I get a BASIC run time error on the line:

dispatcher.executeDispatch(document, ".uno:InsertPara", "", 0, Array())

of course I really have no clue as to how to fix this myself... any ideas?
Back to top
negative9
General User
General User


Joined: 22 May 2003
Posts: 15

PostPosted: Tue Jun 10, 2003 1:10 pm    Post subject: ! - Update - ! Reply with quote

Updated the "Project Site"

http://www.geocities.com/n2geoff/OO/oo.html

New version of the template is there/here:

http://www.geocities.com/n2geoff/OO/oo.html/ooScript15ME.zip

- Cleaned up the code, and added a couple of new styles/macros (ByLine, and Note )

I believe that to use the macros in this edition you need the latest release of OpenOffice (1.1 Beta 2)

I'm having a problems with assigning shortcut keys. If you set up the template and use the Styles window to switch between styles, they apply on that line (how it is suppost to work), but if you assign a shortcut key to one of those styles it drops a line (sometimes 2) then applies the style there! Anybody know how to resolve this???

Playing to deeply with the macros caused a string of crashes on my machine, so I couldn't get that deep into it. Thankfully all of which were recoverable.

I had made a toolbar for the ScreenPlay Template, but the same thing as above happens so I removed it. I would like to include the toolbar with new graphics in a future release.

Off hand anybody know how to add new graphics to the tool bars? Or point me in the right direction.

Thus far I have written about 25 pages of a screenplay with this template, and have found no other problems than those mentioned above.

enjoy

//negative9//
Back to top
View user's profile Send private message
spindoctor
General User
General User


Joined: 20 May 2003
Posts: 17

PostPosted: Wed Jun 11, 2003 12:39 am    Post subject: non working macros Reply with quote

Quote:
I believe that to use the macros in this edition you need the latest release of OpenOffice (1.1 Beta 2)


Ah, that'll be it then. I'm loathe to do a massive download till it's out of beta.
Back to top
View user's profile Send private message
Guest






PostPosted: Fri Jun 20, 2003 2:52 am    Post subject: Reply with quote

My brother Tomas has a screenstyler for MS Word on
http://www.screen2screen.com

Maybe there is something you guys can use from there?
Back to top
Guest






PostPosted: Tue Jun 24, 2003 11:09 pm    Post subject: Reply with quote

Hats off to everyone contributing to this worthy project. As a filmmaker and supporter of Open Software I would like to see this project grow and become first choice for screenwriters. Keep up the good work, looking foward to the next release.
Back to top
draude
Administrator
Administrator


Joined: 10 Dec 2002
Posts: 371
Location: San Francisco

PostPosted: Tue Jun 24, 2003 11:57 pm    Post subject: cool Reply with quote

This is really good stuff. Changing to sticky thread. Now to write that screenplay... Very Happy
Back to top
View user's profile Send private message Visit poster's website
Display posts from previous:   
Post new topic   Reply to topic    OOoForum.org Forum Index -> OpenOffice.org Writer All times are GMT - 8 Hours
Goto page Previous  1, 2, 3, 4, 5, 6, 7, 8  Next
Page 2 of 8

 
Jump to:  
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum


Powered by phpBB © 2001, 2005 phpBB Group