Icon representing a recipe

Recipe: Test your PC power on puzzle 2383

created by Bruno Kestemont

Profile


Name
Test your PC power on puzzle 2383
ID
108568
Shared with
Public
Parent
Test your PC power
Children
None
Created on
March 06, 2024 at 20:59 PM UTC
Updated on
March 06, 2024 at 21:23 PM UTC
Description

Test your PC on the same standard very big puzzle 2383
with auto wiggle power, view "minimalist", electron density view: none
then report the experience conditions here

Best for


Code


--Test your PC power by Bruno Kestemont --Use on puzzle 2383 with auto wiggle power, view "minimalist", electron density view: none startRecTime=os.clock() startRecDate=os.date() p=print --"quicker" print segCnt=structure.GetCount() stopRecTime=os.clock() Testtimerec=0 firstlooptime=0 buffer= 600-- in seconds buffermin=buffer/60 -- in minutes function Testtime() stopRecTime=os.clock() Testtimerec=stopRecTime-startRecTime -- in seconds return Testtimerec end function round(x)--cut all afer 3-rd place return x-x%0.001 end function round1(x)--cut all afer 1-rd place return x-x%0.1 end function Score() return current.GetEnergyScore() end startingscore= Score() -- to get track on latest attempt maxScore= Score() s=round(startingscore) notelibre={} -- list of free segments notesave={} -- backup of notes testresult="" result=0 loopnr=0 function noteread(i) local Note=structure.GetNote(i) if #Note>0 and Note:find("Score") then notelibre[i]=false notesave[i]=Note p(Note) else notelibre[i]=true notesave[i]='' end return end function readarchives() print("Previous results") for i= 1 , segCnt do noteread(i) end end function whriteresult() testresult=startRecDate.."/ Score:"..result.."in "..loopnr.." loops. Result: "..firstlooptime.." sec / 1st loop" for i= 1 , segCnt do if notelibre[i] then p("Whriting in note"..i) structure.SetNote(i, testresult) break end end end function Testing() repeat local gl=Score() loopnr=loopnr+1 if loopnr <50 then selection.SelectRange(loopnr,(2*loopnr)) structure.LocalWiggleSelected(1) selection.DeselectAll() elseif loopnr <300 then selection.SelectRange(loopnr,(10+loopnr)) structure.LocalWiggleSelected(1) selection.DeselectAll() elseif loopnr <600 then selection.SelectRange(1,loopnr) structure.LocalWiggleSelected(1) structure.ShakeSidechainsSelected(1) selection.DeselectAll() else structure.WiggleAll(1) structure.ShakeSidechainsAll(1) end Testtime() timesec=round1(Testtimerec) local glr=round(Score()-gl) local gr=round(Score()-s) print(loopnr.." loops in "..timesec.." sec. / "..buffer..". Gain= "..glr.." / "..gr) if loopnr==1 then firstlooptime=Testtimerec print("Power result:"..firstlooptime.." sec./ 1st loop") if firstlooptime>buffer then print("Too slow for this test, try on a smaler puzzle") end end until Testtimerec>buffer end function Cleaning() --p("Cleaning") selection.DeselectAll() freeze.UnfreezeAll() band.DeleteAll() behavior.SetClashImportance(1) behavior.SetSlowFiltersDisabled(false) recentbest.Save() end function keepingnotes() end function MAINtest() p("Test your PC power by B.Kestemont") p("Date: "..startRecDate) if segCnt<600 then p("WARNING: Not intended for this puzzle. Please use only for Contest") end p("##################") readarchives() p("##################") p("Testing pc ... Go for "..buffermin.." minutes") p("Don't touch or cancel, be patient waiting results") puzzle.StartOver() startingscore= Score() -- to get track on latest attempt maxScore= Score() s=round(startingscore) for i= 1, segCnt do local archive=notesave[i] structure.SetNote(i, archive) end Cleaning() Testing() recentbest.Restore() p("...") result=round(Score()) p("Result= "..result) whriteresult() end MAINtest()

Comments


Bruno Kestemont Lv 1

CPU: ACPI\GenuineIntel_-_Intel64Family_6_Model_158-_Intel(R)Core(TM)_i9-9900K_CPU@_3.60GHz
Graphic card: idem (+ Intel(R) UHD Graphicx 630
RAM: 16,0 Go

==============

Details (in French):
Intel(R) Core(TM) i9-9900K CPU @ 3.60GHz

Vitesse de base :	3,60 GHz
Sockets :	1
Cœurs :	8
Processeurs logiques :	16
Virtualisation :	Activé
Cache de niveau 1 :	512 Ko
Cache de niveau 2 :	2,0 Mo
Cache de niveau 3 :	16,0 Mo

Utilisation	52%
Vitesse	4,66 GHz
Durée de fonctionnement	5:13:56:32
Processus	165
Threads	1764
Handles	68545

Mémoire

16,0 Go

Vitesse :	2133 MHz
Emplacements utilisés :	2 de 4
Facteur de forme :	DIMM
Matériel réservé :	139 Mo

Disponible	5,8 Go
Mise en cache	5,9 Go
Validée	16,5/29,8 Go
Réserve paginée	420 Mo
Pool non paginé	415 Mo
Utilisée (compressée)	10,0 Go (1,2 Go)

§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§§

TEST RESULT:

1 loop in 9.2 sec / 600
74 loops in 603 sec.
(no gain)