wyfinger

Основная доска

2020 или ранее

Рей Брэдбери — 451 градус по Фаренгейту

Алон Гук — Мой Западный берег. Записки бойца израильского спецназа

Антуан де Сент-Экзюпери — Маленький принц

So, if you need to convert BGR (as $00BBGGRR) color to RGB (as $00RRGGBB) you can extract individual bytes of color and combine it. But let's do it without additional variables, as brain training.

Var 1: assembler

BSWAP - that's almost what we need. This command swap $AABBCCDD to $DDCCBBAA, later we can shift bytes right.

mov eax,AABBCC

bswap eax ; EAX = CCBBAA00

	// ==UserScript==
	// @name die fuckers
	// @namespace http://tampermonkey.net/
	// @version 0.1
	// @description disable some fucking events
	// @author wyfinger
	// @match :///*
	// @run-at document-end
	// @grant none
	// ==/UserScript==

	Public Sub ExtractCommentsToNewDoc()

	'=========================
	'Macro created 2007 by Lene Fredborg, DocTools - www.thedoctools.com
	'Revised October 2013 by Lene Fredborg: Date column added to extract
	'THIS MACRO IS COPYRIGHT. YOU ARE WELCOME TO USE THE MACRO BUT YOU MUST KEEP THE LINE ABOVE.
	'YOU ARE NOT ALLOWED TO PUBLISH THE MACRO AS YOUR OWN, IN WHOLE OR IN PART.
	'=========================
	'The macro creates a new document
	'and extracts all comments from the active document

	Sub EditComment()
	If ActiveDocument.Comments.Count = 0 Then Exit Sub
	For i = 1 To ActiveDocument.Comments.Count
	If (Selection.Start >= ActiveDocument.Comments(i).Scope.Start) And _
	(Selection.Start <= ActiveDocument.Comments(i).Scope.End) Then
	ActiveDocument.Comments(i).Author = InputBox(ActiveDocument.Comments(i).Author _
	& vbCrLf & vbCrLf & ActiveDocument.Comments(i).Range.Text, "Author", ActiveDocument.Comments(i).Author)
	End If
	Next
	End Sub

	// ==UserScript==
	// @name ED Helper
	// @version 0.1
	// @description ED Help to Examine
	// @author Igor Matveev [email protected]
	// @match *ED TEST SITE*
	// @include *ED TEST SITE*
	// @grant none
	// run-at document-end
	// ==/UserScript==

	VERSION 5.00
	Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} HyperlinkCheckForm
	Caption = "Hyperlink"
	ClientHeight = 1260
	ClientLeft = 120
	ClientTop = 450
	ClientWidth = 17070
	OleObjectBlob = "HyperlinkCheckForm.frx":0000
	StartUpPosition = 2 'CenterScreen
	End

	day=308; # day of year
	longitude=131.9551; # lonDegree + lonMinutes/60 + lonSeconds/3600
	latitude=43.1096; # latDegree + latMinutes/60 + latSeconds/3600
	zenith=90.8; # angle of sunrise or sunset, with correction by the interference of light in the atmosphere

	# sunrise calculation
	lngHour = longitude / 15;
	trise = day + ((6-lngHour)/24);
	Mrise = (0.9856*trise)-3.289;
	Lrise = Mrise+(1.916sin(piMrise/180))+(0.020sin(2pi*Mrise/180))+282.634;

	many many many
	...
	2020-01-08 Masters of Doom, David Kushner