Wiindows 10
Re: Wiindows 10
Less than one hour total, for such the full feature update, seems very short for a HDD disk.
Re: Wiindows 10
you are right, it's just a guess how long it took, being a VM I was doing other things in the host OS
Re: Wiindows 10
Example for the previous feature update version 1809:
How long does the Windows 10 October 2018 update (version 1809) take to install?
The biggest factor affecting the length of time it takes to install Windows 10 is whether the drive is an SSD (solid state drive) or HDD (hard disk drive). Installation on SSDs takes half or even one quarter of the time.
A high specification PC with a fast SSD might be able to do it in 30 minutes, but a low specification PC with a hard disk drive could take three hours. Most computers will be somewhere between, leaning towards the short SSD times or long HDD times depending on the specification.
Laptops usually have slower drives and less processing power than desktops, so they may take longer.
Re: Wiindows 10
Low memory devices (e.g. 4GB AND integrated graphics) are no picnic ether.
For 1709 update:
Core2 6600 (2.4GHz) 6GB with SSD: about 2.5 hrs.
(now has been junked)
1809 update
i7-3770 12GB SSD : 50min-1hr.
Ryzen 2600 24GB with (old) SSD: 35-40 minutes
added later: these are rough magnitude only figures without download, since that is connection dependent, and often done already in the background if Windows tries to force you into upgrading.
For 1709 update:
Core2 6600 (2.4GHz) 6GB with SSD: about 2.5 hrs.
(now has been junked)
1809 update
i7-3770 12GB SSD : 50min-1hr.
Ryzen 2600 24GB with (old) SSD: 35-40 minutes
added later: these are rough magnitude only figures without download, since that is connection dependent, and often done already in the background if Windows tries to force you into upgrading.
Last edited by marcov on May 23, 2019 9:13, edited 2 times in total.
Re: Wiindows 10
1809 update:
i7-7500U (2.9GHz), 6GB, HDD 930GB
about 4 hours not counting the download time (only installation + reboot)
i7-7500U (2.9GHz), 6GB, HDD 930GB
about 4 hours not counting the download time (only installation + reboot)
-
- Posts: 4310
- Joined: Jan 02, 2017 0:34
- Location: UK
- Contact:
Re: Wiindows 10
1903 Update
This was done after the KB4497934.
Download: 14mins
Install: 33mins
Followed by quite a few restarts and final page configuring.
Total time from start to desktop: 57mins ( longer than the 1809 update )
72Mbps broadband, SSD, Intel i7 4/4 @ 3.9GHz.
This was done after the KB4497934.
Download: 14mins
Install: 33mins
Followed by quite a few restarts and final page configuring.
Total time from start to desktop: 57mins ( longer than the 1809 update )
72Mbps broadband, SSD, Intel i7 4/4 @ 3.9GHz.
Re: Wi<s>i</s>ndows 10
If I extrapolate, then in 2023 the time to update will be longer then the time between updates :-)
Re: Wiindows 10
Might as well be on 1809 goatskin for all the good it is.
Code: Select all
' FONTS
Function Filter(Byref tim As Ulong Pointer,_
Byval rad As Single,_
Byval destroy As Long=1,_
Byval fade As Long=0) As Ulong Pointer
#define map(a,b,_x_,c,d) ((d)-(c))*((_x_)-(a))/((b)-(a))+(c)
If fade<0 Then fade=0:If fade>100 Then fade=100
Type p2
As Long x,y
As Ulong col
End Type
#macro ppoint(_x,_y,colour)
pixel=row+pitch*(_y)+(_x)*4
(colour)=*pixel
#endmacro
#macro ppset(_x,_y,colour)
pixel=row+pitch*(_y)+(_x)*4
*pixel=(colour)
#endmacro
#macro average()
ar=0:ag=0:ab=0:inc=0
xmin=x:If xmin>rad Then xmin=rad
xmax=rad:If x>=(_x-1-rad) Then xmax=_x-1-x
ymin=y:If ymin>rad Then ymin=rad
ymax=rad:If y>=(_y-1-rad) Then ymax=_y-1-y
For y1 As Long=-ymin To ymax
For x1 As Long=-xmin To xmax
inc=inc+1
ar=ar+(NewPoints(x+x1,y+y1).col Shr 16 And 255)
ag=ag+(NewPoints(x+x1,y+y1).col Shr 8 And 255)
ab=ab+(NewPoints(x+x1,y+y1).col And 255)
Next x1
Next y1
If fade=0 Then
averagecolour=Rgb(ar/(inc),ag/(inc),ab/(inc))
Else
averagecolour=Rgb(fd*ar/(inc),fd*ag/(inc),fd*ab/(inc))
End If
#endmacro
Dim As Single fd=map(0,100,fade,1,0)
Dim As Integer _x,_y
Imageinfo tim,_x,_y
Dim As Ulong Pointer im=Imagecreate(_x,_y)
Dim As Integer pitch
Dim As Any Pointer row
Dim As Ulong Pointer pixel
Dim As Ulong col
Imageinfo tim,,,,pitch,row
Dim As p2 NewPoints(_x-1,_y-1)
For y As Long=0 To (_y)-1
For x As Long=0 To (_x)-1
ppoint(x,y,col)
NewPoints(x,y)=Type<p2>(x,y,col)
Next x
Next y
Dim As Ulong averagecolour
Dim As Long ar,ag,ab
Dim As Long xmin,xmax,ymin,ymax,inc
Imageinfo im,,,,pitch,row
For y As Long=0 To _y-1
For x As Long=0 To _x-1
average()
ppset((NewPoints(x,y).x),(NewPoints(x,y).y),averagecolour)
Next x
Next y
If destroy Then Imagedestroy tim: tim = 0
Function= im
End Function
Sub drawstring(Byval xpos As Long,Byval ypos As Long,Byref text As String,Byval colour As Ulong,Byval size As Single,Byref im As Any Pointer=0)
Type D2
As Double x,y
As Ulong col
End Type
size=Abs(size)
Static As d2 XY()
Static As Long runflag
If runflag=0 Then
Redim XY(128,127)
Screen 8
Width 640\8,200\16
Dim As Ulong Pointer img
Dim count As Long
For ch As Long=1 To 127
img=Imagecreate(9,17)
Draw String img,(1,1),Chr(ch)
For x As Long=1 To 8
For y As Long=1 To 16
If Point(x,y,img)<>0 Then
count=count+1
XY(count,ch)=Type<D2>(x,y)
End If
Next y
Next x
count=0
Imagedestroy img
Next ch
runflag=1
End If
If size=0 Then Exit Sub
Dim As D2 np,t
#macro Scale(p1,p2,d)
np.col=p2.col
np.x=d*(p2.x-p1.x)+p1.x
np.y=d*(p2.y-p1.y)+p1.y
#endmacro
Dim As D2 c=Type<D2>(xpos,ypos)
Dim As Long dx=xpos,dy=ypos,f
If Abs(size)=1.5 Then f=3 Else f=2
For z6 As Long=1 To Len(text)
Var asci=text[z6-1]
For _x1 As Long=1 To 64*2
t=Type<D2>(XY(_x1,asci).x+dx,XY(_x1,asci).y+dy,colour)
Scale(c,t,size)
If XY(_x1,asci).x<>0 Then
If size>1 Then
Line im,(np.x-size/f,np.y-size/f)-(np.x+size/f,np.y+size/f),np.col,bf
Else
Pset im,(np.x,np.y),np.col
End If
End If
Next _x1
dx=dx+8
Next z6
End Sub
Sub init Constructor
drawstring(0,0,"",0,0)
Screen 0
End Sub
Function Colour(Byref im As Any Pointer,Byval newcol As Ulong,Byval tweak As Long,Byval fontsize As Single) As Any Pointer
#macro ppset2(_x,_y,colour)
pixel2=row2+pitch2*(_y)+(_x)*dpp2
*pixel2=(colour)
#endmacro
#macro ppoint(_x,_y,colour)
pixel=row+pitch*(_y)+(_x)*dpp
(colour)=*pixel
#endmacro
Dim As Long grade
Select Case fontsize
Case 1 To 1.5:grade=205
Case 2 :grade=225
Case 2.5:grade=222
Case 3 To 3.5:grade=200
Case 4 To 4.5:grade=190
Case 5 To 5.5:grade=165
Case Else: grade=160
End Select
Dim As Integer w,h
Dim As Integer pitch,pitch2,dpp,dpp2
Dim As Any Pointer row,row2
Dim As Ulong Pointer pixel,pixel2
Dim As Ulong col
Imageinfo im,w,h,dpp,pitch,row
Dim As Any Pointer temp=Imagecreate(w,h)
Imageinfo temp,,,dpp2,pitch2,row2
For y As Long=0 To h-1
For x As Long=0 To w-1
ppoint(x,y,col)
Var v=.299*((col Shr 16)And 255)+.587*((col Shr 8)And 255)+.114*(col And 255)
If v>(grade+tweak) Then
ppset2(x,y,newcol)
Else
ppset2(x,y,Rgb(255,0,255))
End If
Next x
Next y
Return temp
End Function
Sub CreateFont(Byref myfont As Any Pointer,Byval fontsize As Single,Byval col As Ulong,Byval tweak As Long=0)
fontsize=Int(2*Abs(fontsize))/2
If fontsize=0 Then fontsize=.5
Dim As Ubyte Ptr p
Dim As Any Pointer temp
Dim As Integer i
temp = Imagecreate(FontSize*768,FontSize*16)
myfont=Imagecreate(FontSize*768,FontSize*16)
For i = 32 To 127
drawstring ((i-32)*FontSize*8,1,Chr(i),Rgb(255,255,255),FontSize,temp)
Next i
If fontsize>1.5 Then
For n As Single=0 To fontsize-2:temp=filter(temp,1,1,0):Next
End If
temp=Colour(temp,col,tweak,fontsize)
Put myfont,(0,0),temp,trans
Imageinfo( myfont,i,,,, p )
p[0]=0:p[1]=32:p[2]=127
For i = 32 To 127
p[3+i-32]=FontSize*8
Next i
Imagedestroy(temp)
End Sub
Function Regulate(Byval MyFps As Long,Byref fps As Long) As Long
Static As double timervalue,lastsleeptime,t3,frames
frames+=1
If (Timer-t3)>=1 Then t3=Timer:fps=frames:frames=0
Var sleeptime=lastsleeptime+((1/myfps)-Timer+timervalue)*1000
If sleeptime<1 Then sleeptime=1
lastsleeptime=sleeptime
timervalue=Timer
Return sleeptime
End Function
Screenres 900,600,32
Color ,Rgb(0,50,125)
Dim As Integer xres,yres
Screeninfo xres,yres
Dim As Any Ptr i=Imagecreate(xres,yres)
Dim As Any Ptr msg,speed,g(1 To 5)
createfont msg,4.5,Rgb(200,200,200)
createfont speed,2,Rgb(200,0,0)
For n As Long=1 To 5
createfont g(n),2,Rnd*Rgb(255,255,255)
Next
#define Intrange(f,l) int(Rnd*((l+1)-(f))+(f))
For x As Long=0 To xres Step 16
For y As Long=0 To yres Step 24
Draw String i,(x,y),Chr(intrange(33,126)),,g(intrange(1,5))
Next
Next
Dim As String s=String(24,0)
For n As Long=0 To Len(s)-1
Read s[n]
Next
Dim As Long k,fps
Do
k-=3
Screenlock
Cls
Put(0,0),i,trans
Draw String(20,20),"Framerate = "&fps,,speed
Draw String(k,300),s,,msg
Draw String(k+900,300),s,,msg
If k<-900 Then k=0
Screenunlock
Sleep regulate(60,fps),1
Loop Until Len(Inkey)
Data 72,101,39,115,32,76,105,110,115,117,120,32,100,105,110,103,45,97,45,108,105,110,103,46
imagedestroy i
screen 0
Last edited by dodicat on May 22, 2019 23:00, edited 1 time in total.
Re: Wiindows 10
If that code is meant to run on Linux, then use double for timer variables :-pdodicat wrote:Might as well be on 1809 goatskin for all the good it is.Code: Select all
...
Re: Wiindows 10
Donebadidea wrote:If that code is meant to run on Linux, then use double for timer variables :-pdodicat wrote:Might as well be on 1809 goatskin for all the good it is.Code: Select all
...
It is a bit jumpy here on Linux.
Re: Wiindows 10
I have been running Windows 10 in a VM for years now and it works great, my only complaint is that my Mac uses the function keys and are therefore not available on Windows, sometimes that can be a hindrance.
today, inspired by a youtube video I installed Windows 10 1903 x64 on an external USB drive, and I am surprised at how well it works, sure disk access is going to be slower, but this version of Windows when clean installed, is a pleasant experience.
today, inspired by a youtube video I installed Windows 10 1903 x64 on an external USB drive, and I am surprised at how well it works, sure disk access is going to be slower, but this version of Windows when clean installed, is a pleasant experience.
Re: Wiindows 10
does anyone use Windows Image Backup? https://www.windowscentral.com/how-make ... windows-10
I do and it works great, I was a bit nervous doing a restore because it formats the drive but the nervous part is that you need to check all the drives to exclude, but it worked and a 65 GB restore took only about 5 minutes
I do and it works great, I was a bit nervous doing a restore because it formats the drive but the nervous part is that you need to check all the drives to exclude, but it worked and a 65 GB restore took only about 5 minutes
-
- Posts: 4310
- Joined: Jan 02, 2017 0:34
- Location: UK
- Contact:
Re: Wiindows 10
I use ToDo Backup. It wakes my Sleeping PC at 04:00. I use the lowest level of compression converting 45GB to 24GB taking just over three minutes for a full system backup. Restore takes about 12 minutes. If Windows 10 is completely crippled I shut down, stick in a recovery flash drive and power up. I have the last seven backups on an external SSD.
I have the Home version with lifetime upgrades but there is a free version; it does not do scheduling. Easeus have over ten million customers including Microsoft, IBM and NASA. They have some Black Friday deals on at the moment, just less than four days left.
I have now lost count on the number of times I have had to restore Windows 10 since it first came out.
A friend of mine uses ToDo Backup with 160Gb to back up. His machine is receiving data from the internet 24/7 but, like me, his backup is done in the early hours when he is asleep. He backs up to a 1TB external HDD, and he too has had to restore Windows 10 a few times since it came out. Windows 10 may be Microsoft's best to date but it is not as robust as Windows 7.
What amazes me is the number of people who do not backup their PC - it is so easy nowadays.
I have the Home version with lifetime upgrades but there is a free version; it does not do scheduling. Easeus have over ten million customers including Microsoft, IBM and NASA. They have some Black Friday deals on at the moment, just less than four days left.
I have now lost count on the number of times I have had to restore Windows 10 since it first came out.
A friend of mine uses ToDo Backup with 160Gb to back up. His machine is receiving data from the internet 24/7 but, like me, his backup is done in the early hours when he is asleep. He backs up to a 1TB external HDD, and he too has had to restore Windows 10 a few times since it came out. Windows 10 may be Microsoft's best to date but it is not as robust as Windows 7.
What amazes me is the number of people who do not backup their PC - it is so easy nowadays.
Re: Wiindows 10
How do you cripple a Windows 10?
The Windows 10 install I run, started life as an OEM Windows 8.0, though relatively late (just a few months before 8.1 came out)
Slowly I'm thinking a reinstall would be good (and a new SSD, since this one is from 2013), but that is more precaution than necessary.
And this is my primary workstation, seeing every day action.
The Windows 10 install I run, started life as an OEM Windows 8.0, though relatively late (just a few months before 8.1 came out)
Slowly I'm thinking a reinstall would be good (and a new SSD, since this one is from 2013), but that is more precaution than necessary.
And this is my primary workstation, seeing every day action.
Re: Wiindows 10
@deltarho[1859]
thanks for the suggestion, will a system backup also backup installed applications?
thanks for the suggestion, will a system backup also backup installed applications?