ismail
Yeni
- Katılım
- 3 Mar 2007
- Mesajlar
- 20,475
- Tepkime puanı
- 2,063
- Puanları
- 0
- Yaş
- 45
1 Nisan'ın Teknolojik Yüzüne Bakın
Bugün tüm dünyada şakalar günü sayılan 1 Nisan. Herkesin bir birine şaka ve oyun yaptığı bu günde sizde teknoloji yardımıyla arkadaşlarınızla eğlenmek ister misiniz? İşte yöntemler…
Tüm dünyada bir simge haline gelmiş olan 1 Nisan'a sadece bir gün kaldı. İnsanların bir birlerine şakalar yapıp eğlendiği bugün, meslekli esprilerinden önemi artıyor. Her öğretmenin ani sınav şakası yaptığı 1 Nisan teknolojinin gelişmesiyle birlikte çok farklı bir hal aldı.
Artık iş yaşamı ofisler ve bilgiler etrafında döndüğü için, arkadaşınıza şaka yapmanın en iyi yolu bu önemli noktaları kullanmak.
Teknoloji Gözüyle 1 Nisan
Herkesin şakalara karşı pür dikkat olduğu 1 Nisan'da arkadaşınızın bilgisayarınızı programlar ya da bazı ufak ipuçlarını kullanarak bozulmuş gibi gösterebilirsiniz.
Kahve almaya giden arkadaşınızın ekranının değiştirip monitörü kırılmış gibi göstermeniz de mümkün. İşte ofisler ve bilgisayar kullanıcıları için en komik şaka önerileri.
10.Klavye Şakası
1 Nisan'da arkadaşınıza yapabileceğiniz en kolay şaka onun klavyesindeki tuşları değiştirmek. Bunun için sabah ofise biraz daha erken gelmeniz lazım.
Bir tornavida sayesinde klavyeden istediğiniz tuşları söküp yerlerini değiştirebilirsiniz. Ancak bu şaka bazı klavyelerin bir daha çalışmamasına neden olabilir.
Tuşları söküp, onlarla klavye üzerinde istediğiniz cümleleri yazabilirsiniz. Arkadaşınızın adı ya da başka mesajları da böyle vermek mümkün.
9. Kırılmış Ekran Şakası
Arkadaşınıza yapabileceğiniz bir diğer basit şaka ise onun ekranını kırılmış gibi göstermek. Bunu özel bir ekran koruyucu ya da kırılmış ekran resimleriyle yapabilirsiniz.
Arkadaşınız masasından kalktığı zaman ekran koruyucuyu devreye sokarak ekranı kırılmış gibi göstermeniz mümkün.
8.Word'u Hack'leyin
Arkadaşınızın Word ekranına bazı komutlar ekleyip onun ekranında anlamsız yazılar çıkmasını sağlayabilrisiniz. Hack'lendiğini gören arkadaşınız bir süreliğine büyük korku yaşayacak.
Bunun için Word açıkken Alt+F11'e basın ve aşağıdaki kodları ekleyin.
Bugün tüm dünyada şakalar günü sayılan 1 Nisan. Herkesin bir birine şaka ve oyun yaptığı bu günde sizde teknoloji yardımıyla arkadaşlarınızla eğlenmek ister misiniz? İşte yöntemler…
Tüm dünyada bir simge haline gelmiş olan 1 Nisan'a sadece bir gün kaldı. İnsanların bir birlerine şakalar yapıp eğlendiği bugün, meslekli esprilerinden önemi artıyor. Her öğretmenin ani sınav şakası yaptığı 1 Nisan teknolojinin gelişmesiyle birlikte çok farklı bir hal aldı.
Artık iş yaşamı ofisler ve bilgiler etrafında döndüğü için, arkadaşınıza şaka yapmanın en iyi yolu bu önemli noktaları kullanmak.
Teknoloji Gözüyle 1 Nisan
Herkesin şakalara karşı pür dikkat olduğu 1 Nisan'da arkadaşınızın bilgisayarınızı programlar ya da bazı ufak ipuçlarını kullanarak bozulmuş gibi gösterebilirsiniz.
Kahve almaya giden arkadaşınızın ekranının değiştirip monitörü kırılmış gibi göstermeniz de mümkün. İşte ofisler ve bilgisayar kullanıcıları için en komik şaka önerileri.
10.Klavye Şakası
1 Nisan'da arkadaşınıza yapabileceğiniz en kolay şaka onun klavyesindeki tuşları değiştirmek. Bunun için sabah ofise biraz daha erken gelmeniz lazım.
Bir tornavida sayesinde klavyeden istediğiniz tuşları söküp yerlerini değiştirebilirsiniz. Ancak bu şaka bazı klavyelerin bir daha çalışmamasına neden olabilir.
9. Kırılmış Ekran Şakası
Arkadaşınıza yapabileceğiniz bir diğer basit şaka ise onun ekranını kırılmış gibi göstermek. Bunu özel bir ekran koruyucu ya da kırılmış ekran resimleriyle yapabilirsiniz.
Arkadaşınız masasından kalktığı zaman ekran koruyucuyu devreye sokarak ekranı kırılmış gibi göstermeniz mümkün.
8.Word'u Hack'leyin
Arkadaşınızın Word ekranına bazı komutlar ekleyip onun ekranında anlamsız yazılar çıkmasını sağlayabilrisiniz. Hack'lendiğini gören arkadaşınız bir süreliğine büyük korku yaşayacak.
Bunun için Word açıkken Alt+F11'e basın ve aşağıdaki kodları ekleyin.
Sub typeRand()
Dim counter As String
counter = CStr(Int((30 – 1 + 1) * Rnd + 1))
Application.OnTime When:=Now + TimeValue("00:00:" + counter), _
Name:="TimedClose"
End Sub
Sub TimedClose()
Dim maindocument As Document
Set maindocument = activedocument
counter = CStr(Int((5 – 1 + 1) * Rnd + 1))
Select Case counter
Case 1
Selection.TypeText Text:=" Yazmak istediğiniz şey buraya"
Case 2
Selection.TypeText Text:=" Yazmak istediğiniz şey buraya "
Case 3
Selection.TypeText Text:="Yazmak istediğiniz şey buraya "
Case 4
Selection.TypeText Text:=" Yazmak istediğiniz şey buraya "
Case 5
Selection.TypeText Text:="Yazmak istediğiniz şey buraya "
End Select
Call typeRand
End Sub
7. Fareyi Jölelemek
Bu şaka daha çok eli yemek yapmaya yatkın insanlar için geçerli. Ülkemizde de rahat rahat satılan jölelerden bir tane alıp arkadaşınız yokken onun faresinin üzerine dökebilirsiniz.
Ortaya sanatsal ve komik bir manzara çıkar. Arkadaşınızın jöle içindeki faresinin gördüğü zaman ise her şeye değer.
Dim counter As String
counter = CStr(Int((30 – 1 + 1) * Rnd + 1))
Application.OnTime When:=Now + TimeValue("00:00:" + counter), _
Name:="TimedClose"
End Sub
Sub TimedClose()
Dim maindocument As Document
Set maindocument = activedocument
counter = CStr(Int((5 – 1 + 1) * Rnd + 1))
Select Case counter
Case 1
Selection.TypeText Text:=" Yazmak istediğiniz şey buraya"
Case 2
Selection.TypeText Text:=" Yazmak istediğiniz şey buraya "
Case 3
Selection.TypeText Text:="Yazmak istediğiniz şey buraya "
Case 4
Selection.TypeText Text:=" Yazmak istediğiniz şey buraya "
Case 5
Selection.TypeText Text:="Yazmak istediğiniz şey buraya "
End Select
Call typeRand
End Sub
7. Fareyi Jölelemek
Bu şaka daha çok eli yemek yapmaya yatkın insanlar için geçerli. Ülkemizde de rahat rahat satılan jölelerden bir tane alıp arkadaşınız yokken onun faresinin üzerine dökebilirsiniz.
