Inlägg

Inlägg som S-MAX har skrivit i forumet
Av S-MAX

Kan rekommendera Trygg-Hansa. Har själv företagsförsäkringen där, inklusive Ansvarsförsäkring (10 000 000 kr), Tjänstereseförsäkring, Olycksfallsförsäkring mm mm. Bra pris också, inget att bråka om (för ett företag).
Edit: Kan tillägga att jag jobbar mot internationella kunder som inte har haft synpunkter på försäkringen.

Av S-MAX

Jag älskar Amazon Photos...har använt den ett par år!
Riktigt kul att kika igenom vilka bilder man har tagit just denna dag, för flera år tillbaka.

Kan bara rekommendera den tänsten. Jag betalar ju för den dock, har inte fått den via Prime.

Av S-MAX
Skrivet av Nucky:

Hittade lösningen på Reddit. Sjukt. Var tvungen att ändra språket på min XSX och plats till English, US, US. Starta om Xbox och därefter funka det.

Jag löste det genom att i spelets huvudmenyn trycka på start (tre liggande linjer knappen), därefter Y för att sedan ladda ner ett språk-pack för Engelska.
Lite krångligt kan man tycka.

Bra spel dock!

Av S-MAX

Vet inte om det skulle vara något för dig, men jag gjorde för ett tag sen ett enkelt python skript som jag mappade till en tangentbordskombination. Programmet översatte det jag hade i clipboard med google-translate och ersatte clipboard med översättningen.

Det skulle nog enkelt gå att mappa ett par python script som gjorde liknande.
Använde förövrigt Automator för själva key-mappningen om jag inte minns fel.

Det borde ju inte följa med till dina virtuella maskiner kan man tycka.

Av S-MAX

Måste säga att VR läget är riktigt bra! Har börjat flyga plan som jag aldrig flög innan, exempelvis Pitts eller Cub'en. Man upptäcker detaljer i cockpit som jag aldrig hade sett innan. Sen slås man över hur små en del plan är, exempelvis en Pitts.

Av S-MAX
Skrivet av Larsp777:

Nej, jag menar mer att veta var man är som i Google Maps t.ex.

Startade en flygning men var osäker om jag var på rätt väg. Så jag ville veta var jag var.

Det finns en inbyggd karta i spelet - VFR map. Det är inte Google Maps nivå på den (långt ifrån) men den ger en fingervisning iallafall. Såg att det finns moddar som gör kartan bättre, exempelvis denna: https://www.msfsaddons.org/freeware/plugin-vfrmap
Har dock inte provat den själv.

Av S-MAX
Skrivet av BigMomma:

Lösningen går ut på att hitta sekvenser av adaptrar med 1 jolt skillnad. För varje sådan sekvens räknar man ut hur många variationer som finns för den sekvensen, och multiplicerar detta med totalsumman.
De steg som ökar med 3 måste tas med i den ordningen de står. De kan bara arrangeras på ett sätt och kan ignoreras i uträkningen (eftersom beräkningen skulle bli att multiplicera totalsumman med 1). I min lösning används de stegen för att markera slutet på en sekvens med 1 jolt-steg.

Loopen går igenom alla adaptrar i listan och stegar upp en räknare när skillnaden mot föregående adapter är 1 jolt.
När ett steg inte är 1 jolt (det är alltid 1 eller 3 jolt) har vi nått slutet på en sekvens och kan beräkna antalet möjliga variationer för den. Efter uträkningen återställs räknaren och börjar räkna på nästa sekvens.

Om det ser ut så här i listan: 10, 13, 14, 15, 18
Då är 13, 14, 15 en sekvens av 1 jolt steg.

sekvenser med 1 eller 2 adaptrar kan bara arrangeras på ett sätt och kan ignoreras.

Om det är 3 adaptrar i sekvensen kan de arrangeras på två sätt.
10, 13, 14, 15, 18
10, 13, 15, 18

4 adaptrar kan arrangeras på 4 olika sätt så här:
10, 13, 14, 15, 16, 19
10, 13, 14, 16, 19
10, 13, 15, 16, 19
10, 13, 16, 19

Och 5 adaptrar kan arrangeras på 7 olika sätt.

Jag hade ingen sekvens med fler än 5 adaptrar i min input, så jag har inte lagt till någon kod för det.

Dold text

Tack, grymt bra förklarat!

Av S-MAX
Skrivet av BigMomma:

Dag: 10
Språk: VB.Net

Imports System.IO Module Program Sub Main(args As String()) Dim adapters As New List(Of Integer) adapters.Add(0) For Each line In File.ReadAllLines("input.txt") If Not String.IsNullOrWhiteSpace(line) Then adapters.Add(Integer.Parse(line)) Next adapters.Sort() adapters.Add(adapters.Last() + 3) Console.WriteLine("Part One: " & PartOne(adapters).ToString()) Console.WriteLine("Part Two: " & PartTwo(adapters).ToString()) End Sub Function PartOne(adapters As List(Of Integer)) As Integer Dim ones As Integer = 0 Dim threes As Integer = 0 For i = 0 To adapters.Count - 2 If adapters(i + 1) - adapters(i) = 1 Then ones += 1 If adapters(i + 1) - adapters(i) = 3 Then threes += 1 Next Return ones * threes End Function Function PartTwo(adapters As List(Of Integer)) As Long Dim total As Long = 1 Dim index As Integer = 0 Dim counter As Integer = 1 While index < adapters.Count - 1 If adapters(index + 1) - adapters(index) = 1 Then counter += 1 Else If counter = 3 Then total *= 2 If counter = 4 Then total *= 4 If counter = 5 Then total *= 7 counter = 1 End If index += 1 End While Return total End Function End Module

Dold text

Har suttit ett bra tag med del 2, och jag måste säga att din lösning ser riktigt elegant ut. Kan du inte förklara logiken bakom, förstår inte trots att jag ser facit i din kod.

Av S-MAX

Ja, det gör den.

Av S-MAX

Funkar för mig.

Av S-MAX

Vendor verkar vara ATI där med. Device var svårare, så det kan vara lite olika. Device 439 verkar ju ge det här svaret:

0x4390 Integrated SATA II Controller 0x1002 ATI Technologies Inc. / Advanced Micro Devices, Inc.

0x4391 AHCI Controller 0x1002 ATI Technologies Inc. / Advanced Micro Devices, Inc.

0x4392 Raid Controller 0x1002 ATI Technologies Inc. / Advanced Micro Devices, Inc.

0x4393 AHCI/Raid Controller 0x1002 ATI Technologies Inc. / Advanced Micro Devices, Inc.

0x439C PATA 133 Controller 0x1002 ATI Technologies Inc. / Advanced Micro Devices, Inc.

Du verkar ha 0x439D, som tyvärr inte var med i listan... Kan vara en senare revision av PATA 133 Controller från ATI.

Gå in på ATI´s hemsida och sök på PATA 133, ren chansning...
EDIT: Kan vara värt att leda efter drivrutiner till moderkort om dom inte är inlästa.

Av S-MAX

Ja, klistra in texten så kanske jag kan hjälpa dig.

Av S-MAX

Enklast är att gå in på http://keepvid.com/
Klistra in youtube länken, tryck download.
Bränn därefter ner på CD med lämpligt program, alternativt direkt i Windows.

Av S-MAX

Välj aktivitetshanteraren, högerklicka på ditt okända objekt.
Välj properties och därefter fliken details. Leta efter information som liknar denna:
PCI\VEN_1002&DEV_439D&SUBSYS_43831002&REV_00\3&267a616a&0&A3
Jag kör Windows 7 och väljer Parent. Har för mig att det syns direkt under details i XP.

Gå sedan in på sidan:
http://www.pcidatabase.com/

Knappa in Vendor och device från informationen ovan, i mitt fall
Vendor: 1002
Device: 4383
Man kan få prova lite olika värden om det är otydligt, sedan search.
I mitt fall var det: ADI HD Audio från ATI Technologies Inc. / Advanced Micro Devices, Inc..

Sedan är det bara att leta drivrutiner.

Hoppas det hjälper!