Cistercian numerals: Difference between revisions
m
→{{header|FutureBasic}}: minor code improvement
m (→{{header|FutureBasic}}: fix screenshot filename) |
m (→{{header|FutureBasic}}: minor code improvement) |
||
Line 2,080:
end fn
void local fn PathDraw0( path as BezierPathRef, x as CGFloat, y as CGFloat )
BezierPathLineToPoint( path, fn CGPointMake( x, y + _numHeight ) )
end fn
void local fn PathDraw1( path as BezierPathRef, x as CGFloat, y as CGFloat )
Line 2,149 ⟶ 2,154:
for i = 0 to 3
BezierPathRef path = fn BezierPathWithRect( fn ViewBounds(_numView) )
▲ BezierPathLineToPoint( path, fn CGPointMake( x, y + _numHeight ) )
long num = intval( mid( numString, i, 1 ) )
Line 2,156 ⟶ 2,160:
fn PathDrawNum( path, num, x, y )
select ( i )
case 0 : xScale = -1.0 : yScale = -1.0 // 1000
case 1 : yScale = -1.0 // 100
case 2 : xScale = -1.0 // 10
end select▼
▲ end select
▲ if ( xScale < 0.0 || yScale < 0.0 )
CGRect bounds = fn BezierPathBounds( path )
AffineTransformRef tx = fn AffineTransformInit
|