mirror of
https://github.com/Zeal-Operating-System/ZealOS.git
synced 2025-04-18 05:38:36 +01:00
AOnce -> ZOnce
This commit is contained in:
parent
06b4387a43
commit
0147db1d84
9 changed files with 13 additions and 13 deletions
src
Binary file not shown.
Binary file not shown.
|
@ -56,7 +56,7 @@ public U0 TOSPromptAndCopyDrive()
|
|||
|
||||
U0 DistroPrep()
|
||||
{
|
||||
AOnceFlush; //Don't want in Registry
|
||||
ZOnceFlush; //Don't want in Registry
|
||||
OnceFlush;
|
||||
|
||||
Del("/Home/Demo*");
|
||||
|
|
|
@ -9,4 +9,4 @@ U0 OnceDemo()
|
|||
|
||||
OnceDemo;
|
||||
|
||||
//There are variants for zenith $LK,"AOnce",A="MN:AOnce"$().
|
||||
//There are variants for zenith $LK,"ZOnce",A="MN:ZOnce"$().
|
||||
|
|
|
@ -6,9 +6,9 @@ $WW,1$$LK,"KMain",A="MN:KMain"$()
|
|||
includes $LK,"~/Once.CC"$
|
||||
calls $LK,"OnceExe",A="MN:OnceExe"$().
|
||||
|
||||
$LK,"AOnce",A="MN:AOnce"$() appends src code to $LK,"~/Registry.CC"$ $FG,2$Once/Zenith$FG$ tree, executed at next boot by $FG,2$Zenith$FG$.
|
||||
$LK,"ZOnce",A="MN:ZOnce"$() appends src code to $LK,"~/Registry.CC"$ $FG,2$Once/Zenith$FG$ tree, executed at next boot by $FG,2$Zenith$FG$.
|
||||
|
||||
$LK,"Once",A="MN:Once"$() appends src code to $LK,"~/Registry.CC"$ $FG,2$Once/User$FG$ tree, executed at next boot by first $FG,2$User$FG$ term.
|
||||
|
||||
At boot, $LK,"OnceExe",A="MN:OnceExe"$(), executes $FG,2$Once/Zenith$FG$ tree, $LK,"AOnceFlush",A="MN:AOnceFlush"$()s it,
|
||||
At boot, $LK,"OnceExe",A="MN:OnceExe"$(), executes $FG,2$Once/Zenith$FG$ tree, $LK,"ZOnceFlush",A="MN:ZOnceFlush"$()s it,
|
||||
executes $FG,2$Once/User$FG$ tree and $LK,"OnceFlush",A="MN:OnceFlush"$()s.
|
||||
|
|
|
@ -81,7 +81,7 @@ $LK,"ExePrint",A="MN:ExePrint"$(U8 *format,...) compiles and execute a string.
|
|||
|
||||
$LK,"Once",A="MN:Once"$(U8 *format,...) Writes User code to $LK,"Registry",A="FI:~/Registry.CC"$ to be executed next boot.
|
||||
|
||||
$LK,"AOnce",A="MN:AOnce"$(U8 *format,...) Writes Zenith code to $LK,"Registry",A="FI:~/Registry.CC"$ to be executed next boot.
|
||||
$LK,"ZOnce",A="MN:ZOnce"$(U8 *format,...) Writes Zenith code to $LK,"Registry",A="FI:~/Registry.CC"$ to be executed next boot.
|
||||
|
||||
$LK,"InPrint",A="MN:InPrint"$(I64 mS,U8 *format,...) $LK,"PutChars",A="MN:PutChars"$()s one at a time with a delay.
|
||||
|
||||
|
|
BIN
src/Kernel.BIN.C
BIN
src/Kernel.BIN.C
Binary file not shown.
Binary file not shown.
|
@ -122,8 +122,8 @@ U0 RegInit()
|
|||
#help_index "Boot/Once;Registry/Once"
|
||||
#help_file "::/Doc/Once"
|
||||
|
||||
public U0 AOnceFlush()
|
||||
{//Flush AOnce() buf.
|
||||
public U0 ZOnceFlush()
|
||||
{//Flush ZOnce() buf.
|
||||
RegWrite("Once/Zenith","");
|
||||
}
|
||||
|
||||
|
@ -132,11 +132,11 @@ public U0 OnceFlush()
|
|||
RegWrite("Once/User","");
|
||||
}
|
||||
|
||||
public U0 AOnce(U8 *format,...)
|
||||
public U0 ZOnce(U8 *format,...)
|
||||
{//Add Zenith code to $LK,"~/Registry.CC"$, executed next boot.
|
||||
U8 *buf=StrPrintJoin(NULL,format,argc,argv);
|
||||
if (!Bt(&sys_run_level,RLf_ONCE_ZENITH))
|
||||
AOnceFlush;
|
||||
ZOnceFlush;
|
||||
RegAppend("Once/Zenith","%s\n",buf);
|
||||
Free(buf);
|
||||
}
|
||||
|
@ -150,14 +150,14 @@ public U0 Once(U8 *format,...)
|
|||
Free(buf);
|
||||
}
|
||||
|
||||
public U0 AOnceDrive(U8 drv_let=0,U8 *format,...)
|
||||
public U0 ZOnceDrive(U8 drv_let=0,U8 *format,...)
|
||||
{//Add Zenith code to drv $LK,"~/Registry.CC"$, executed next boot.
|
||||
U8 *buf=StrPrintJoin(NULL,format,argc,argv);
|
||||
I64 old_drive_let=*sys_registry_doc->filename.name;
|
||||
if (drv_let)
|
||||
*sys_registry_doc->filename.name=drv_let;
|
||||
if (!Bt(&sys_run_level,RLf_ONCE_ZENITH))
|
||||
AOnceFlush;
|
||||
ZOnceFlush;
|
||||
RegAppend("Once/Zenith","%s\n",buf);
|
||||
Free(buf);
|
||||
*sys_registry_doc->filename.name=old_drive_let;
|
||||
|
@ -183,7 +183,7 @@ public U0 OnceExe()
|
|||
RegDefault("Once/Zenith","");
|
||||
if (RegCount("Once/Zenith")>2) {
|
||||
Zenith("RegExe(\"Once/Zenith\");");
|
||||
AOnceFlush;
|
||||
ZOnceFlush;
|
||||
}
|
||||
LBts(&sys_run_level,RLf_ONCE_ZENITH);
|
||||
|
||||
|
@ -195,7 +195,7 @@ public U0 OnceExe()
|
|||
LBts(&sys_run_level,RLf_ONCE_USER);
|
||||
|
||||
} catch {
|
||||
AOnceFlush;
|
||||
ZOnceFlush;
|
||||
LBts(&sys_run_level,RLf_ONCE_ZENITH);
|
||||
OnceFlush;
|
||||
LBts(&sys_run_level,RLf_ONCE_USER);
|
||||
|
|
Loading…
Reference in a new issue