Skip to content

Instantly share code, notes, and snippets.

🖥
thirsty

Jay Versluis versluis

View GitHub Profile
@versluis
versluis / isThisInThat.php
Created Mar 19, 2019
helper function to test if a string is contained in another string
View isThisInThat.php
function isThisInThat ($needle, $haystack) {
return strpos($haystack, $needle) !==false;
}
@versluis
versluis / input.bas
Created May 4, 2018
a text input routine written in Commodore BASIC
View input.bas
5 print
10 w$=""
20 print "(greater than)_";
30 get a$:if a$="" then 30
40 a=asc(a$)
50 if a=13 then 200:rem return
60 if a=32 then 110:rem space
70 if a=20 then 300:rem backspace
100 if a<65 or a>90 then 30
110 print chr$(20);a$;"D";
@versluis
versluis / wp-comment-wordcount1.php
Created Mar 25, 2018
get word count from comments written by the current user in WordPress
View wp-comment-wordcount1.php
function getWordCountCommentsCurrentUser() {
$count = 0;
$user_id = get_current_user_id();
$comments = get_comments( array(
'user_id' => $user_id
));
foreach( $comments as $comment ) {
$count += str_word_count( $comment->comment_content );
}
@versluis
versluis / wp-wordcount.php
Created Mar 25, 2018
get total word count from all posts in WordPress
View wp-wordcount.php
function getWordCountFromPosts () {
$count = 0;
$posts = get_posts( array(
'numberposts' => -1,
'post_type' => 'any'
));
foreach( $posts as $post ) {
$count += str_word_count( strip_tags( get_post_field( 'post_content', $post->ID )));
@versluis
versluis / clock.prg
Created Mar 23, 2018
Creates a simple clock in Commodore BASIC
View clock.prg
5 input "qwhat is the current time (hhmm
ss) ";ti$
10 print chr$(147):print chr$(5)
20 a$ = left$(ti$,2)
25 a$ = a$ +":"
30 a$ = a$ + mid$(ti$,3,2)
35 a$ = a$ +":"
40 a$ = a$ +right$(ti$,2)
50 gosub 200
60 print chr$(19)
@versluis
versluis / YouTube.prg
Created Mar 23, 2018
Create random YouTube URLs in Commodore BASIC
View YouTube.prg
10 print chr$(14)
20 gosub 100:x=rnd(-ti):cn=1
30 a$="https://youtu.be/"
40 for i=1 to 11
50 rn=int(rnd(0)*62)+1
60 a$=a$+yt$(rn)
70 next
80 print:print cn;" : ";a$
85 cn=cn+1
90 goto 30
View gist:3645165878facd7473b8e6ab569e4121
// list all articles on this site
// https://codex.wordpress.org/Template_Tags/wp_get_archives
$args = array(
'type' => 'postbypost',
'limit' => '',
'format' => 'html',
'before' => '',
'after' => '',
'show_post_count' => false,
'echo' => 1,
@versluis
versluis / export-all-shape-keys.py
Created Aug 15, 2017
Export all Shape Keys from Blender to OBJ files
View export-all-shape-keys.py
# Export all Shape Keys as OBJs in Blender
# Version 1.0 - August 2017
# =========================================
# Original Script by Tlousky
# https://blender.stackexchange.com/questions/86674/how-to-batch-export-shapekeys-as-obj-from-the-active-object/86678#86678
# with small tweaks by Jay Versluis
# https://www.versluis.com
import bpy
from os.path import join
View denominations.py
# Calculate denominations in dollars, quarters, dimes and cents from a starting sum (in cents)
print('---------------')
amount = 439
print('Total: ', amount)
dollars =(amount-amount%100)/100
amount -=dollars*100
quarters = (amount-amount%25)/25
You can’t perform that action at this time.