Mercurial > codedump
annotate mod7.nsb @ 133:0d8eabdd12ab default tip
create: write H:MM:SS timestamps, add option to fill with gaussian-blur instead of black
many albums are longer than one hour so writing H:MM:SS is a
necessity. if anything there will just be verbose info that
isn't important for my use-case.
however the gaussian-blur is simply broken. It works, and it plays
locally just fine, but YouTube in particular elongates the video
to fit the full width. I'm not entirely sure why it does this, but
it makes it useless and ugly.
| author | Paper <paper@tflc.us> |
|---|---|
| date | Sat, 03 Jan 2026 20:25:38 -0500 |
| parents | 96e5d721538f |
| children |
| rev | line source |
|---|---|
|
105
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
1 {if:{argslen}|=|1|then:{ |
|
107
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
2 if:{arg:0}|=|--oem|then:{set:day|{range:1|365}}{repeat:{len:{substring:{repeat:3|a}|{len:{get:day}}}}|0}{get:day}{choose:95|96|97|98|99|00|01|02|03}-OEM-{lua: |
|
105
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
3 function sumdigits(n) |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
4 local sum = 0 |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
5 while n > 0 do |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
6 sum = sum + n%10 |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
7 n = math.floor(n/10) |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
8 end |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
9 return sum |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
10 end |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
11 |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
12 the = 1 |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
13 while (sumdigits(the) % 7 ~= 0) do |
|
107
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
14 the = math.random(1, 99999) |
|
105
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
15 end |
|
107
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
16 the = (the*10)+math.random(1,7) |
|
105
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
17 print(string.format("%07d", the)) |
|
106
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
18 }-{set:day|{range:1|99999}}{repeat:{len:{substring:{repeat:5|a}|{len:{get:day}}}}|0}{get:day}|else: |
|
105
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
19 {set:first|{range:111|999}}{ |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
20 if:{get:first}|=|333|then:{set:first|332}}{ |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
21 if:{get:first}|=|444|then:{set:first|443}}{ |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
22 if:{get:first}|=|555|then:{set:first|554}}{ |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
23 if:{get:first}|=|666|then:{set:first|665}}{ |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
24 if:{get:first}|=|777|then:{set:first|776}}{ |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
25 if:{get:first}|=|888|then:{set:first|887}}{ |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
26 if:{get:first}|=|999|then:{set:first|998}}{get:first}{ |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
27 if:{arg:0}|=|--office|then:{ |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
28 if:{substring:{get:first}|2|3}|=|9|then:0|else:{len:{repeat:{substring:{get:first}|2|3}|a}{repeat:1|a}}}}-{lua: |
|
107
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
29 function sumdigits(n) |
|
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
30 local sum = 0 |
|
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
31 while n > 0 do |
|
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
32 sum = sum + n%10 |
|
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
33 n = math.floor(n/10) |
|
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
34 end |
|
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
35 return sum |
|
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
36 end |
|
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
37 |
|
105
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
38 the = 1 |
|
107
96e5d721538f
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
106
diff
changeset
|
39 while (sumdigits(the) % 7 ~= 0) do |
|
105
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
40 the = (math.random(1, 999999)*10)+math.random(1,7) |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
41 end |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
42 print(string.format("%07d", the)) |
|
bf6d6304f6f7
Add files via upload
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
diff
changeset
|
43 }} |
|
106
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
44 |else:{code: |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
45 MOD7(1) |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
46 |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
47 NAME |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
48 mod7 |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
49 |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
50 SYNOPSIS |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
51 .t mod7 [ option ] |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
52 |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
53 DESCRIPTION |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
54 A generator for old Microsoft products using the |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
55 mod7 key algorithm. |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
56 |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
57 OPTIONS |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
58 --normal |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
59 Generate a normal Windows 95/NT 4 key. |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
60 --office |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
61 Generate a normal Office 97 key. |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
62 --oem |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
63 Generate an OEM Windows 95/NT 4 key. |
|
66dc98750bc4
Update mod7.nsb
Paper <37962225+mrpapersonic@users.noreply.github.com>
parents:
105
diff
changeset
|
64 }} |
