home bbs files messages ]

Just a sample of the Echomail archive

Cooperative anarchy at its finest, still active today. Darkrealms is the Zone 1 Hub.

   PASCAL_LESSONS      Pascal Programming Lessons      361 messages   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]

   Message 255 of 361   
   Joseph Larsen to All   
   Door game procedure.   
   03 Jun 16 08:02:40   
   
   Hi,   
      
   I'm trying to rewrite my "door" code in Impulse. I have some code:   
      
   ---snip-----   
      
   procedure ab2;   
      
   begin   
          if (cStr(thisnode)) = 1 then   
          shell('/home/imp/door/doorab 1 AB2')   
          end else   
          if (cStr(thisnode)) = 2 then   
          shell('/home/imp/door/doorab 2 AB2')   
          end else   
          if (cStr(thisnode)) = 3 then   
          shell('/home/imp/door/doorab 3 AB2')   
          end else   
          if (cStr(thisnode)) = 4 then   
          shell('/home/imp/door/doorab 4 AB2')   
   end;   
      
   --snip------   
      
   "cStr" is a function to convert a string into an integer. The numbers are the   
   node numbers. Do I need to define "thisnode"? Or the node numbers?    
   I've been doing a lot of coding in C lately, and frankly, i've forgotten    
   A LOT of basic Pascal. I think this code pretty much speaks for itself. Could   
   someone please give me a few pointers?   
      
   Thanks,   
      
      
   |09ignatius |07(|15cia|07)   
      
   --- DayDream BBS/UNIX (Linux) 2.15a   
    * Origin: catch22bbs.com >>>  >> > (1:340/800)   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]


(c) 1994,  bbs@darkrealms.ca