templeos-info/public/Wb/Demo/Graphics/RotateTank.HC

		$SP,"<1>",BI=1$











U0 RotateTank()
{
  CDC *dc=DCAlias;
  DCDepthBufAlloc(dc);
  dc->flags|=DCF_TRANSFORMATION;
  WinHorz(TEXT_COLS/2-12,TEXT_COLS/2+12);
  WinVert(TEXT_ROWS/2-12,TEXT_ROWS/2+12);
  DocClear;
  try {
    while (!ScanChar) {
      DCDepthBufRst(dc);
      Mat4x4IdentEqu(dc->r);
      Mat4x4RotY(dc->r,0.25*Sin(tS/10*2*<EFBFBD>)+<EFBFBD>/2);
      Mat4x4RotX(dc->r,0.4*Sin(tS/5*2*<EFBFBD>));
      Mat4x4RotZ(dc->r,0.25*Sin(tS/10*2*<EFBFBD>)-<EFBFBD>/2);
      Mat4x4Scale(dc->r,0.25+Saw(tS,5));
      DCMat4x4Set(dc,dc->r);//Not needed--Sets scale for pen-width

      dc->x=Fs->pix_width/2;
      dc->y=Fs->pix_height/2;
//Offsets the image Z so that no parts are clipped by
      //the conceptual plane of the scrn.
      dc->z=GR_Z_ALL;

      Sprite3(dc,0,0,0,$IB,"<1>",BI=1$);
      Refresh;
      DCFill;
    }
  } catch
    PutExcept;

  DCFill;
  DCDel(dc);
}

RotateTank;

<EFBFBD>6RF#(<EFBFBD><EFBFBD><EFBFBD><EFBFBD>#(<EFBFBD><EFBFBD><EFBFBD><EFBFBD>#<EFBFBD><EFBFBD><EFBFBD><EFBFBD>F#<EFBFBD><EFBFBD><EFBFBD><EFBFBD>d#d#<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#F2(<EFBFBD><EFBFBD><EFBFBD><EFBFBD>2(<EFBFBD><EFBFBD><EFBFBD><EFBFBD>2<EFBFBD><EFBFBD><EFBFBD><EFBFBD>2<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>2<EFBFBD><EFBFBD><EFBFBD><EFBFBD>F2<EFBFBD><EFBFBD><EFBFBD><EFBFBD>d2<EFBFBD><EFBFBD><EFBFBD><EFBFBD>d2P#<EFBFBD><EFBFBD><EFBFBD><EFBFBD>P##F<EFBFBD><EFBFBD><EFBFBD><EFBFBD>#F<EFBFBD><EFBFBD><EFBFBD><EFBFBD>#A#<EFBFBD><EFBFBD><EFBFBD><EFBFBD>F<EFBFBD><EFBFBD><EFBFBD><EFBFBD>(<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>F<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>d<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>F<EFBFBD><EFBFBD><EFBFBD><EFBFBD>(<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>F<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>d<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>d<EFBFBD><EFBFBD><EFBFBD><EFBFBD>P<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>P<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>F<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>F<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>A<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>#<EFBFBD><EFBFBD><EFBFBD><EFBFBD>d<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>22(<EFBFBD><EFBFBD><EFBFBD><EFBFBD>(<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>2<EFBFBD>2<EFBFBD>(<EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD>(




		
	






	


		
$"$#"!  !"!#"$#! !  "!"%++&%%'&&(''(()),),**,*+-$$-$'()')&3/..232.11523400/3451104-"