Show
Ignore:
Timestamp:
10/08/08 00:23:40 (3 months ago)
Author:
fujidig
Message:

notesel, noteunsel, noteinfo (notemax, notesize) を実装

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/javascript/hsp-on-js/trunk/src/t.hsp

    r20926 r20933  
    1 a = "" 
    2 memexpand a, 100 
    3 poke a, 64 
     1#runtime "hsplet3" 
     2a = "*" 
     3notesel a 
     4mes noteinfo(1) ; >> 1 
     5        b = "**" 
     6        notesel b 
     7        mes noteinfo(1) ; >> 2 
     8                c = "***" 
     9                notesel c 
     10                mes noteinfo(1) ; >> 3 
     11                        d = "****" 
     12                        notesel d 
     13                        mes noteinfo(1) ; >> 4 
     14                        mes noteinfo(1) ; >> 4 
     15                        noteunsel 
     16                mes noteinfo(1) ; >> 3 
     17                noteunsel 
     18        mes noteinfo(1) ; >> 2 
     19        noteunsel 
     20mes noteinfo(1) ; >> 1 
     21noteunsel 
     22 
     23mes 
     24a = "", " ", "\n", "\n ", "\n\n", "a\n\nb", "a\n\nb\n" 
     25foreach a 
     26        notesel a.cnt 
     27        mes noteinfo() 
     28loop 
     29