Autocad Lisp Program needed for scaling AND ARRAY

Looking for a lisp routine that will take a selected object and scale it to an entered input size. Then copy it as many times as will fit into a 6" x 6" box. I am using Autocad 2012. Attached screenshot for your reference. Flow would go something like this: 1. Execute the Lisp 2. Select object 3. Enter Scale factor 4. Create 6' x 6' box at origin point (0,0) 5. Rectangular array command => Default spacing 1" => Basepoint 0,0 => End point (should be opposite corner of the box) 6. Output: A 6 x 6 region is created with an array of objects that are spaced .1 " apart.