wsms.mdl

来自「一个手机站点采用WML 等编写开发,具体可以看代码,比较简单」· MDL 代码 · 共 2,197 行 · 第 1/5 页

MDL
2,197 行
字号
12345
				name       	"DoNotCreate"
				value      	201)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Param"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"Mode"
			value      	("ParameterModeSet" 232))
		    (object Attribute
			tool       	"Ada83"
			name       	"ParameterModeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Default"
				value      	232)
			    (object Attribute
				tool       	"Ada83"
				name       	"In"
				value      	204)
			    (object Attribute
				tool       	"Ada83"
				name       	"Out"
				value      	205)
			    (object Attribute
				tool       	"Ada83"
				name       	"InOut"
				value      	203)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Has"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"NameIfUnlabeled"
			value      	"The_${supplier}")
		    (object Attribute
			tool       	"Ada83"
			name       	"DataMemberName"
			value      	"${relationship}")
		    (object Attribute
			tool       	"Ada83"
			name       	"GetName"
			value      	"Get_${relationship}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineGet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"SetName"
			value      	"Set_${relationship}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineSet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"IsConstant"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"InitialValue"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"Declare"
			value      	("DeclareSet" 234))
		    (object Attribute
			tool       	"Ada83"
			name       	"Variant"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerGeneric"
			value      	"List")
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerType"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerDeclarations"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"SelectorName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"SelectorType"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"DeclareSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Before"
				value      	233)
			    (object Attribute
				tool       	"Ada83"
				name       	"After"
				value      	234)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Attribute"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"DataMemberName"
			value      	"${attribute}")
		    (object Attribute
			tool       	"Ada83"
			name       	"GetName"
			value      	"Get_${attribute}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineGet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"SetName"
			value      	"Set_${attribute}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineSet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"IsConstant"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"InitialValue"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"Declare"
			value      	("DeclareSet" 234))
		    (object Attribute
			tool       	"Ada83"
			name       	"Variant"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"Representation"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"DeclareSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Before"
				value      	233)
			    (object Attribute
				tool       	"Ada83"
				name       	"After"
				value      	234)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Association"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"NameIfUnlabeled"
			value      	"The_${targetClass}")
		    (object Attribute
			tool       	"Ada83"
			name       	"GetName"
			value      	"Get_${association}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineGet"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"SetName"
			value      	"Set_${association}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineSet"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"GenerateAssociate"
			value      	("ProcedureKindSet" 202))
		    (object Attribute
			tool       	"Ada83"
			name       	"AssociateName"
			value      	"Associate")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineAssociate"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"GenerateDissociate"
			value      	("ProcedureKindSet" 202))
		    (object Attribute
			tool       	"Ada83"
			name       	"DissociateName"
			value      	"Dissociate")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineDissociate"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"ProcedureKindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Procedure"
				value      	202)
			    (object Attribute
				tool       	"Ada83"
				name       	"DoNotCreate"
				value      	201)))
		    (object Attribute
			tool       	"Ada83"
			name       	"FunctionKindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Function"
				value      	199)
			    (object Attribute
				tool       	"Ada83"
				name       	"DoNotCreate"
				value      	201)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Role"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"NameIfUnlabeled"
			value      	"The_${targetClass}")
		    (object Attribute
			tool       	"Ada83"
			name       	"DataMemberName"
			value      	"${target}")
		    (object Attribute
			tool       	"Ada83"
			name       	"GetName"
			value      	"Get_${target}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineGet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"SetName"
			value      	"Set_${target}")
		    (object Attribute
			tool       	"Ada83"
			name       	"InlineSet"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada83"
			name       	"IsConstant"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada83"
			name       	"InitialValue"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"Declare"
			value      	("DeclareSet" 234))
		    (object Attribute
			tool       	"Ada83"
			name       	"Representation"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerGeneric"
			value      	"List")
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerType"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"ContainerDeclarations"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Ada83"
			name       	"SelectorName"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"SelectorType"
			value      	"")
		    (object Attribute
			tool       	"Ada83"
			name       	"ProcedureKindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Procedure"
				value      	202)
			    (object Attribute
				tool       	"Ada83"
				name       	"DoNotCreate"
				value      	201)))
		    (object Attribute
			tool       	"Ada83"
			name       	"DeclareSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Ada83"
				name       	"Before"
				value      	233)
			    (object Attribute
				tool       	"Ada83"
				name       	"After"
				value      	234)))))
	    (object Attribute
		tool       	"Ada83"
		name       	"default__Subsystem"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada83"
			name       	"Directory"
			value      	"AUTO GENERATE")))
	    (object Attribute
		tool       	"Ada83"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"Ada95"
		name       	"propertyId"
		value      	"838326200")
	    (object Attribute
		tool       	"Ada95"
		name       	"default__Project"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada95"
			name       	"SpecFileExtension"
			value      	"1.ada")
		    (object Attribute
			tool       	"Ada95"
			name       	"SpecFileBackupExtension"
			value      	"1.ad~")
		    (object Attribute
			tool       	"Ada95"
			name       	"SpecFileTemporaryExtension"
			value      	"1.ad#")
		    (object Attribute
			tool       	"Ada95"
			name       	"BodyFileExtension"
			value      	"2.ada")
		    (object Attribute
			tool       	"Ada95"
			name       	"BodyFileBackupExtension"
			value      	"2.ad~")
		    (object Attribute
			tool       	"Ada95"
			name       	"BodyFileTemporaryExtension"
			value      	"2.ad#")
		    (object Attribute
			tool       	"Ada95"
			name       	"CreateMissingDirectories"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada95"
			name       	"UseColonNotation"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada95"
			name       	"GenerateBodies"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada95"
			name       	"GenerateAccessorOperations"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada95"
			name       	"GenerateStandardOperations"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada95"
			name       	"DefaultCodeBody"
			value      	"[statement]")
		    (object Attribute
			tool       	"Ada95"
			name       	"ImplicitParameter"
			value      	TRUE)
		    (object Attribute
			tool       	"Ada95"
			name       	"CommentWidth"
			value      	60)
		    (object Attribute
			tool       	"Ada95"
			name       	"StopOnError"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada95"
			name       	"ErrorLimit"
			value      	30)
		    (object Attribute
			tool       	"Ada95"
			name       	"UseFileName"
			value      	FALSE)
		    (object Attribute
			tool       	"Ada95"
			name       	"Directory"
			value      	"$ROSEADA95_SOURCE")))
	    (object Attribute
		tool       	"Ada95"
		name       	"default__Class"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Ada95"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"Ada95"
12345

wsms.mdl - 源码说明

本页面展示了「一个手机站点采用WML 等编写开发,具体可以看代码,比较简单」中的 wsms.mdl 源码文件，采用 MDL 编程语言编写，共 2,197 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与WML相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?