by J ATT (2 Submissions)
Category: Graphics
Compatability: VB Script
Difficulty: Intermediate
Date Added: Wed 3rd February 2021
Rating: 
(6 Votes)
This is a 3d object viewer (object files included) that renders at relatively high speed for pure vb. The viewer is well made but the class is a well commented masterpiece. It can rotate, move, and scale the objects, order their polygons with quicksort (Z Ordering), and render in points, wireframe, or solid stlyes. It also implements basic lighting effects and backface removal. Comments are appreciated.
API DeclarationsPrivate Declare Function CreatePen Lib "gdi32" (ByVal nPenStyle As Long, _
ByVal nWidth As Long, _
ByVal crColor As Long) As Long
Private Declare Function CreateSolidBrush Lib "gdi32" (ByVal crColor As Long) As Long
Private Declare Function SelectObject Lib "gdi32" (ByVal hdc As Long, _
ByVal hObject As Long) As Long
Private Declare Function DeleteObject Lib "gdi32" (ByVal hObject As Long) As Long
Private Declare Function Polygon Lib "gdi32" (ByVal hdc As Long, _
lpPoint As POINTAPI, _
ByVal nCount As Long) As Long
Download Perspective 3D object Viewer (small bug fix) (33 KB)
VBcoders