开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > GDI/图象编程 > 查看源码
SVGADEM1.C
资源名称：SVGACC10.zip　[点击查看]
上传用户：kammenn
上传日期：2007-06-26
资源大小：210k
文件大小：24k
源码类别：

GDI/图象编程

开发平台：

C/C++

SVGADEM1.C：源码内容
  1. /****************************************************************************
  2.  
  3.   'SVGACC' A Super Vga Graphics Library for use with Microsoft and
  4.   Borland C/C++
  5.   Copyright 1993-1994 by Stephen L. Balkum and Daniel A. Sill
  7.   GIF and 'Graphics Intechange Format' are trademarks (tm) of
  8.   Compuserve, Incorporated, an H&R Block Company.
  10. **************** UNREGISTERD SHAREWARE VERSION ***********************
  11. * FOR EVUALATION ONLY. NOT FOR RESALE IN ANY FORM. SOFTWARE WRITTEN  *
  12. * USING THIS UNREGISTERED SHAREWARE GRAPHICS LIBRARY MAY NOT BY SOLD *
  13. * OR USED FOR ANY PURPOSE OTHER THAN THE EVUALTION OF THIS LIBRARY.  *
  14. **********************************************************************
  16. **************** NO WARRANTIES AND NO LIABILITY **********************
  17. * Stephen L. Balkum and Daniel A. Sill provide no warranties, either *
  18. * expressed or implied, of merchantability, or fitness, for a        *
  19. * particular use or purpose of this SOFTWARE and documentation.      *
  20. * In no event shall Stephen L. Balkum or Daniel A. Sill be held      *
  21. * liable for any damages resulting from the use or misuse of the     * 
  22. * SOFTWARE and documentation.                                        *
  23. **********************************************************************
  25. ************** U.S. GOVERNMENT RESTRICTED RIGHTS *********************
  26. * Use, duplication, or disclosure of the SOFTWARE and documentation  *
  27. * by the U.S. Government is subject to the restictions as set forth  *
  28. * in subparagraph (c)(1)(ii) of the Rights in Technical Data and     *
  29. * Computer Software cluse at DFARS 252.227-7013.                     *
  30. * Contractor/manufacturer is Stephen L. Balkum and Daniel A. Sill,   *
  31. * P.O. Box 7704, Austin, Texas 78713-7704                            *
  32. **********************************************************************
  34. **********************************************************************
  35. * By using this SOFTWARE or documentation, you agree to the above    *
  36. * terms and conditions.                                              *
  37. **********************************************************************
  39.  ***************************************************************************/
  41. #define MODULE
  43. #include <stdio.h>
  44. #include <conio.h>
  45. #include <stdlib.h>
  46. #include <malloc.h>
  47. #include <string.h>
  48. #include <math.h>
  50. #include "svgacc.h"
  52. #include "svgademo.h"
  54. #define randnum(size) (rand() % (int)(size))
  56. /***********
  57.  * DOBLOCK *
  58.  ***********/
  60. char doblock(void)
  61. {
  62. int i, colr;
  63. int xinc, yinc, x1, y1, x2, y2;
  64. int cntx, cnty;
  65. char ret;
  66. char title[TITLEN];
  67. char buf[TITLEN];
  68. RasterBlock far *gfxblk;
  69. RasterBlock far *gfxblk2;
  70. RasterBlock far *spritebkgnd;
  72. /*
  73.  * Set up the Title
  74.  */
  75. sprintf(title,"DEMO 5: Block function and Sprites");
  76. palset(pal,0,255);
  78. /*
  79.  * Show Block Get (draw some circles and "get a chunk of them")
  80.  */
  82. fillscreen(0);
  83. setview(0,0,maxx,maxy);
  84. drwstring(1,7,0,title,10,0);
  85. sprintf(buf,"blkget(x1,y1,x2,y2,GfxBlock);");
  86. drwstring(1,7,0,buf,10,16);
  87. colr = 16;
  88. for(i=0;i<=maxx/2;i++) {
  89. drwcircle(1,colr,maxx/4+i,maxy/2,maxy/5);
  90. colr+=2;
  91. if(colr>255)
  92. colr = 16;
  93. }
  95. xinc = maxx/20;
  96. yinc = maxy/20;
  97. x1 = maxx/2-xinc;
  98. y1 = maxy/2-yinc;
  99. x2 = maxx/2+xinc;
  100. y2 = maxy/2+yinc;
  101. i = (x2-x1+1)*(y2-y1+1)+4;
  102. gfxblk = _fmalloc(i);
  103. if (!gfxblk) {
  104. restext();
  105. printf("ERROR: Allocating memory for gfxblk: %d bytesn",i);
  106. exit(1);
  107. }
  108. drwbox(1,0,x1,y1,x2,y2);
  109. blkget(x1,y1,x2,y2,gfxblk);
  111. ret = getkey();
  112. if ((ret == 's') || (ret == 'q')) {
  113. fillscreen(0);
  114. _ffree(gfxblk);
  115. return(ret);
  116. }
  118. /*
  119.  * Show Block Rotate and Sprite Stuff
  120.  */
  121. drwstring(1,7,0,title,10,0);
  122. sprintf(buf,"blkrotate(angle,backfill,GfxBlockSrc,GfxBlockDst);");
  123. drwstring(1,7,0,buf,10,16);
  124. sprintf(buf,"spritegap(transcolor,x,y,SpriteArray,BkGndArray);");
  125. drwstring(1,7,0,buf,10,32);
  126. sprintf(buf,"spriteput(transcolor,x,y,SpriteArray);");
  127. drwstring(1,7,0,buf,10,48);
  128. cntx = (x2-x1) / 2 + x1;
  129. cnty = (y2-y1) / 2 + y1;
  130. fillarea(x1+2,y1+2,0,0);
  131. i = blkrotatesize(45,gfxblk);
  132. spritebkgnd = _fmalloc(i);
  133. if (!spritebkgnd) {
  134. restext();
  135. printf("ERROR: Allocating memory for spritebkgnd: %d bytesn",i);
  136. exit(1);
  137. }
  138. gfxblk2 = _fmalloc(i);
  139. if (!gfxblk2) {
  140. restext();
  141. printf("ERROR: Allocating memory for gfxblk2: %d bytesn",i);
  142. exit(1);
  143. }
  144. blkget(x1,y1,x2,y2,spritebkgnd);
  145. setview(0,64,maxx,maxy);
  147. for(i=0;i<=360;i+=4) {
  148. blkrotate(i,1,gfxblk,gfxblk2);
  149. spriteput(SET,1,cntx-(spritebkgnd->width)/2,cnty-(spritebkgnd->height)/2,spritebkgnd);
  150. spritegap(1,cntx-(gfxblk2->width)/2,cnty-(gfxblk2->height)/2,gfxblk2,spritebkgnd);
  151. sdelay(4);
  152. }
  153. spriteput(SET,1,cntx-(spritebkgnd->width)/2,cnty-(spritebkgnd->height)/2,spritebkgnd);
  154. blkput(SET,x1,y1,gfxblk);
  156. setview(0,0,maxx,maxy);
  157. ret = getkey();
  158. if ((ret == 's') || (ret == 'q')) {
  159. fillscreen(0);
  160. palset(pal,16,255);
  161. _ffree(gfxblk);
  162. _ffree(gfxblk2);
  163. _ffree(spritebkgnd);
  164. return(ret);
  165. }
  167. /*
  168.  * Show Block Resize and Sprite Stuff
  169.  */
  170. drwstring(1,7,0,title,10,0);
  171. sprintf(buf,"blkresize(Width,Height,GfxBlockSrc,GfxBlockDst);");
  172. drwstring(1,7,0,buf,10,16);
  173. sprintf(buf,"spritegap(transcolor,x,y,SpriteArray,BkGndArray);");
  174. drwstring(1,7,0,buf,10,32);
  175. sprintf(buf,"spriteput(transcolor,x,y,SpriteArray);");
  176. drwstring(1,7,0,buf,10,48);
  177. fillarea(x1+2,y1+2,0,0);
  178. blkget(x1,y1,x2,y2,spritebkgnd);
  179. setview(0,64,maxx,maxy);
  181. i = (x2-x1+1+xinc)*(y2-y1+1+xinc)+4;
  183. spritebkgnd = _frealloc(spritebkgnd,i);
  184. if (!spritebkgnd) {
  185. restext();
  186. printf("ERROR: reallocating memory for spritebkgnd: %d bytesn",i);
  187. exit(1);
  188. }
  190. gfxblk2 = _frealloc(gfxblk2,i);
  191. if (!gfxblk2) {
  192. restext();
  193. printf("ERROR: reallocating memory for gfxblk2: %d bytesn",i);
  194. exit(1);
  195. }
  197. for(i=0;i<=xinc;i++) {
  198. blkresize((gfxblk->width)-i,(gfxblk->height)-i,gfxblk,gfxblk2);
  199. spriteput(SET,1,cntx-(spritebkgnd->width)/2,cnty-(spritebkgnd->height)/2,spritebkgnd);
  200. spritegap(1,cntx-(gfxblk2->width)/2,cnty-(gfxblk2->height)/2,gfxblk2,spritebkgnd);
  201. sdelay(3);
  202. }
  203. spriteput(SET,1,cntx-(spritebkgnd->width)/2,cnty-(spritebkgnd->height)/2,spritebkgnd);
  205. for(i=xinc;i>=0;i--) {
  206. blkresize((gfxblk->width)-i,(gfxblk->height)-i,gfxblk,gfxblk2);
  207. spriteput(SET,1,cntx-(spritebkgnd->width)/2,cnty-(spritebkgnd->height)/2,spritebkgnd);
  208. spritegap(1,cntx-(gfxblk2->width)/2,cnty-(gfxblk2->height)/2,gfxblk2,spritebkgnd);
  209. sdelay(3);
  210. }
  211. spriteput(SET,1,cntx-(spritebkgnd->width)/2,cnty-(spritebkgnd->height)/2,spritebkgnd);
  212. blkput(SET,x1,y1,gfxblk);
  214. ret = getkey();
  215. if ((ret == 's') || (ret == 'q')) {
  216. fillscreen(0);
  217. palset(pal,16,255);
  218. setview(0,0,maxx,maxy);
  219. _ffree(gfxblk);
  220. _ffree(gfxblk2);
  221. _ffree(spritebkgnd);
  222. return(ret);
  223. }
  226. /*
  227.  * Show Block Put (put the "chunks" randomly around the screen)
  228.  */
  229. setview(0,16,maxx,32);
  230. fillview(0);
  231. sprintf(buf,"blkput(mode,x,y,GfxBlock);");
  232. drwstring(1,7,0,buf,10,16);
  233. xinc = maxx/10;
  234. yinc = maxy/10;
  235. setview(0,32,maxx,maxy);
  236. for(i=0;i<=maxx/2;i++) {
  237. x1 = randnum(maxx + xinc) - xinc;
  238. y1 = randnum(maxy + yinc) - yinc;
  239. blkput(1,x1,y1,gfxblk);
  240. }
  242. _ffree(gfxblk);
  243. _ffree(gfxblk2);
  244. _ffree(spritebkgnd);
  245. setview(0,0,maxx,maxy);
  246. ret = getkey();
  247. if ((ret == 's') || (ret == 'q')) {
  248. fillscreen(0);
  249. return(ret);
  250. }
  252. return(ret);
  254. }
  258. /**********
  259.  * DOCLIP *
  260.  **********/
  262. char doclip(void)
  263. {
  264. struct dcoord {
  265. int x1;
  266. int x2;
  267. int y1;
  268. int y2;
  269. };
  271. int i, j, k;
  272. int xinc, x, y, x1, y1, x2, y2;
  273. int xsub, radx, rady;
  274. int wdth, hgth, spcingx, spcingy;
  275. struct dcoord b[4];
  276. char ret;
  277. char title[TITLEN];
  278. char buf[TITLEN];
  280. /*
  281.  * Set up the Title
  282.  */
  283. sprintf(title,"DEMO 2: Clipping capability");
  284. palset(pal,0,255);
  286. /*
  287.  * Set up the windows
  288.  */
  290. fillscreen(0);
  291. setview(0,0,maxx,maxy);
  292. drwstring(1,7,0,title,10,0);
  293. sprintf(buf,"All pimitives automatically clip");
  294. drwstring(1,7,0,buf,10,16);
  296. wdth = (maxx + 1) * 4 / 9;
  297. spcingx = ((maxx + 1) - wdth * 2) / 3;
  298. hgth = (maxy + 1 - 35) * 4 / 9;
  299. spcingy = ((maxy + 1 - 35) - hgth * 2) / 3;
  300. xinc = wdth * 3 / 2;
  301. xsub = wdth / 4;
  303. b[0].x1 = spcingx;
  304. b[0].x2 = b[0].x1 + wdth;
  305. b[0].y1 = spcingy + 35;
  306. b[0].y2 = b[0].y1 + hgth;
  308. b[1].x2 = maxx - spcingx;
  309. b[1].x1 = b[1].x2 - wdth;
  310. b[1].y1 = spcingy + 35;
  311. b[1].y2 = b[1].y1 + hgth;
  313. b[2].x2 = maxx - spcingx;
  314. b[2].x1 = b[2].x2 - wdth;
  315. b[2].y2 = maxy - spcingy;
  316. b[2].y1 = b[2].y2 - hgth;
  318. b[3].x1 = spcingx;
  319. b[3].x2 = b[3].x1 + wdth;
  320. b[3].y2 = maxy - spcingy;
  321. b[3].y1 = b[3].y2 - hgth;
  323. for(i=0;i<4;i++)
  324. drwbox(1,15,b[i].x1++,b[i].y1++,b[i].x2--,b[i].y2--);
  326. /*
  327.  * Show the clipping
  328.  */
  329. for(i=0;i<=maxx/6;i++)
  330. for(j=0;j<4;j++) {
  331. setview(b[j].x1,b[j].y1,b[j].x2,b[j].y2);
  332. switch (j) {
  333. case 0:
  334. for(k=0;k<6;k++) {
  335. x = b[j].x1 + randnum(xinc) - xsub;
  336. y = b[j].y1 + randnum(xinc) - xsub;
  337. drwpoint(1,randnum(16),x,y);
  338. }
  339. break;
  340. case 1:
  341. x1 = b[j].x1 + randnum(xinc) - xsub;
  342. y1 = b[j].y1 + randnum(xinc) - xsub;
  343. x2 = b[j].x1 + randnum(xinc) - xsub;
  344. y2 = b[j].y1 + randnum(xinc) - xsub;
  345. drwline(1,randnum(16),x1,y1,x2,y2);
  346. break;
  347. case 2:
  348. x = b[j].x1 + randnum(xinc) - xsub;
  349. y = b[j].y1 + randnum(xinc) - xsub;
  350. radx = randnum(wdth) / 2;
  351. drwcircle(1,randnum(16),x,y,radx);
  352. break;
  353. case 3:
  354. x = b[j].x1 + randnum(xinc) - xsub;
  355. y = b[j].y1 + randnum(xinc) - xsub;
  356. radx = randnum(wdth) / 2;
  357. rady = randnum(wdth) / 2;
  358. drwellipse(1,randnum(16),x,y,radx,rady);
  359. break;
  360. }
  361. }
  363. setview(0,0,maxx,maxy);
  365. ret = getkey();
  367. return(ret);
  369. }
  371. /**********
  372.  * DOFILL *
  373.  **********/
  375. char dofill(void)
  376. {
  377. struct dcoord {
  378. int x1;
  379. int x2;
  380. int y1;
  381. int y2;
  382. };
  384. int i, colr;
  385. int x, y;
  386. int radx, rady;
  387. int wdth, hgth, spcingx, spcingy;
  388. struct dcoord b[4];
  389. char ret;
  390. char title[TITLEN];
  391. char buf[TITLEN];
  393. /*
  394.  * Set up the Title
  395.  */
  396. sprintf(title,"DEMO 3: Filling functions");
  397. palset(pal,0,255);
  399. /*
  400.  * Set up the windows
  401.  */
  403. fillscreen(10);
  404. setview(0,0,maxx,maxy);
  405. drwstring(1,7,0,title,10,0);
  406. sprintf(buf,"fillscreen(color);");
  407. drwstring(1,7,0,buf,10,16);
  409. ret = getkey();
  410. if ((ret == 's') || (ret == 'q'))
  411. return(ret);
  413. /*
  414.  * Set up windows and show viewport fill
  415.  */
  416. fillscreen(0);
  417. drwstring(1,7,0,title,10,0);
  418. sprintf(buf,"fillview(color);");
  419. drwstring(1,7,0,buf,10,16);
  421. wdth = (maxx + 1) * 4 / 9;
  422. spcingx = ((maxx + 1) - wdth * 2) / 3;
  423. hgth = (maxy + 1 - 35) * 4 / 9;
  424. spcingy = ((maxy + 1 - 35) - hgth * 2) / 3;
  426. b[0].x1 = spcingx;
  427. b[0].x2 = b[0].x1 + wdth;
  428. b[0].y1 = spcingy + 35;
  429. b[0].y2 = b[0].y1 + hgth;
  431. b[1].x2 = maxx - spcingx;
  432. b[1].x1 = b[1].x2 - wdth;
  433. b[1].y1 = spcingy + 35;
  434. b[1].y2 = b[1].y1 + hgth;
  436. b[2].x2 = maxx - spcingx;
  437. b[2].x1 = b[2].x2 - wdth;
  438. b[2].y2 = maxy - spcingy;
  439. b[2].y1 = b[2].y2 - hgth;
  441. b[3].x1 = spcingx;
  442. b[3].x2 = b[3].x1 + wdth;
  443. b[3].y2 = maxy - spcingy;
  444. b[3].y1 = b[3].y2 - hgth;
  446. for(i=0;i<4;i++)
  447. drwbox(1,15,b[i].x1++,b[i].y1++,b[i].x2--,b[i].y2--);
  449. ret = getkey();
  450. if ((ret == 's') || (ret == 'q')) {
  451. setview(0,0,maxx,maxy);
  452. return(ret);
  453. }
  455. /*
  456.  * Show the clipping
  457.  */
  458. for(i=0;i<4;i++) {
  459. setview(b[i].x1,b[i].y1,b[i].x2,b[i].y2);
  460. fillview(i+10);
  461. }
  463. setview(0,0,maxx,maxy);
  464. ret = getkey();
  465. if ((ret == 's') || (ret == 'q'))
  466. return(ret);
  468. /*
  469.  * Set up windows and show area fill
  470.  */
  471. fillscreen(0);
  472. drwstring(1,7,0,title,10,0);
  473. sprintf(buf,"fillarea(xseed,yseed,bordercolor,fillcolor);");
  474. drwstring(1,7,0,buf,10,16);
  476. drwbox(1,15,5,35,maxx-4,maxy-4);
  477. setview(6,36,maxx-5,maxy-5);
  479. colr=1;
  480. for(i=0;i<=maxx/10;i++) {
  481. x = 50 + randnum(maxx-50);
  482. y = 50 + randnum(maxy-50);
  483. radx = 2 + randnum(maxx/20);
  484. rady = 2 + randnum(maxy/20);
  485. drwellipse(1,colr++,x,y,radx,rady);
  486. if (colr>10)
  487. colr = 1;
  488. }
  490. for(i=0;i<=maxx/15;i++) {
  491. x = 50 + randnum(maxx-50);
  492. y = 50 + randnum(maxy-50);
  493. radx = 2 + randnum(maxx/20);
  494. rady = 2 + randnum(maxy/20);
  495. drwellipse(1,12,x,y,radx,rady);
  496. }
  498. ret = getkey();
  499. if ((ret == 's') || (ret == 'q')) {
  500. setview(0,0,maxx,maxy);
  501. return(ret);
  502. }
  504. fillarea(7,37,12,10);
  506. setview(0,0,maxx,maxy);
  507. ret = getkey();
  508. if ((ret == 's') || (ret == 'q'))
  509. return(ret);
  511. /*    
  512.  * Setup windows and show color fill
  513.  */
  514. fillscreen(0);
  515. drwstring(1,7,0,title,10,0);
  516. sprintf(buf,"fillcolor(xseed,yseed,oldcolor,fillcolor);");
  517. drwstring(1,7,0,buf,10,16);
  519. drwbox(1,15,5,35,maxx-4,maxy-4);
  520. setview(6,36,maxx-5,maxy-5);
  522. colr=1;
  523. for(i=0;i<=maxx/10;i++) {
  524. x = 50 + randnum(maxx-50);
  525. y = 50 + randnum(maxy-50);
  526. radx = 2 + randnum(maxx/20);
  527. rady = 2 + randnum(maxy/20);
  528. drwellipse(1,colr++,x,y,radx,rady);
  529. if (colr>10)
  530. colr = 1;
  531. }
  533. for(i=0;i<=maxx/15;i++) {
  534. x = 50 + randnum(maxx-50);
  535. y = 50 + randnum(maxy-50);
  536. radx = 2 + randnum(maxx/20);
  537. rady = 2 + randnum(maxy/20);
  538. drwellipse(1,12,x,y,radx,rady);
  539. }
  541. ret = getkey();
  542. if ((ret == 's') || (ret == 'q')) {
  543. setview(0,0,maxx,maxy);
  544. return(ret);
  545. }
  547. fillcolor(7,37,0,10);
  549. setview(0,0,maxx,maxy);
  551. ret = getkey();
  553. return(ret);
  555. }
  558. /*********
  559.  * DOPAL *
  560.  *********/
  562. char dopal(void)
  563. {
  564. int x1, x2, y1, y2;
  565. int i, colr;
  566. char ret;
  567. char title[TITLEN];
  568. char buf[TITLEN];
  570. /*
  571.  * Set up the Title
  572.  */
  573. sprintf(title,"DEMO 4: Palette functions");
  574. palset(orgpal,0,255);
  576. /*
  577.  * Show palette set/get
  578.  */
  580. fillscreen(0);
  581. setview(0,0,maxx,maxy);
  582. drwstring(1,7,0,title,10,0);
  583. sprintf(buf,"palget(pal,beg,end),palset(pal,beg,end)");
  584. drwstring(1,7,0,buf,10,16);
  586. colr = 16;
  587. x1 = 10;
  588. x2 = maxx - 9;
  589. y1 = 35;
  590. y2 = maxy - 9;
  591. i = 0;
  592. while (y1+i < y2-i) {
  593. drwbox(1,colr++,x1+i,y1+i,x2-i,y2-i);
  594. if (colr>255)
  595. colr = 16;
  596. i++;
  597. }
  598. ret = getkey();
  599. if ((ret == 's') || (ret == 'q')) {
  600. fillscreen(0);
  601. setview(0,0,maxx,maxy);
  602. return(ret);
  603. }
  604. palset(pal,16,255);
  605. ret = getkey();
  606. if ((ret == 's') || (ret == 'q')) {
  607. setview(0,0,maxx,maxy);
  608. fillscreen(0);
  609. return(ret);
  610. }
  612. /*
  613.  * Show palette auto fade out/in
  614.  */
  615. setview(0,16,maxx,32);
  616. fillview(0);
  617. sprintf(buf,"palioauto(pal,beg,end,speed);");
  618. drwstring(1,7,0,buf,10,16);
  619. palioauto(pal,16,255,-2);
  620. palioauto(pal,16,255,2);
  621. ret = getkey();
  622. if ((ret == 's') || (ret == 'q')) {
  623. setview(0,0,maxx,maxy);
  624. return(ret);
  625. }
  627. /*
  628.  * Show palette auto fade to
  629.  */
  630. setview(0,16,maxx,32);
  631. fillview(0);
  632. sprintf(buf,"palchgauto(pal,newpal,beg,end,speed);");
  633. drwstring(1,7,0,buf,10,16);
  634. palchgauto(pal,pal2,16,255,2);
  635. palchgauto(pal2,pal,16,255,2);
  636. ret = getkey();
  637. if ((ret == 's') || (ret == 'q')) {
  638. setview(0,0,maxx,maxy);
  639. return(ret);
  640. }
  642. /*
  643.  * Show palette rotate
  644.  */
  645. setview(0,16,maxx,32);
  646. fillview(0);
  647. sprintf(buf,"palrotate(pal,beg,end,shift);");
  648. drwstring(1,7,0,buf,10,16);
  649. for(i=0;i<=240;i++) {
  650. palrotate(pal,16,255,2);
  651. palget(pal,16,255);
  652. }
  653. for(i=0;i<=120;i++) {
  654. palrotate(pal,16,255,-8);
  655. palget(pal,16,255);
  656. }
  657. ret = getkey();
  658. if ((ret == 's') || (ret == 'q'))
  659. setview(0,0,maxx,maxy);
  661. return(ret);
  663. }
  666. /***********
  667.  * DOPRIMS *
  668.  ***********/
  670. char doprims(void)
  671. {
  672. int x1, x2, y1, y2;
  673. int maxrad, radx, rady;
  674. int i, colr, num;
  675. char ret;
  676. char title[TITLEN];
  677. char buf[TITLEN];
  679. /*
  680.  * Set up the Title
  681.  */
  682. sprintf(title,"DEMO 1: Primitives");
  683. palset(orgpal,0,255);
  685. /*
  686.  * Draw some points
  687.  */
  689. fillscreen(0);
  690. setview(0,0,maxx,maxy);
  691. drwstring(1,7,0,title,10,0);
  692. sprintf(buf,"drwpoint(mode,color,x,y);");
  693. drwstring(1,7,0,buf,10,16);
  694. setview(0,32,maxx,maxy);
  695. colr = 1;
  696. num = maxx * 2;
  697. for(i=0;i<num;i++) {
  698. x1 = randnum(maxx);
  699. y1 = randnum(maxy);
  700. drwpoint(1,colr++,x1,y1);
  701. if (colr>15)
  702. colr = 1;
  703. }   
  704. setview(0,0,maxx,maxy);
  705. ret = getkey();
  706. if ((ret=='s') || (ret=='q'))
  707. return(ret);
  709. /*
  710.  * Draw some lines
  711.  */
  712. fillscreen(0);
  713. setview(0,0,maxx,maxy);
  714. drwstring(1,7,0,title,10,0);
  715. sprintf(buf,"drwline(mode,color,x1,y1,x2,y2);");
  716. drwstring(1,7,0,buf,10,16);
  717. setview(0,32,maxx,maxy);
  718. colr = 1;
  719. num = maxx / 6;
  720. for(i=0;i<num;i++) {
  721. x1 = randnum(maxx);
  722. y1 = randnum(maxy);
  723. x2 = randnum(maxx);
  724. y2 = randnum(maxy);
  725. drwline(1,colr++,x1,y1,x2,y2);
  726. if (colr>15)
  727. colr = 1;
  728. }   
  729. setview(0,0,maxx,maxy);
  730. ret = getkey();
  731. if ((ret=='s') || (ret=='q'))
  732. return(ret);
  734. /*
  735.  * Draw some boxes
  736.  */
  737. fillscreen(0);
  738. setview(0,0,maxx,maxy);
  739. drwstring(1,7,0,title,10,0);
  740. sprintf(buf,"drwbox(mode,color,x1,y1,x2,y2);");
  741. drwstring(1,7,0,buf,10,16);
  742. setview(0,32,maxx,maxy);
  743. colr = 1;
  744. num = maxx / 10;
  745. for(i=0;i<num;i++) {
  746. x1 = randnum(maxx);
  747. y1 = randnum(maxy);
  748. x2 = randnum(maxx);
  749. y2 = randnum(maxy);
  750. drwbox(1,colr++,x1,y1,x2,y2);
  751. if (colr>15)
  752. colr = 1;
  753. }   
  754. setview(0,0,maxx,maxy);
  755. ret = getkey();
  756. if ((ret=='s') || (ret=='q'))
  757. return(ret);
  759. /*
  760.  * Draw some circles
  761.  */
  762. fillscreen(0);
  763. setview(0,0,maxx,maxy);
  764. drwstring(1,7,0,title,10,0);
  765. sprintf(buf,"drwcircle(mode,color,cx,cy,radius);");
  766. drwstring(1,7,0,buf,10,16);
  767. setview(0,32,maxx,maxy);
  768. colr = 1;
  769. num = maxx / 20;
  770. maxrad = maxx / 2;
  771. for(i=0;i<num;i++) {
  772. x1 = randnum(maxx);
  773. y1 = randnum(maxy);
  774. radx = randnum(maxrad);
  775. drwcircle(1,colr++,x1,y1,radx);
  776. if (colr>15)
  777. colr = 1;
  778. }   
  779. setview(0,0,maxx,maxy);
  780. ret = getkey();
  781. if ((ret=='s') || (ret=='q'))
  782. return(ret);
  784. /*
  785.  * Draw some ellipses
  786.  */
  787. fillscreen(0);
  788. setview(0,0,maxx,maxy);
  789. drwstring(1,7,0,title,10,0);
  790. sprintf(buf,"drwellipse(mode,color,cx,cy,radiusx,radiusy);");
  791. drwstring(1,7,0,buf,10,16);
  792. setview(0,32,maxx,maxy);
  793. colr = 1;
  794. num = maxx / 20;
  795. maxrad = maxx / 2;
  796. for(i=0;i<num;i++) {
  797. x1 = randnum(maxx);
  798. y1 = randnum(maxy);
  799. radx = randnum(maxrad);
  800. rady = randnum(maxrad);
  801. drwellipse(1,colr++,x1,y1,radx,rady);
  802. if (colr>15)
  803. colr = 1;
  804. }   
  805. setview(0,0,maxx,maxy);
  807. ret = getkey();
  809. return(ret);
  811. }
  814. /************
  815.  * DOSCROLL *
  816.  ************/
  818. char doscroll(void)
  819. {
  820. int i, colr, num, totnum;
  821. int a, b, c, d;
  822. int x1, x2, y1, y2;
  823. int spcing, skip;
  824. char ret;
  825. char title[TITLEN];
  826. char buf[TITLEN];
  827. char buf2[TITLEN];
  829. /*
  830.  * Set up the Title
  831.  */
  832. sprintf(title,"DEMO 7: Scroll functions");
  833. palset(pal,0,255);
  834. fillscreen(0);
  835. setview(0,0,maxx,maxy);
  836. drwstring(1,7,0,title,10,0);
  838. spcing = (maxy - 32) / 5;
  839. skip = (int)(((float)maxx + 1.) / 320. + .9) * 2 - 1;
  840. num = spcing / 2 / skip;
  841. if (spcing / 2 != (float)spcing / 2.)
  842. spcing++;
  843. x1 = (maxx + 1) / 2 - spcing;
  844. y1 = (maxy + 1 - 32) / 2 + 32 - spcing;
  845. x2 = (maxx + 1) / 2 + spcing;
  846. y2 = (maxy + 1 - 32) / 2 + 32 + spcing;
  848. drwbox(1,12,x1++,y1++,x2--,y2--);
  849. colr = 16;
  850. sprintf(buf2,"TEXT text TEXT");
  852. /*
  853.  * Show scrollup
  854.  */
  855. setview(0,16,maxx,maxy);
  856. sprintf(buf,"scrollup(x1,y1,x2,y2,numlines,fillcolor);");
  857. drwstring(1,7,0,buf,10,16);
  858. setview(x1,y1,x2,y2);
  859. fillview(0);
  860. totnum = maxx / 10;
  861. for(i=0;i<totnum;i++) {
  862. a = randnum(maxx);
  863. b = randnum(maxy);
  864. c = randnum(maxx);
  865. d = randnum(maxy);
  866. drwline(1,colr,a,b,c,d);
  867. colr += 3;
  868. if (colr > 255)
  869. colr = 16;
  870. }
  871. drwstring(1,7,0,buf2,x1+spcing,y1+spcing);
  872. drwstringlt(1,7,0,buf2,x1+spcing,y1+spcing);
  873. drwstringrt(1,7,0,buf2,x1+spcing,y1+spcing);
  874. drwstringdn(1,7,0,buf2,x1+spcing,y1+spcing);
  876. ret = getkey();
  877. if ((ret=='s') || (ret=='q'))
  878. return(ret);
  880. for(i=0;i<num;i++)
  881. scrollup(x1,y1,x2,y2,skip,0);
  883. ret = getkey();
  884. if ((ret=='s') || (ret=='q'))
  885. return(ret);
  887. /*
  888.  * Show scrolllt
  889.  */
  890. setview(0,16,maxx,maxy);
  891. sprintf(buf,"scrolllt(x1,y1,x2,y2,numlines,fillcolor);");
  892. drwstring(1,7,0,buf,10,16);
  893. setview(x1,y1,x2,y2);
  894. fillview(0);
  895. totnum = maxx / 10;
  896. for(i=0;i<totnum;i++) {
  897. a = randnum(maxx);
  898. b = randnum(maxy);
  899. c = randnum(maxx);
  900. d = randnum(maxy);
  901. drwline(1,colr,a,b,c,d);
  902. colr += 3;
  903. if (colr > 255)
  904. colr = 16;
  905. }
  906. drwstring(1,7,0,buf2,x1+spcing,y1+spcing);
  907. drwstringlt(1,7,0,buf2,x1+spcing,y1+spcing);
  908. drwstringrt(1,7,0,buf2,x1+spcing,y1+spcing);
  909. drwstringdn(1,7,0,buf2,x1+spcing,y1+spcing);
  911. ret = getkey();
  912. if ((ret=='s') || (ret=='q'))
  913. return(ret);
  915. for(i=0;i<num;i++)
  916. scrolllt(x1,y1,x2,y2,skip,0);
  918. ret = getkey();
  919. if ((ret=='s') || (ret=='q'))
  920. return(ret);
  922. /*
  923.  * Show scrolldn
  924.  */
  925. setview(0,16,maxx,maxy);
  926. sprintf(buf,"scrolldn(x1,y1,x2,y2,numlines,fillcolor);");
  927. drwstring(1,7,0,buf,10,16);
  928. setview(x1,y1,x2,y2);
  929. fillview(0);
  930. totnum = maxx / 10;
  931. for(i=0;i<totnum;i++) {
  932. a = randnum(maxx);
  933. b = randnum(maxy);
  934. c = randnum(maxx);
  935. d = randnum(maxy);
  936. drwline(1,colr,a,b,c,d);
  937. colr += 3;
  938. if (colr > 255)
  939. colr = 16;
  940. }
  941. drwstring(1,7,0,buf2,x1+spcing,y1+spcing);
  942. drwstringlt(1,7,0,buf2,x1+spcing,y1+spcing);
  943. drwstringrt(1,7,0,buf2,x1+spcing,y1+spcing);
  944. drwstringdn(1,7,0,buf2,x1+spcing,y1+spcing);
  946. ret = getkey();
  947. if ((ret=='s') || (ret=='q'))
  948. return(ret);
  950. for(i=0;i<num;i++)
  951. scrolldn(x1,y1,x2,y2,skip,0);
  953. ret = getkey();
  954. if ((ret=='s') || (ret=='q'))
  955. return(ret);
  957. /*
  958.  * Show scrollrt
  959.  */
  960. setview(0,16,maxx,maxy);
  961. sprintf(buf,"scrollrt(x1,y1,x2,y2,numlines,fillcolor);");
  962. drwstring(1,7,0,buf,10,16);
  963. setview(x1,y1,x2,y2);
  964. fillview(0);
  965. totnum = maxx / 10;
  966. for(i=0;i<totnum;i++) {
  967. a = randnum(maxx);
  968. b = randnum(maxy);
  969. c = randnum(maxx);
  970. d = randnum(maxy);
  971. drwline(1,colr,a,b,c,d);
  972. colr += 3;
  973. if (colr > 255)
  974. colr = 16;
  975. }
  976. drwstring(1,7,0,buf2,x1+spcing,y1+spcing);
  977. drwstringlt(1,7,0,buf2,x1+spcing,y1+spcing);
  978. drwstringrt(1,7,0,buf2,x1+spcing,y1+spcing);
  979. drwstringdn(1,7,0,buf2,x1+spcing,y1+spcing);
  981. ret = getkey();
  982. if ((ret=='s') || (ret=='q'))
  983. return(ret);
  985. for(i=0;i<num;i++)
  986. scrollrt(x1,y1,x2,y2,skip,0);
  988. ret = getkey();
  990. return(ret);
  992. }
  995. /**********
  996.  * DOTEXT *
  997.  **********/
  999. char dotext(void)
  1000. {
  1001. int i, colr;
  1002. char ret;
  1003. char title[TITLEN];
  1004. char buf[TITLEN];
  1005. char buf2[TITLEN];
  1007. /*
  1008.  * Set up the Title
  1009.  */
  1010. sprintf(title,"DEMO 6: Text functions");
  1011. palset(pal,0,255);
  1013. /*
  1014.  * Show alternate print directions
  1015.  */
  1016. fillscreen(0);
  1017. setview(0,0,maxx,maxy);
  1018. drwstring(1,7,0,title,10,0);
  1019. sprintf(buf,"drwstring(mode,foregnd,bkgnd,string,x,y);");
  1020. drwstring(1,7,0,buf,10,16);
  1021. setview(0,32,maxx,maxy);
  1022. sprintf(buf2,"The Quick Brown Fox Jumped Over The Lazy Dog's Back! 0123456789");
  1023. colr = 16;
  1024. for(i=32;i<=maxy;i+=20) {
  1025. drwstring(1,colr,0,buf2,0,i);
  1026. colr+=5;
  1027. if (colr>255)
  1028. colr = 16;
  1029. }
  1030. ret = getkey();
  1031. if ((ret=='s') || (ret=='q')) {
  1032. setview(0,0,maxx,maxy);
  1033. fillscreen(0);
  1034. return(ret);
  1035. }
  1037. fillview(0);
  1038. setview(0,16,maxx,32);
  1039. sprintf(buf,"drwstringlt(mode,foregnd,bkgnd,string,x,y);");
  1040. drwstring(1,7,0,buf,10,16);
  1041. setview(0,32,maxx,maxy);
  1042. colr = 16;
  1043. for(i=0;i<=maxx;i+=20) {
  1044. drwstringlt(1,colr,0,buf2,i,maxy);
  1045. colr+=5;
  1046. if (colr>255)
  1047. colr = 16;
  1048. }
  1049. ret = getkey();
  1050. if ((ret=='s') || (ret=='q')) {
  1051. setview(0,0,maxx,maxy);
  1052. fillscreen(0);
  1053. return(ret);
  1054. }
  1056. fillview(0);
  1057. setview(0,16,maxx,32);
  1058. sprintf(buf,"drwstringdn(mode,foregnd,bkgnd,string,x,y);");
  1059. drwstring(1,7,0,buf,10,16);
  1060. setview(0,32,maxx,maxy);
  1061. colr = 16;
  1062. for(i=maxy;i>=32;i-=20) {
  1063. drwstringdn(1,colr,0,buf2,maxx,i);
  1064. colr+=5;
  1065. if (colr>255)
  1066. colr = 16;
  1067. }
  1068. ret = getkey();
  1069. if ((ret=='s') || (ret=='q')) {
  1070. setview(0,0,maxx,maxy);
  1071. fillscreen(0);
  1072. return(ret);
  1073. }
  1075. fillview(0);
  1076. setview(0,16,maxx,32);
  1077. sprintf(buf,"drwstringrt(mode,foregnd,bkgnd,string,x,y);");
  1078. drwstring(1,7,0,buf,10,16);
  1079. setview(0,32,maxx,maxy);
  1080. colr = 16;
  1081. for(i=maxx;i>=0;i-=20) {
  1082. drwstringrt(1,colr,0,buf2,i,32);
  1083. colr+=5;
  1084. if (colr>255)
  1085. colr = 16;
  1086. }
  1087. ret = getkey();
  1088. setview(0,0,maxx,maxy);
  1089. fillscreen(0);
  1091. return(ret);
  1093. }