home *** CD-ROM | disk | FTP | other *** search
/ Fuji Wa La Te I Ka - Hyakunin Isshu Karuta / KARUTA.bin / wins / karu_gin.dir / 00356_Script_356 < prev    next >
Text File  |  1995-11-13  |  149b  |  8 lines
  1. on  ADDCHIELIST
  2.   global yominum, chielist
  3.   if getpos(chielist,yominum) = 0 then  
  4.     ADD CHIELIST, yominum
  5.   else
  6.     nothing
  7.   end if
  8. end