I accused Clack when I was young.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(ql:quickload '(clx zpng)) | |
(defpackage #:cl-autogui | |
(:use #:common-lisp #:xlib) | |
(:export #:x-position | |
#:x-size | |
#:x-position | |
#:x-move | |
#:x-mouse-down | |
#:x-mouse-up |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defvar base-youdao-url "http://fanyi.youdao.com/openapi.do?keyfrom=emacs-yd-pub&key=527593631&type=data&doctype=json&version=1.1&q=") | |
;; Get yourself an API KEY here: http://fanyi.youdao.com/openapi?path=data-mode | |
(defun youdao-fanyi () | |
"Translate current word (en->cn, cn->en), prompt to input if no word here" | |
(interactive) | |
(let* ((word (or (thing-at-point 'word) (read-string "Translate> "))) | |
(full-url (concat base-youdao-url word))) | |
(with-current-buffer (url-retrieve-synchronously full-url) | |
(unwind-protect | |
(progn |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defpackage #:dino-ai | |
(:use #:common-lisp #:cl-autogui) | |
(:export #:dino-jump)) | |
(in-package #:dino-ai) | |
(defvar *space-key* 65) | |
;; game over text position (position of 'G' and 'R') | |
(defvar *game-over-poses* '((385 175) (575 173))) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defpackage #:dino-ai | |
(:use #:common-lisp #:cl-autogui) | |
(:export #:dino-jump | |
#:dino-play)) | |
(in-package #:dino-ai) | |
(defvar *f5-key* 71) | |
(defvar *space-key* 65) | |
(defvar *down-key* 116) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
(defun org-table-align () | |
"Align the table at point by aligning all vertical bars." | |
(interactive) | |
(let* ( | |
;; Limits of table | |
(beg (org-table-begin)) | |
(end (org-table-end)) | |
;; Current cursor position | |
(linepos (org-current-line)) | |
(colpos (org-table-current-column)) |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
/* | |
MIT License | |
Copyright (c) 2017 | |
Permission is hereby granted, free of charge, to any person obtaining a copy | |
of this software and associated documentation files (the "Software"), to deal | |
in the Software without restriction, including without limitation the rights | |
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell | |
copies of the Software, and to permit persons to whom the Software is |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/usr/bin/env python | |
# ##################################### | |
# | |
# Modified from: https://github.com/fairyming/CVE-2020-1938 | |
# | |
# add `-e` to execute commands | |
# python exec.py -c 1 127.0.0.1 -p 8009 -f exec.txt -e 'cat /etc/passwd' | |
# | |
# ################################### | |
#CNVD-2020-10487 Tomcat-Ajp lfi |
TNS-01153 : Failed to Process the String ...
ORA-12541: TNS: no listener ...
ORA-12514: TNS:listener does not currently know of service requested in connect ...
If you are cursed like me, have to do use Oracle database and Windows, suddenly those shits came out of nowhere and wasted you hours, the following instruction might save you some time:
Note
The latest version is here:
Before executing the following commands, you need to follow how-to-build.sh and create two c files, they are provided.
OlderNewer