설명

모델 라이브러리에서 유용한 파일을 생성합니다.

소형 모델 유형 :메가 슬롯

카테고리 : 메가 슬롯 모델 라이브러리

메인 파일 : gamsutil.gms   포함: gamsmod.inc gamsref.inc

$title은 모델 라이브러리에서 유용한 파일을 생성합니다(GAMSUTIL,SEQ=190)

$onText
모델 라이브러리에서 유용한 파일을 생성합니다.

메가 슬롯 Development Corporation, 모델링 도구 상자.

다음 시스템 구성/문서 파일이 작성됩니다.

   gamslib.glb IDE 색인 및 문서
   modlibfs.txt Makefile 입력 파일

$include되고, 읽고 쓰여진 모든 파일은 동일해야 합니다.
디렉토리. 이 프로그램은 다른 위치에서 실행될 수 있습니다
메가 슬롯 매개변수 U1을 사용하여 예를 들면 다음과 같습니다.

   >메가 슬롯 gamsutil.190 U1=c:\oldd\alex\메가 슬롯\gamslib\ver008\test\

키워드: 메가 슬롯 언어 기능, 메가 슬롯 모델 라이브러리
$offText

$setGlobal gamslib '%메가 슬롯u1%'

파일
   glb 'IDE 모델 라이브러리 인덱스' / '%gamslib%gamslib.glb' /
   glist '메이크파일 인덱스 파일' / '%gamslib%modlibfs.txt' /;

스칼라 우선;

$off목록
$include gamsmod.inc
$onListing

*
* IDE modlib 파일
*
glb를 넣어
      '버전 = 5'
   / 'LibraryName = 메가 슬롯 모델 라이브러리 %version%'
   / '열 = 6'
   / '5 = SeqNr'
   / '6 = 라이센스|C=커뮤니티, D=데모, L=라이센스 필요'
   / '1 = 이름'
   / '2 = 적용분야'
   / '3 = 유형'
   / '4 = 설명'
   / '초기 정렬 = 3'
   / '*$*$*$';

glb.lcase = 1;
루프(sm(s,m),
   넣어 / '파일 = ' m.tl:0 '.' s.tl:0; loop(incmap(inc,s), put ',', inc.tl:0;);
   glb.lcase = 2;
   넣다 / '1 = ' m.tl:0;
   넣다 / '2 = '; 첫 번째 = 1;
   loop(as(a,s)$first, put a.te(a); first = 0;);
   넣다 / '3 = '; loop(tss(t,s), put t.tl;);
   glb.lcase = 0; 넣다 / '4 = 'm.te(m)
       / '5 = ' '000000':ceil(log(카드(들) + 1)/log(10))
                @(glb.cc - 카드(s.tl)) s.tl:0 넣기
       / '6 = ';
   put$커뮤니티(들) 'C';
   put$demo(s) 'D';
   put$(커뮤니티 및 데모가 아님) 'L';
   glb.lcase = 1;
   put_utilities 'glb'/ '%gamslib%' m.tl:0 '.' s.tl:0;
   넣다 / '*$*$*$';
);
넣어닫다;

*
* 메이크파일 입력
*
$sTitle Makefile 형식의 모든 파일 목록
글리스트.lcase = 1;
글리스트 'MODLIBFILES = \' 넣기
        / 'gamslib.glb \'
        / 'modlib.log \' ;
loop(inc, put / inc.tl:0 ' \';);
loop(sm(s,m), put / m.tl:0 '.' s.tl:0 ' \';);
putClose // 글리스트;