home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 3 / Developers_Source_Vol_03_1996.iso / parad / mar94 / sr_fig09.gif < prev    next >
Graphics Interchange Format  |  1995-09-26  |  7.4 KB  |  641x352  |  4-bit (5 colors)
   ocr: SYSCAUGE-HFomlEpoc proc d1splayDars0) W - Gethreesystemkesources(0) ExPercent = strval(ongint()) + "% Free" W = W * 40 DMProgress.setPositPosition(x.J.",h) W - - Gethreesystemkesources(1) txPercent1 = strual(longint(w)) + "% Free" W = a * 40 Progress1.setPosition(x.9.".n) W - - Gethreesystemkesources(2) txPercent2 = strval(Longint(w)) + "% Free" W = W * 40 DxProgress2.setPositiontion(X,J,W,n) endProc Edit Line: 1 Col: 1