so i have this simulation,

when runs: on screen, i can see the shaded regions
but these not saved in dwg and bmp
i have shademode current= flat+edges.
 
the saving bit :
 
If savestuff then
 
ThisDrawing.SendCommand "shademode" + vbCr + "_l" +vbCr
Set allpolys = ThisDrawing.SelectionSets.add("allofit")
      allpolys.Select acSelectionSetAll
      ThisDrawing.Regen acActiveViewport
      ThisDrawing.SaveAs (pathname + Str$(counter))
      ThisDrawing.Export (pathname + Str$(counter)), "BMP",allpolys
 
End If
 
can anybody help ^_^ somehow i believe the problem is in the shademode; either in my current or this bit in saving
 ci732010-01-13 00:33:44

Just guessing on this...
 
May be similar reason that AutoCAD is not able to plot shaded objects as generated by "shade" command, you need to "render" then plot using a raster plot driver.
 
Or can get low-resolution output with "jpgout" command.

hiya thanks,
render does not let screen display ... guess have to choose either one or the other...
 
jpgout command; hmmmm