^D [0 ^[ ESU0 0ES [0 EDU0 [0 0ED [S [V [N [W [D [3 [A [R ! ! ! DEFINE MACRO TO DO RUBOUT ! ! ! @^UR# ET&512"N 8^T 32^T 8^T | .-1,.T ' # @^US\@^A% (End with ) : % .UTZJ.UU !S1! ^TU3 Q3-127"E.-QU"E@O%S1%'MR-D@O%S1%' Q3-13"E^T^[@^A%String must be on one line End with : %QU,ZT@O%S1%' Q3-21"EQUJZK@^A% Try again: %@O%S1%' Q3-27"N Q3@I%%@O%S1%'QU,ZXAQU,ZKQTJ\ @^UN#@^A% Enter your name%MSGA# @^UW#\UW^YD1%WQW-99"G@^A% Version number overflow. %0UW'QW/10\QW-(QW/10*10)\# ! DEFINE MACRO TO INSERT DATE/TIME ! @^UD#^B&31+100\ 3RD 2C @I%-% .UDZJ @I%JANFEBMARAPRMAYJUNJULAUGSEPOCTNOVDEC% 39R ^B/32&15*3C.,.+3X3ZJ-36DQDJG3 @I%-% ^B/512\ @I% % ^HUDQD/1800U3 Q3+100\ 3RD 2C @I%:% QD-(1800*Q3)/30+100\ 3RD 2C # @EI%% J^D2:@S% **-%"U@O%O%'J@S%%@S%name:%V @S%Version %.UV.,.+6XV::@S%^EA^ED^ED.^ED^ED%"U@^A% Invalid version number format. %V@O%X%'@^A% The Version is specified "SRR.EE", where "S"=status code, "RR"=revision number, and "EE"=edit level. Current Version is "%:GV@^A%".%!P!@^A% Do you wish to update the Status (S), Revision (R), Edit level (E), or exit (CTRL/C) : %^TU3Q3-^^S"E@O%GS%'Q3-^^R"E@O%GR%'Q3-^^E"N@O%P%' QV+4JMW@O%EG% !GR!QVJD@I%X%MW3D@I%.00%@O%EG% !GS!-1UW@^A% Enter new Status code (X=Development/Debugging, Y=Released for test, V=Final release, W=Withdrawn (Obsolete)) : %^TU3 (Q3-^^X)*(Q3-^^Y)*(Q3-^^W)*(Q3-^^V)"N@O%GS%' QVJDQ3@I%% !EG! QVJ.,.+6XV@S%: %KMD@I% %@^A% %-T QW"LQVJ0AU3LK@I%Status: %Q3-^^X"E@I%Development/Debugging%' Q3-^^Y"E@I%Released for test%'Q3-^^V"E@I%Final release%' Q3-^^W"E@I%Withdrawn (Obsolete)%'@I% %' @S% **-%0L@I% Version %GV@I% %MD@I% - %MD@I% Modified by: %MN@I% %@^A% Enter description of modification (End with ) %!T0!0T.UU!T1!^TU3Q3-127"E.-QU"E@O%T1%'MR-D@O%T1%' Q3-13"E^TU3@I% %@O%T0%' Q3-21"EQU,.K@O%T0%' Q3-18"E@^A% %0T@O%T1%' Q3-27"NQ3@I%%@O%T1%' @I% %@O%X% !O!@^A% Revision history block not found.%!A!@^A% Create it [Y/N] ?%^TUTQT-^^N"E@O%X%'QT-13"E^T^[@O%X%'QT-^^Y"N@O%A%'J@I%(* **- Module name: %@^A% Enter module name%MSGA@I% Version X01.00 Last edit: %MD@I% Status: Development/Debugging Revision history: Version X01.00 %MD@I% - %MD@I% Created by: %MN@I% **- *) %!X! @^A% % ]R ]A ]3 ]D ]W ]N ]V ]S ]0 Q0ED ]0 Q0ES ]0 J