home *** CD-ROM | disk | FTP | other *** search
/ ring.yamanashi.ac.jp/pub/pc/freem/action/ / action.zip / baku100.zip / baku100 / Kernel / IO / Reader.tonyu < prev   
Text File  |  2002-06-02  |  414b  |  33 lines
  1. extends Object;
  2.  
  3. constructor Reader() {
  4. }
  5.  
  6. function read() {
  7. }
  8.  
  9. function readInt() {
  10.   var i;
  11.   i=read();
  12.   i=i+read()*256;
  13.   i=i+read()*65536;
  14.   i=i+read()*256*65536;
  15.   return i;
  16. }
  17.  
  18. function readString() {
  19.   var l,s;
  20.   l=readInt();s="";
  21.   while (l>0) {
  22.     s=strcat(s, new String(read()) );
  23.     if (eof()) l=0; 
  24.     l-=1;
  25.   }
  26.   return s;
  27. }
  28.  
  29. function eof() {
  30. }
  31.  
  32. function close() {
  33. }