[@main]
ÄúºÃ£¡ÔÚÕâÀï¿ÉÒÔÅúÁ¿½øÐÐÂòÒ©£¬ÇëÑ¡ÔñÄúÒª¹ºÂòµÄÒ©Æ·
<³¬¼¶½ð´´Ò©→/SCOLOR=254><ÊäÈëÊýÁ¿/@@InPutInteger1>
[@CallInPutInteger1] ------------Äã½Å±¾ÃüÁî´íÎó
#IF
EQUAL N1 0 --------------ÊäÈëµÄÊý×Ö¼ì²é.ÊÇ0µÄ»°.Ö´ÐÐÏÂÃæ
#SAY
ÊäÈëÊý¾ÝµÈÓÚ0£¬ÇëÖØÐÂÊäÈë¡£ -----------ÕâÀïÊǽá¹û.µ±È»Äã¿ÉÒÔ¸Ä.¾ßÌå×Ô¼ºÐ´.ÕâÑù²»ºÃ
break
#IF
#ACT
MUL M0 3500 <$STR(N1)> ---------ÕâÀïÊÇÉèÖÃM0±äÁ¿ÎªÂòÒ©»¨·Ñ.3500Ϊ¼Û¸ñ.×Ô¼º¸Ä
GOTO @¼ì²é±³°ü
[@¼ì²é±³°ü]
#IF
CHECKBAGSIZE <$STR(N1)> --------¼ì²é±³°ü¹»²»¹»ÄãÊäÈëµÄÊý×Ö
#ACT
GOTO @ÄÃÒ©
#ELSESAY
±³°ü¿Õ¸ñ²»¹»!ллºÏ×÷!
[@ÄÃÒ©]
#IF
checkgold > <$STR(M0)> -----------¼ì²éÉíÉϵÄÇ®¹»²»¹»
#ACT
give ³¬¼¶½ð´´Ò© <$STR(N1)> --------¸øÒ©
take ½ð±Ò <$STR(M0)> ----------¿ÛÇ®
#ELSESAY
ÄãûÄÇô¶àÇ®!ллºÏ×÷!
ÄúºÃ£¡ÔÚÕâÀï¿ÉÒÔÅúÁ¿½øÐÐÂòÒ©£¬ÇëÑ¡ÔñÄúÒª¹ºÂòµÄÒ©Æ·
<³¬¼¶½ð´´Ò©→/SCOLOR=254><ÊäÈëÊýÁ¿/@@InPutInteger1>
[@CallInPutInteger1] ------------Äã½Å±¾ÃüÁî´íÎó
#IF
EQUAL N1 0 --------------ÊäÈëµÄÊý×Ö¼ì²é.ÊÇ0µÄ»°.Ö´ÐÐÏÂÃæ
#SAY
ÊäÈëÊý¾ÝµÈÓÚ0£¬ÇëÖØÐÂÊäÈë¡£ -----------ÕâÀïÊǽá¹û.µ±È»Äã¿ÉÒÔ¸Ä.¾ßÌå×Ô¼ºÐ´.ÕâÑù²»ºÃ
break
#IF
#ACT
MUL M0 3500 <$STR(N1)> ---------ÕâÀïÊÇÉèÖÃM0±äÁ¿ÎªÂòÒ©»¨·Ñ.3500Ϊ¼Û¸ñ.×Ô¼º¸Ä
GOTO @¼ì²é±³°ü
[@¼ì²é±³°ü]
#IF
CHECKBAGSIZE <$STR(N1)> --------¼ì²é±³°ü¹»²»¹»ÄãÊäÈëµÄÊý×Ö
#ACT
GOTO @ÄÃÒ©
#ELSESAY
±³°ü¿Õ¸ñ²»¹»!ллºÏ×÷!
[@ÄÃÒ©]
#IF
checkgold > <$STR(M0)> -----------¼ì²éÉíÉϵÄÇ®¹»²»¹»
#ACT
give ³¬¼¶½ð´´Ò© <$STR(N1)> --------¸øÒ©
take ½ð±Ò <$STR(M0)> ----------¿ÛÇ®
#ELSESAY
ÄãûÄÇô¶àÇ®!ллºÏ×÷!

