
if not exists "T:"
 assign t: ram:
endif

set q `requestchoice title="Request" body="The game will now reboot your computer..." gadgets="Okay, Let's go !!!|No, Wait please!"`

if eq $q "1"
Assign NAPALM: ""
Mount NAPALM_BOOT: FROM Setup/Boot-Mountlist
Makedir NAPALM_BOOT:S
Copy C:Assign TO NAPALM_BOOT:
cd sys:
Echo "CD *"`CD`*"*NC/ASSIGN C: C*NASSIGN DEVS: DEVS*NASSIGN LIBS: LIBS*NASSIGN L: L*NASSIGN S: S*NASSIGN FONTS: FONTS*NASSIGN ENV: ENVARC:*NSetpatch >NIL Quiet*NMount CD0:*NList quick files lformat=%N devs:monitors/~(#?.info) to ram:mon*Ncd devs:monitors*NExecute ram:mon*N" TO ram:boot1.napalm
cd NAPALM:
Echo "CD *"`CD`*"*NAssign ENV: RAM:*NAssign T: RAM:*NNapalm*NRemRad force*NWait 4*NSetup/Boot-Reset" to ram:boot2.napalm
Join ram:boot1.napalm ram:boot2.napalm to NAPALM_BOOT:S/Startup-Sequence
Wait 4
Setup/Boot-Reset
endif
