diff --git a/cpdfdrawcontrol.ml b/cpdfdrawcontrol.ml
index a9812c0..fb9bed0 100644
--- a/cpdfdrawcontrol.ml
+++ b/cpdfdrawcontrol.ml
@@ -254,3 +254,24 @@ let addopacity f =
 
 let addsopacity f =
   addop (Cpdfdraw.SOpacity f)
+
+let addleading f =
+  addop (Cpdfdraw.Leading f)
+
+let addcharspace f =
+  addop (Cpdfdraw.CharSpace f)
+
+let addwordspace f =
+  addop (Cpdfdraw.WordSpace f)
+
+let addtextscale f = 
+  addop (Cpdfdraw.TextScale f)
+
+let addrendermode i =
+  addop (Cpdfdraw.RenderMode i)
+
+let addrise f =
+  addop (Cpdfdraw.Rise f)
+
+let addnewline () = 
+  addop Cpdfdraw.Newline
diff --git a/cpdfdrawcontrol.mli b/cpdfdrawcontrol.mli
index 35ce8b0..3ddcf30 100644
--- a/cpdfdrawcontrol.mli
+++ b/cpdfdrawcontrol.mli
@@ -43,3 +43,10 @@ val addsopacity : float -> unit
 val addbt : unit -> unit
 val addet : unit -> unit
 val addnewpage : unit -> unit
+val addleading : float -> unit
+val addcharspace : float -> unit
+val addwordspace : float -> unit
+val addtextscale : float -> unit
+val addrendermode : int -> unit
+val addrise : float -> unit
+val addnewline : unit -> unit