Pitch karanlık (Dünya Saati anma)

31

Amacınız basittir: Program bilgisayarınızın ekranını tamamen siyah hale getirmelidir .

Program başlatıldıktan sonra, ekran hızlı bir şekilde tamamen siyaha dönmeli ve programdan çıkılana kadar (herhangi bir tuş veya alt + F4, fare hareketi vb.) Devam etmeli, ardından işler normale dönmelidir. Bu yüzden bilgisayarı kapatmak veya monitörün gücünü kapatmak yasaktır . Bu süre zarfında siyah olmayan bir pikselin görünmemesi, yanıp sönen bir imleç bile görülmemesi gerekir.

Kullanıcı herhangi bir hazırlık yapmamalıdır (fareyi ekran dışına hareket ettirmek, kabloları çıkarmak vb. Veya program başladıktan sonra kullanıcı girişi), sadece programı başlatmanız yeterlidir.

Bilgisayarda yalnızca bir monitörün bağlı olduğunu güvenle kabul edebilirsiniz. Ayrıca standart bir masaüstü veya dizüstü bilgisayar olduğunu varsayıyoruz, çünkü normal bir monitör olmadan belirli bir cihazda yapmak çok basit olurdu.

Herhangi bir harici kaynak (siyah bir resim, bir GUI dosyası vb.) Kullanırsanız, bayt cinsinden boyutları kod boyutunuza eklenir.

Yalnızca bir işletim sistemi ailesi üzerinde çalışıyorsa veya açık vb. Gerektiriyorsa sorun yok, ancak çok özel bir donanım yapılandırması gerektiren kaşlarını çattı.

Kaynak kodunuz programlama dilinde yazılmalıdır, sadece başka bir programın (ekran koruyucu gibi) kullanacağı bir yapılandırma dosyası değil.

code-golf 
— vsz
kaynak
9
Bu, sıkışmış piksellere sahip ekranlarda çalışmaz ...
— Ismael Miguel
21
@ IsmaelMiguel: Mükemmel çalışma koşullarında bir ekranı güvenle kapatabilirsiniz. Aksi takdirde "ALU'mdaki bir transistör yanmışsa ve bilgisayarım kayan nokta matematiği yapamazsa ne olur?" Tarzındaki diğer sorulara itiraz edebiliriz. :)
— vsz
5
Eğlenceli gerçek: Ne CRT ne de dinamik kontrast kullanan ekranlarda bu biraz daha fazla elektrik harcayacak!
— Ry
2
gerçek dünya uygulaması: Astronomi! lists.apple.com/archives/Carbon-dev/2008/May/msg00005.html
— Charles,
2
Tüm cevaplar otomatik olarak diskalifiye edilir - ekranlarımdan birinin kırmızı değeri her zaman 255 olan bir piksele sahip!
— Şapkalı Adam,

Yanıtlar:

22

Bash, 28 veya 12

Ubuntu 12.04 LTS varsayılan kurulumunu varsayarsak.

gnome-screensaver-command -a

Varsayılan olarak siyah ekran olan ekran koruyucuyu otomatik olarak başlatır.

Düzenleme : @Glenn Randers-Pehrson tarafından önerildiği gibi, burada 12 bayt olan biri

/*/*/gn*d -a

Sisteminizde bu adı karşılayan başka bir dosya varsa, bunun işe yaramayabileceğini unutmayın /tmp/1/gnd. Ama bu kod golf, kimin umrunda?

Gnome ekran koruyucusu kullanmıyorsanız diğer bash cevabımı kontrol edin !

— pastebin.com 0mr8spkT eğik çizgi
kaynak
1
Sizi düşündüren türden bir cevap: 'Neden bunu düşünmedim?'. :)
— Alex Thornton
1
Bu aslında bash kullanarak ekranı temizlemiyor.
— Darth Egregious
3
"Kaynak kodunuz bir programlama dilinde yazılmalıdır, sadece başka bir programın (ekran koruyucu gibi) kullanacağı bir yapılandırma dosyasında değil."
— Hannes Karppila
2
@hannes karppila Başka bir programın kullanacağı herhangi bir yapılandırma dosyasını değiştirmedim. Ben sadece bash scriptlerinin çoğunun yaptığı (saf
— bashta yazılmadığı
5
@ace, Golfed: / * / * / gn * d yerine gnome-screensaver-command yaklaşık 16 bayt kazandıracak (mniip tarafından fikir)
— Glenn Randers-Pehrson
31

Montaj (önyükleyici) 131 karakter / 512 bayt derlendi (aslında daha küçük, ancak önyükleyici 512 bayt uzunluğunda olmalı.)

Bu basit bir önyükleyici. Bilgisayar başladığında, BIOS onu diskten yükler (disket). Sonra grafik moduna geçer ve sadece kilitlenir. Kullanıcı güç düğmesine bastığında, program sona erecek ve bilgisayar programı çalıştırmadan önce olduğu moda girecektir.

VirtualBox ile test edilmiştir.

Nasm ile derlenecek:

nasm -f bin file.asm -o start.img

Kaynak kodu:

[BITS 16]
[ORG 0x7C00]
cli
mov AX,0x0
mov SS,AX
mov SP,0x9000
sti
mov AH,0x0
mov AL,0x13
int 0x10
times 510 - ($-$$) db 0
dw 0xAA55
— Hannes Karppila
kaynak
1
VirtualBox'da nasıl çalıştırılır: (nasm kullanarak derleyin), yeni VM, Tür: Diğer, sürüm: Diğer / Bilinmeyen, sabit sürücü yok. Ardından, VM'nin ayarlarına gidin, Depolama'yı seçin, listeye sağ tıklayın ve "Disket Denetleyici Ekle" yi seçin. Derlenmiş img dosyasını disket sürücüye takın. Kaydet ve sonra onu çalıştırabilirsin. Keyfini çıkarın!
— Zach Mertes
Aynı şeyi dos programında da yapmak istedim, ama sen daha hızlıydın. Temelde waaay geri montajcı hatırlıyorum tek şey :)
— Fels
Nasıl çalıştığını açıklayabilir misiniz?
— Mega Man
Neden clive sti? SSBir sonraki talimatın süresi için kesintileri otomatik olarak devre dışı bırakmak için hareket eder ve AXdaha önce bir kesinti olursa değiştirilmez MOV SS,AX. Ayrıca, neden MOV AX, 0x13iki MOVsaniye yerine ?
— Ruslan,
Küçükken, kodun nasıl düzgün yazılacağını bilmiyordum. Şu an muhtemelen beni de bilmiyor.
— Hannes Karppila,
14

Java: 165

Basit Java, sadece tam ekran siyah bir çerçeve oluşturur. Çıkmak için Alt + Tab tuşlarına geri dönün ve konsola geri dönün, Ctrl-C, ama bu yeterince basit görünüyor.

import java.awt.*;class B{public static void main(String[]a){Frame f=new Frame();f.setExtendedState(6);f.setUndecorated(1>0);f.setBackground(Color.BLACK);f.show();}}

// line breaks below

import java.awt.*;
class B{
    public static void main(String[]a){
        Frame f=new Frame();
        f.setExtendedState(6);
        f.setUndecorated(1>0);
        f.setBackground(Color.BLACK);
        f.show();
    }
}
— Geobits
kaynak
11

Applesoft] [TEMEL (17)

1 HGR2:GET X:TEXT
— Geoff Reedy
kaynak
Bunun aslında 17 bayt olduğunu sanmıyorum ... Daha az olabileceğini düşünüyorum. Doğru hatırlıyorsam, Applesoft anahtar kelimelerini belirledi, böylece her bir anahtar kelime aslında bir bayt oldu, bu yüzden bu daha kısa olabilir. Her iki şekilde de +1.
— Beska
11

Bash - 57 26

C=/s*/*/*/*/b*ess;(A=$(cat $C);echo 0;cat;echo $A)|tee $C

Bir dizüstü bilgisayarda bu, ekranın arka plan parlaklığını 0'a /sys/class/backlight, bir tablet veya telefona ekranın parlaklığını 0'a ayarlar./sys/class/leds

— mniip
kaynak
2
“Ve programdan çıkılana kadar (herhangi bir tuş veya alt + F4, fare hareketi vb.)
— Böyle devam edin
1
Fn+F6, Fn+<up arrow>Ve diğer birçok tuş kombinasyonları "Herhangi tuşu" ve "vb" düşmek ve bu olduğu gibi hafif geri koymak için birçok biridir.
— Ismael Miguel,
1
@ minitech Oh. Peki, düzeltildi ...
— mniip
Bu benim için hiç çalışmıyor. "C = / s * / * / * / * / b ess; (A = $ (cat $ C); echo 0; cat; echo $ A) | tee $ C" : / s * / * / * / * / b ess: Böyle bir dosya veya dizin yok tee: / s * / * / * / * / b * ess: Böyle bir dosya veya dizin yok
@Lembik Herhangi bir parlaklık kontrol cihazınızın olmadığını veya mevcut sürücülerin sürücü olmadığını kabul ediyorum. Yapmayı düşünür müsün find /sys/class/{backlight,leds}/*/?
— mniip
8

Bunun kod golf olduğunu biliyorum ama dayanamadım.

Tarayıcı pencerelerinin açık olmadığından emin olun (bu durumda, Chrome);

Bu PitchBlack.bat komutunu yürütün ( 31 24 bayt) :

chrome --kiosk file:///1

Chrome.exe dosyanızın aynı dizinine yerleştirilirse , bu toplu işlem kiosk modunda Chrome'u yürütecek ve tam ekran olarak / 1 ( 49 41 34 bayt) adlı bir dosyayı açacaktır :

<body bgcolor=0 style=cursor:none>

Et voilà!

Toplam bayt sayısı: 80 72 58
@ace :) sayesinde

Programdan çıkmak için klasik bir ALT + F4 ; Aslında program başladıktan sonra herhangi bir hazırlık yapmanıza gerek yoktur (daha önce, sadece yerleştirmek /1ve toplu iş dosyası yapmak zorunda değilsiniz ), bu nedenle kurallara uygun değil.

Lütfen imlecinizi ekran kenarlıklarına götürürseniz görülebilir olabileceğini unutmayın . OP, buna izin verilmediğini söylemedi.

Program başlatıldıktan sonra, ekran hızlı bir şekilde tamamen siyaha dönmeli ve programdan çıkılana kadar (herhangi bir tuş veya alt + F4, fare hareketi vb.) Devam etmeli, ardından işler normale dönmelidir.

Yani bu tamamen iyi olmalı! : P

— Vereos
kaynak
1
Belki bir şey chrome --kiosk 'data:text/html,<style>body{background:#000;cursor:none;}</style>'ek dosya olmadan çalışabilir?
— Vi.
file:Shceme kullanırken görünürde hiçbir URL çubuğu göremezsiniz, ancak data:şemada URL çubuğu var mı?
— Vi.
Sistemimde chromium-browser --kiosk 'data:text/html,<style>body{background:#000;cursor:none;}</style>neredeyse hiçbir tam ekran Chromium ile siyah sayfa çubuksuz olarak başlar.
— Vi.
Ubuntu ve Chromium 34.0'da test edildi file:///1, html olarak kaydedildiyse /1ve html dosyası kısaltılabiliyorsa <body bgcolor=0 style=cursor:none>
— işe yarıyor
1
chromeCevabınızı yerine kullanmanız gerektiğini düşünüyorumchromium
— pastebin.com slash 0mr8spkT
7

C # - 211 202 200 196 179 bayt

using System.Windows.Forms;class A{static void Main(){Cursor.Hide();new Form{BackColor=System.Drawing.Color.Black,WindowState=(FormWindowState)2,FormBorderStyle=0}.ShowDialog();}}

İmleci gizler ve tam ekran siyah bir pencere gösterir. Alt+ İle kapatılabilirF4

Golf edilmemiş kod :

using System.Windows.Forms;
class A
{
    static void Main()
    {
        Cursor.Hide();
        new Form
        {
            BackColor = System.Drawing.Color.Black,
            WindowState = (FormWindowState)2, // FormWindowState.Maximized
            FormBorderStyle = 0 // FormBorderStyle.None
        }.ShowDialog();
    }
}

Oyuncuma ihtiyacım yok FormBorderStyle, çünkü tamsayı ise gerekli değil 0.

— ProgramFOX
kaynak
2
Sen değiştirebilir System.Drawing.Color.Black, FormWindowState.Maximized, FormWindowState.Maximizedve FormBorderStyle.Nonebunlara karşılık gelen değerler ile.
— Ismael Miguel,
@IsmaelMiguel: Teşekkürler, FormWindowState ve FormBorderStyle! I güncelledim! Rengi güncelleyemedim, çünkü bu bir numara değil.
— ProgramFOX
Dene Color.Black. Hemen çalışması gerekir. Veya BackColor=This.ForeColor, hangi MIGHT da çalışır.
— Ismael Miguel,
@IsmaelMiguel: İlki eklemediğim için işe yaramadı using System.Drawing;, ikincisi de işe yaramadı çünkü değişken değerleri parantez içine ayarladım.
— ProgramFOX
using System;O zaman dene new Windows.Forms.Formve BackColor=Drawing.Color.Black. Bu OLABİLİR çalışmak! Ve birkaç bayttan tasarruf edin.
— Ismael Miguel,
5

C # 175 171 167

class P{static void Main(){SendMessage(65535,274,61808,2);}[System.Runtime.InteropServices.DllImport("user32")]static extern int SendMessage(int a,int b,int c,int d);}

Buradaki cevapların çoğu ekranı gerçekten siyah yapmıyor : LCD ekranda, arka ışık açık kalıyor ve sizi karanlık bir gri bırakarak akıyor.

Bu küçük pasaj aslında Windows'a, ekranın kapanmamasını, hareketsizlik zamanlayıcısının yaptığı ile aynı şekilde uyarır. (Not: bu "kapanma yok" kuralını ihlal etmez, çünkü ekranın gerçekten beklemede kalmasına neden olur. Çoğu monitör Girdi devam ettiğinde tekrar aç. Ayrıca, bu kuralın amacı programın tekrar açabileceğinden emin olmak gibi görünüyor - aşağıya bakınız.)

Ekranı tekrar açmak için fareyi hareket ettirin veya bir tuşa basın.

Https://stackoverflow.com/a/713519/1030702 adresinden uyarlanan gücü kapatın

— şilin
kaynak
“Öyleyse bilgisayarı kapatmak ya da monitörün gücünü kapatmak yasaktır .”
— Ismael Miguel,
1
@IsmaelMiguel Gerekçemi verdim. "programdan çıkılana kadar (herhangi bir tuş veya alt + F4, fare hareketi vb.), bundan sonra işler normale dönmelidir. Böylece kapatılıyor ..." - kuralın amacı yerine getirildi. Bu "tekrar açılacaktır". Niyeti bir kenara bırakmak , Microsoft'un terminolojisine rağmen, bunun gerçekten onu durdurmadığı (projektörlerde zaman aşımları vb.) Bekleme durumuna alması nedeniyle, kelimenin tam anlamını da doğrular .
— Bob,
4

Amiga derlemesi

ASM-Bir - 228 219 karakter, 172 bayt derlendi (optimize edilmiş 168 bayt)

Amiga meclisinde en son tek bir satır kodladığımdan bu yana 20 yıl geçti, o yüzden benimle ayı. :-)

Amiga, boş bir ekran ayarlamak için PC'den biraz daha fazla ilgileniyordu, bu yüzden olabildiğince çok kurulum ve yırtma işleminden kurtulmaya çalıştı. Kesintiler veya çoklu görevler devre dışı bırakılmaz; çift ​​WaitTOF yok; görünüm değiştirme yok; vb. Bunu en hızlı ve en kirli demo için bile yazmazdım. Bunun anlamı:

  • kötü bir uygulama
  • tamamen güvenli olmayabilir
  • her zaman çalışmayabilir
  • bu feragatnamelerde bile, muhtemelen 20 yıllık ihmal edilmiş meclis nedeniyle aptalca hatalar var.

... öyleyse de öyleyse A500 ve A1200 taklitlerinde, hızlı hafızası olan veya olmayanlar üzerinde test edilmiştir. Standart bir çalıştırılabilir derler. Fare tıklaması çıkar.

l=$dff080
 move.l 4,a6
 lea g,a1
 jsr -408(a6)
 move.l d0,a1
 move.l 38(a1),d4
 jsr -412(a6)
 move.l #c,l
w:btst #6,$bfe001
 bne w
 move.l d4,l
 rts
g:dc.b "graphics.library",0
 SECTION d,DATA_C
c:dc 256,512,384,0,-1,-2

Daha az golf oynadı:

COP1LC equ $dff080

    move.l  $4, a6          ; ExecBase
    lea     gfxname, a1
    jsr     -408(a6)        ; OpenLibrary (old, hence no need for clearing d0)
    move.l  d0, a1
    move.l  38(a1), d4      ; store copper list
    jsr     -414(a6)        ; CloseLibrary
                            ; Yeah, if I had a penny for the times I saw that left out
                            ; but I just... can't...

    move.l  #copper,COP1LC  ; write copper list

wait:
    btst    #6, $bfe001     ; Check mouse click
    bne     wait

    move.l  d4, COP1LC      ; restore copper list
    rts

gfxname:
    dc.b    "graphics.library", 0

    SECTION data, DATA_C
copper:
    dc.w $0100, $0200       ; disable bitplanes
    dc.w $0180, $0000       ; color 0 = black
    dc.w $ffff, $fffe       ; end
— JimmiTh
kaynak
1
Aaaah, anılar! Sevdim!
— RobIII
Evet, bu bir nostalji gezisi için kod golfündeki gerçek bir girişimden ziyade bir bahaneydi - Amiga meclisi karakter sayımı açısından nadiren Perl veya Python ile yarışacak. Biraz şaşırmış olmama rağmen C # ya da Java'yı geçemedi. :)
— JimmiTh
4

Python / Pygame 199 127 125 92

from pygame import*;display.set_mode((9,9),-1<<31);mouse.set_visible(0)
while 1:event.pump()

As'ın bazı önerileri sayesinde.

— Harry Beadle
kaynak
ALT + F4 sayıldığından, aynı zamanda ^ C sayımı da alırdım, böylece sonunda bir çok baytı atlayabilirsiniz.
— '.
1
^ C'nin çalışması için terminale odaklanmanız gerekir ve programda pygame penceresi her zaman pygame nedeniyle odaklanır. İşletim sisteminiz bir şeylerin yanlış olduğunu fark ediyor.
— Harry Beadle
Bunun from pygame import*yerine bazı baytları kaydedebilirsiniz . Ayrıca, fill((0,0,0))varsayılan renk siyah olduğu için gerekli olduğunu sanmıyorum . O zaman stamamen kaldırabilirsiniz . Ben de display.flip()gerekli olduğunu sanmıyorum . Ayrıca, girinti için bir boşluk kullanmak yerine 4 tane daha alan kazanabilirsiniz. Son olarak, ( FULLSCREENve - 147483648) ve sırasıyla KEYDOWNsayısal değerlerini kullanabilirsiniz . -1<<312
— pastebin.com 0mr8spkT 'i
4

TI-BASIC, 7 6

Shade(Ymin,Ymax

Hem terminalde (ana ekran) hem de program olarak çalışır. ONVeya diğer birçok tuşa basmak terminal / ana ekrana döner.

— Timtech
kaynak
Bir bayt daha küçük olabilir (ve grafik ekran penceresi değişse bile çalışır) Shade(Ymin,Ymax.
— lirtosiast
@ThomasKwa Haklısın, bahşiş için teşekkürler!
— Timtech
3

Commodore 64 (16 bayt)

ROL $A903
BRK
STA $D020
STA $D011
JSR $FF8A
JMP ($032C)

Turbo Assembler'ı kullandığımdan bu yana 20 yıldan fazla bir süre geçti, bu yüzden yalnızca VICE monitöründe kullanmak için kaynak sağlayabiliyorum. Bunu 032C $ 'dan ve save[1] - 033B $' dan toplayın . Resetve LOAD"PITCHDARK",8,1. Normale Runstop+Restoredönmek için iyi ol ' [2]' e basın.

O nasıl çalışır?

İşte gerçek kaynak:

032C 2E 03      .BY 2E 03
032E A9 00      LDA #$00
0330 8D 20 D0   STA $D020   ; set border color  
0333 8D 11 D0   STA $D011   ; set VIC blanking mode
0336 20 15 FD   JSR $FF8A   ; reset the vectors we trampled
0339 6C 2C 03   JMP ($032C) ; call the real CLALL

$ 032C, çekirdek CLALL veya "Tüm Kanalları ve Dosyaları Kapatın" vektörüdür. Temizliğinin bir parçası olarak, BASIC LOADkomutu CLRbunun için bir çağrı yapar CLALL. CLALLVektörden hemen sonra vektörü bir işaretçiyle kendi rutininize değiştiririz . Sınırı siyaha RESTORçevirip ekranı sınırla kapattık ve sonra $ FF8A’yı çağırıyoruz. Yerine geçen vektör RESTORolan SAVEson 8 bayt rahatsız oldukları anlamına gelir $ 0332-0333 de. Daha sonra, yürütmeye CLALLdevam etmek için geri yüklenen vektör üzerinden LOADçıkıyoruz.

Bunun için teşekkürler, hafıza şeridinde eğlenceli bir gezi oldu, nasıl bir otomatik çalışma programı yapılacağını öğrendi :)

[1] kaydetme ve bsave kullanmayın, böylece yük, 1 düzgün çalışır
[2] muhtemelen x64'te Escape + PageUp.

— yılan balığı gözleri var
kaynak
3

Arch Linux'taki sh / X11, 26

b=/b*/*ht;$b =0;read;$b =7
— Ry-
kaynak
Muhtemelen birkaç takma adı bir takma adla tıraş edebilirsiniz ve belki -sether ikisini de kullanabilirsiniz
— ardnew
1
Kullanım xbacklight = 0ve xbacklight + 7.
— bb010g
1
29 bayt:x=xbacklight;$x +0;read;$x +7
— nyuszika7h
@ nyuszika7h: Teşekkürler! (28'e de
— aldım
3

Bash, 37

Kullanımları unclutterfare işaretçisi ve bir tam ekran oturumu gizlemek için xtermsiyah ekrana. İmleç hareket ettirirseniz bir an için tekrar belirir, ancak onu yalnız bırakırsanız Ctrl + C tuşlarına basana kadar ekran siyah olacaktır.

Fare imlecinin kaybolması birkaç saniye sürer (hareket ettirmediğiniz sürece). Bu yeterince hızlı değilse, ek 6 karakter için -grabseçeneği ekleyin unclutter.

unclutter&xterm -fu -bg black -e yes ''

UYARI: Bu işlem, unclutterCtrl + C tuşlarına bastıktan sonra bile çalışmasını killall unclutterdurdurur , durdurmak için kullanın .

açıklama

unclutter &başlattı unclutter. &Orada bunun yerine sonlandırmak için bu bekliyor sonraki komutla ilgili alabilirsiniz.

xterm -fullscreen varsayılan olarak arka planı siyah olan XTerm'i başlatır.

Bu -e yes ''seçenek, XTerm'in çalışmasına neden yes ''olarak boş dizgiyi sonsuza kadar yazdırır. Bu, terminal imlecini gizlemeye yarar ve ayrıca Ctrl + C işlevselliğini sağlar.

Sistemimde ekran tamamen beyazlaşıyor.
— Vi.
@Vi. Bu, XTerm arka plan renginizin beyaz olduğu anlamına gelir.
"-Fullscreen" i "-fu" olarak kısaltabilir ve kullanıcı tercihlerinden bağımsız olarak siyah arka plan rengini zorlamak için "-bg black" kullanabilirsiniz.
— yarı ekstrinsik
&2 bayt kaydetmek için etrafındaki boşlukları kaldırabilirsiniz .
— nyuszika7h
3

Bash, 31 (veya 52)

Bir TTY'de, aşağıdaki betiği kullanın (varsayılan TTY arka planınızın siyah olduğu varsayımıyla, en azından Ubuntu 12.04 LTS için geçerlidir):

setterm -foreground black
clear

TTY'niz bu betiği kullandıktan sonra bile tam olarak çalışır durumda :)

Buna izin verilmiyorsa, aşağıdakileri kullanın (52 bayt):

x='setterm -foreground'
$x black
clear
read
$x white

Ve Enterbetiği sonlandırmak için tuşuna basın .

@ Nyuszika7h'ye özel teşekkürler.

— pastebin.com 0mr8spkT eğik çizgi
kaynak
1
İkinci durum için: x='setterm -foreground';$x black;clear;read;$x white(52 bayt).
— nyuszika7h
2

İşleme, 113

void setup(){noCursor();size(displayWidth, displayHeight);background(0);}boolean sketchFullScreen(){return true;}

Bazı baytları kaydetmek için yukarıdaki kodu draw () komutunun üzerine koymayı denedim, ancak işe yaramadı. Çıkmak için Alt-F4 tuşlarına basın.

— segfaultd
kaynak
2

ZX Spectrum Basic (29 bayt)

1 FOR x=0 TO 255
2 FOR y=0 TO 175
3 PLOT x,y
4 NEXT y
5 NEXT x

Program bittiğinde otomatik olarak silinen siyah pikselleri çizerek ekran üzerinde yinelenir.

ZX Spectrum'un temel sürümü tek baytları komut olarak kullanır ve yeni satırlar kullanmaz, görüntülenen karakterleri sayıyorsanız 61 karakter alırsınız.

— kitcar2000
kaynak
2

Lua + LÖVE (50)

love.mouse.setVisible()love.window.setFullscreen""

Her iki fonksiyonun da bir boolean argümanı alması gerekiyor, ancak bu işe yarıyor.

— Seeker14491
kaynak
2

QBasic, 9 bayt

CLS:SLEEP

CLSSLEEPBir tuşa basılana kadar herhangi bir argüman yürütme yapmadan ekranı temizler .

— steenbergh
kaynak
2

SmileBASIC, 15 bayt

XSCREEN 4
EXEC.

START veya SELECT düğmesine basmak programı sonlandırır.

XSCREEN 4ekran modunu her iki ekranı da kapsayan 320 * 480 görüntü gösterecek şekilde ayarlar. Bu herşeyi temizlemelidir, bu yüzden ACLSgerekli değildir. EXEC.Sürekli yuvaya 0. programı çalıştırarak kod tekrarı yapmak mümkün değildi yapar XSCREEN 4EXEC.doğrudan önce bir numara olamaz çünküE

— 12Me21
kaynak
1

Sinclair BASIC - 28 karakter

BORDER 0:PAPER 0:CLS:PAUSE 0

Sinclair BASIC ile ilgili şey, her bir anahtar kelimenin kendi karakter koduna sahip olmasıydı (bir bayt alarak), bu yüzden aslında boşluklar dahil 13 bayt alacaktır.

— Brian
kaynak
Bu işlem tamamlandıktan sonra ekranı normale döndürür mü?
— kitcar2000
@ kitcar2000 - Bunun hakkında düşünmek, hayır. Muhtemelen en sonunda hızlı ve kirli bir sıfırlama olarak ": NEW"
— Brian
:NEWKomutların bir karakter koleksiyonundan ziyade tek bayt olduğu için sadece 10 bayt (12 ile ) olduğunu düşünüyorum .
— kitcar2000
1

SmileBASIC, 23 bayt

Program START veya SELECT ile zorla öldürülene kadar sonsuza dek çalışır. Bu, her iki ekranı tamamen siyah hale getirerek 3D'yi devre dışı bırakmak için çok ileri gidiyor (bu nedenle O3DS'deki 3D LED'i kapatıyor.)

ACLS:XSCREEN 3@L GOTO@L
— salyangoz_
kaynak
1

Çoğu POSIX uyumlu mermi (en az bashve zsh), 21

Bir tty çalıştırılması gerekiyor

tput civis;clear;read

İlk komut imleci gizler, ikinci komut ekranı temizler (duh) ve üçüncü komut bir metin satırı okur

— therealfarfetchd
kaynak
0

Bash: 48 karakter

eval xrandr\ --output\ DP1\ --{off,auto}\;read\;

CW, çünkü çalışma şekli nedeniyle nitelendirilip nitelendirilmediği belli değil:

  • Üretilen siyah ekran gerçek güç tasarrufu sağlar: 1. görüntüye gönderilen bilgileri keser.
  • Çoğu bilgisayar, sinyal kaybını algıladığında görüntüler, geçici veya periyodik olarak kendi bildirimlerini gösterir.

( DP1'in bağlı ilk ekran olduğunu unutmayın. Dizüstü bilgisayarınız varsa, gömülü ekranı eDP1'dir.)

— manatwork
kaynak
0

Çip-8, 0 bayt

[T] o orijinal Chip-8 tercümanı 0x01FC den çalışmaya başladı. Tercüman bu konumda iki daimi Chip-8 talimatı içerir ve bu program her zaman programın başında yürütülür. Bunlardan ilki, 0x00E0, tüm bitleri sıfıra ayarlayarak ekran RAM'ini temizler. İkincisi, 0x004B, VIP'nin ekranını açan yorumlayıcı içindeki bir makine dili yordamını çağırır.

Kaynak: http://laurencescotford.co.uk/?p=75

— 12Me21
kaynak
Sitemizi kullandığınızda şunları okuyup anladığınızı kabul etmiş olursunuz: Çerez Politikası ve Gizlilik Politikası.
Licensed under cc by-sa 3.0 with attribution required.