설명

DCO $[x]무료 슬롯 게임[.keepCode]를 테스트하여 저장 파일을 생성하는 동안
컴파일 단계.

기고자: Michael Bussieck, 2023년 1월

소형 모델 유형 :무료 슬롯 게임

카테고리 : 무료 슬롯 게임 테스트 라이브러리

메인 파일 : save3.gms

$title 'DCO save3 테스트' (SAVE3,SEQ=924)

$onText
DCO $[x]무료 슬롯 게임[.keepCode]를 테스트하여 작업 중에 저장 파일을 생성합니다. 
컴파일 단계.

기고자: Michael Bussieck, 2023년 1월
$offText

$onEchoV > chk4sym.gms
$if가 설정되지 않음 SymName $abort SymName이 설정되지 않음
$선언되지 않은 경우 %symName% $abort 알 수 없는 기호 %symName%
$offEcho

i /1*5/로 설정; 매개변수 p(i) / 1*5 0 /;

$무료 슬롯 게임 save_test
$call.checkErrorLevel gams chk4sym restart=save_test lo=2 --symName i
$call.checkErrorLevel gams chk4sym restart=save_test lo=2 --symName p

$xsave xsave_test
$call.checkErrorLevel gams chk4sym restart=xsave_test lo=2 --symName i
$call.checkErrorLevel gams chk4sym restart=xsave_test lo=2 --symName p

변수 x(i); 방정식 e(i); e(i).. x(i) =e= 0;

$무료 슬롯 게임 save_test
$call.checkErrorLevel gams chk4sym restart=save_test lo=2 --symName i
$call.checkErrorLevel gams chk4sym restart=save_test lo=2 --symName p
$call.checkErrorLevel gams chk4sym restart=save_test lo=2 --symName x
$call.checkErrorLevel gams chk4sym restart=save_test lo=2 --symName e
$call gams chk4sym restart=save_test lo=2 --symName f
$errorLevel 1이 아닌 경우 $abort 방정식 f를 알 수 없을 것으로 예상합니다(저장)

$xsave xsave_test
$call.checkErrorLevel gams chk4sym restart=xsave_test lo=2 --symName i
$call.checkErrorLevel gams chk4sym restart=xsave_test lo=2 --symName p
$call.checkErrorLevel gams chk4sym restart=xsave_test lo=2 --symName x
$call.checkErrorLevel gams chk4sym restart=xsave_test lo=2 --symName e
$call gams chk4sym restart=xsave_test lo=2 --symName f
$errorLevel 1이 아닌 경우 $abort 방정식 f를 알 수 없는 것으로 예상합니다(xsave)

방정식 f(i); f(i).. x(i) =e= 0;

$onEchoV > checkpsum.gms
$if 설정되지 않음 SUMP $abort SUMP 설정되지 않음
스칼라 psum; psum = sum(i,p(i));
abort$(psum<>%SUMP%) '잘못된 합계 %SUMP%가 같지 않음', psum;
$offEcho

p(i) = 1;

$무료 슬롯 게임 save_test
$call.checkErrorLevel gams checkpsum restart=save_test lo=2 --sumP=0

$xsave xsave_test
$call.checkErrorLevel gams checkpsum restart=xsave_test lo=2 --sumP=0

$무료 슬롯 게임keepCode save_test
$call.checkErrorLevel gams checkpsum restart=save_test lo=2 --sumP=5

$xsave.keepCode xsave_test
$call.checkErrorLevel gams checkpsum restart=xsave_test lo=2 --sumP=5

p(i) = 2;

$무료 슬롯 게임keepCode save_test
$call.checkErrorLevel gams checkpsum restart=save_test lo=2 --sumP=10

$xsave.keepCode xsave_test
$call.checkErrorLevel gams checkpsum restart=xsave_test lo=2 --sumP=10

* 선언 내부에 $무료 슬롯 게임를 사용할 수 없는지 확인하세요.
$onEchoV > decla.gms
내가 설정 /
1
$무료 슬롯 게임keepCode save_test
2
3 /;
$offEcho
$call gams 선언 lo=2
$errorLevel 1이 아닌 경우 $abort는 decla.gms가 실패할 것으로 예상합니다(저장).

* 선언 내에서 $xsave를 사용할 수 없는지 확인하세요.
$onEchoV > decla.gms
내가 설정 /
1
$xsave.keepCode xsave_test
2
3 /;
$offEcho
$call gams 선언 lo=2
$errorLevel 1이 아닌 경우 $abort는 decla.gms가 실패할 것으로 예상합니다(xsave)

* if/loop 본문 내에서 $무료 슬롯 게임keepCode를 사용할 수 없는지 확인하세요.
$onEchoV > if.gms
만약 (1,
$무료 슬롯 게임keepCode save_test
   '테스트'를 표시합니다.
);
$offEcho
lo=2인 경우 $call gams 
$if errorLevel 1 $abort if.gms가 실패할 것으로 예상됨(저장)

* if/loop 본문 내에서 $xsave.keepCode를 사용할 수 없는지 확인하세요.
$onEchoV > if.gms
만약 (1,
$xsave.keepCode xsave_test
   '테스트'를 표시합니다.
);
$offEcho
lo=2인 경우 $call gams 
$if errorLevel 1 $abort if.gms가 실패할 것으로 예상됨(xsave)

$onEchoV > loop.gms
i /1*5/로 설정;
루프(나,
$무료 슬롯 게임keepCode save_test
   '테스트'를 표시합니다.
);
$offEcho
$call 게임 루프 lo=2 
$errorLevel 1이 아닌 경우 $abort는 loop.gms가 실패할 것으로 예상합니다(저장).

$onEchoV > loop.gms
i /1*5/로 설정;
루프(나,
$xsave.keepCode xsave_test
   '테스트'를 표시합니다.
);
$offEcho
$call 게임 루프 lo=2 
$errorLevel 1이 아닌 경우 $abort loop.gms가 실패할 것으로 예상됩니다(xsave)